src/Pure/ROOT.ML
changeset 52798 9d3c9862d1dd
parent 52788 da1fdbfebd39
child 52836 1a03ffc00a4a
equal deleted inserted replaced
52797:0d6f2a87d1a5 52798:9d3c9862d1dd
    68 use "System/options.ML";
    68 use "System/options.ML";
    69 
    69 
    70 
    70 
    71 (* concurrency within the ML runtime *)
    71 (* concurrency within the ML runtime *)
    72 
    72 
    73 use "Concurrent/event_timer.ML";
       
    74 
       
    75 if ML_System.is_polyml
    73 if ML_System.is_polyml
    76 then use "ML/exn_properties_polyml.ML"
    74 then use "ML/exn_properties_polyml.ML"
    77 else use "ML/exn_properties_dummy.ML";
    75 else use "ML/exn_properties_dummy.ML";
    78 
    76 
    79 if ML_System.name = "polyml-5.5.0"
    77 if ML_System.name = "polyml-5.5.0"
    82 
    80 
    83 use "Concurrent/single_assignment.ML";
    81 use "Concurrent/single_assignment.ML";
    84 if Multithreading.available then ()
    82 if Multithreading.available then ()
    85 else use "Concurrent/single_assignment_sequential.ML";
    83 else use "Concurrent/single_assignment_sequential.ML";
    86 
    84 
    87 if ML_System.is_polyml then use "Concurrent/time_limit.ML" else ();
       
    88 
       
    89 if Multithreading.available
    85 if Multithreading.available
    90 then use "Concurrent/bash.ML"
    86 then use "Concurrent/bash.ML"
    91 else use "Concurrent/bash_sequential.ML";
    87 else use "Concurrent/bash_sequential.ML";
    92 
    88 
    93 use "Concurrent/par_exn.ML";
    89 use "Concurrent/par_exn.ML";
    94 use "Concurrent/task_queue.ML";
    90 use "Concurrent/task_queue.ML";
    95 use "Concurrent/future.ML";
    91 use "Concurrent/future.ML";
       
    92 use "Concurrent/event_timer.ML";
       
    93 
       
    94 if ML_System.is_polyml then use "Concurrent/time_limit.ML" else ();
    96 
    95 
    97 use "Concurrent/lazy.ML";
    96 use "Concurrent/lazy.ML";
    98 if Multithreading.available then ()
    97 if Multithreading.available then ()
    99 else use "Concurrent/lazy_sequential.ML";
    98 else use "Concurrent/lazy_sequential.ML";
   100 
    99