equal
deleted
inserted
replaced
6 |
6 |
7 use "ML-Systems/exn.ML"; |
7 use "ML-Systems/exn.ML"; |
8 use "ML-Systems/multithreading.ML"; |
8 use "ML-Systems/multithreading.ML"; |
9 use "ML-Systems/time_limit.ML"; |
9 use "ML-Systems/time_limit.ML"; |
10 |
10 |
|
11 |
|
12 (** ML system and platform related **) |
|
13 |
11 val ml_system_fix_ints = false; |
14 val ml_system_fix_ints = false; |
12 |
15 |
13 |
16 PolyML.Compiler.maxInlineSize := 80; |
14 (** ML system and platform related **) |
17 |
15 |
18 |
16 (* String compatibility *) |
19 (* String compatibility *) |
17 |
20 |
18 (*low-level pointer equality*) |
21 (*low-level pointer equality*) |
19 val pointer_eq = Address.wordEq; |
22 val pointer_eq = Address.wordEq; |