# HG changeset patch
# User wenzelm
# Date 1532788258 -7200
# Node ID b624368a302fecb8bb28b0298c085e89cc265820
# Parent  6ee53660a911cd5b03e2489350129578230d702f
tuned;

diff -r 6ee53660a911 -r b624368a302f src/Pure/global_theory.ML
--- a/src/Pure/global_theory.ML	Sat Jul 28 16:08:04 2018 +0200
+++ b/src/Pure/global_theory.ML	Sat Jul 28 16:30:58 2018 +0200
@@ -158,7 +158,7 @@
   end;
 
 fun check_thms_lazy (thms: thm list lazy) =
-  if Options.default_bool "strict_facts" then (Lazy.force thms; thms) else thms;
+  if Options.default_bool "strict_facts" then Lazy.force_value thms else thms;
 
 fun add_thms_lazy kind (b, thms) thy =
   if Binding.is_empty b then Thm.register_proofs (check_thms_lazy thms) thy