src/Pure/ML-Systems/use_context.ML
author wenzelm
Mon, 07 Feb 2011 23:57:03 +0100
changeset 41712 82339c3fd74a
parent 30672 beaadd5af500
permissions -rw-r--r--
more robust TimeLimit: make double sure that watchdog has terminated and interrupts received during uninterruptible state are propagated (NB: Thread.testInterrupt requires InterruptSynch in Poly/ML 5.4.0 or earlier);
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
30672
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     1
(*  Title:      Pure/ML-Systems/use_context.ML
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     2
    Author:     Makarius
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     3
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     4
Common context for "use" operations (compiler invocation).
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     5
*)
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     6
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     7
type use_context =
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     8
 {tune_source: string -> string,
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
     9
  name_space: ML_Name_Space.T,
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
    10
  str_of_pos: int -> string -> string,
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
    11
  print: string -> unit,
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
    12
  error: string -> unit};
beaadd5af500 more systematic type use_context, with particular values ML_Parse.global_context and ML_Context.local_context;
wenzelm
parents:
diff changeset
    13