src/Pure/ML-Systems/polyml.ML
changeset 25023 52eb78ebb370
parent 24851 4e304aac841a
child 25125 23d4cab56a7f
equal deleted inserted replaced
25022:bb0dcb603a13 25023:52eb78ebb370
     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;