# HG changeset patch
# User wenzelm
# Date 1237841872 -3600
# Node ID 2e796219f44104c5ce55661284966a6e686eccb5
# Parent  2f17c664d7fa095550026c1ec2ba2ce42be2caf6
more systematic type use_context;

diff -r 2f17c664d7fa -r 2e796219f441 src/Tools/code/code_ml.ML
--- a/src/Tools/code/code_ml.ML	Mon Mar 23 21:40:12 2009 +0100
+++ b/src/Tools/code/code_ml.ML	Mon Mar 23 21:57:52 2009 +0100
@@ -1037,7 +1037,7 @@
 fun isar_seri_sml module_name =
   Code_Target.parse_args (Scan.succeed ())
   #> (fn () => serialize_ml target_SML
-      (SOME (use_text ML_Context.name_space (1, "generated code") Output.ml_output false))
+      (SOME (use_text ML_Context.local_context (1, "generated code") false))
       pr_sml_module pr_sml_stmt module_name);
 
 fun isar_seri_ocaml module_name =