src/Tools/Code/code_runtime.ML
changeset 40320 abc52faa7761
parent 40257 323f7aad54b0
child 40421 b41aabb629ce
equal deleted inserted replaced
40311:994e784ca17a 40320:abc52faa7761
   416     val _ = Context.set_thread_data ((SOME o Context.Theory) thy');
   416     val _ = Context.set_thread_data ((SOME o Context.Theory) thy');
   417     val _ = Secure.use_text notifying_context
   417     val _ = Secure.use_text notifying_context
   418       (0, Path.implode filepath) false (File.read filepath);
   418       (0, Path.implode filepath) false (File.read filepath);
   419     val thy'' = (Context.the_theory o the) (Context.thread_data ());
   419     val thy'' = (Context.the_theory o the) (Context.thread_data ());
   420     val names = Loaded_Values.get thy'';
   420     val names = Loaded_Values.get thy'';
   421     val thy''' = Thy_Load.provide_file filepath thy'';
   421   in (names, thy'') end;
   422   in (names, thy''') end;
       
   423 
   422 
   424 end;
   423 end;
   425 
   424 
   426 fun add_definiendum (ml_name, (b, T)) thy =
   425 fun add_definiendum (ml_name, (b, T)) thy =
   427   thy
   426   thy