src/Pure/Tools/build.ML
changeset 65478 7c40477e0a87
parent 65457 2bf0d2fcd506
child 65517 1544e61e5314
equal deleted inserted replaced
65477:64e61b0f6972 65478:7c40477e0a87
   178     global_theories, loaded_theories, known_theories}) =
   178     global_theories, loaded_theories, known_theories}) =
   179   let
   179   let
   180     val symbols = HTML.make_symbols symbol_codes;
   180     val symbols = HTML.make_symbols symbol_codes;
   181 
   181 
   182     val _ =
   182     val _ =
   183       Resources.set_session_base
   183       Resources.init_session_base
   184         {default_qualifier = name,
   184         {default_qualifier = name,
   185          global_theories = global_theories,
   185          global_theories = global_theories,
   186          loaded_theories = loaded_theories,
   186          loaded_theories = loaded_theories,
   187          known_theories = known_theories};
   187          known_theories = known_theories};
   188 
   188 
   208         (List.app (build_theories symbols last_timing name master_dir)
   208         (List.app (build_theories symbols last_timing name master_dir)
   209           |> session_timing name verbose
   209           |> session_timing name verbose
   210           |> Exn.capture);
   210           |> Exn.capture);
   211     val res2 = Exn.capture Session.finish ();
   211     val res2 = Exn.capture Session.finish ();
   212 
   212 
   213     val _ = Resources.reset_session_base ();
   213     val _ = Resources.finish_session_base ();
   214     val _ = Par_Exn.release_all [res1, res2];
   214     val _ = Par_Exn.release_all [res1, res2];
   215   in () end;
   215   in () end;
   216 
   216 
   217 (*command-line tool*)
   217 (*command-line tool*)
   218 fun build args_file =
   218 fun build args_file =