The following program seg faults when compiled with version 3.9.1. val _ = List.tabulate (1000000, fn i => i)