src/Pure/Concurrent/event_timer.ML
changeset 78648 852ec09aef13
parent 71692 f8e52c0152fe
child 78716 97dfba4405e3
--- a/src/Pure/Concurrent/event_timer.ML	Mon Sep 04 21:03:13 2023 +0200
+++ b/src/Pure/Concurrent/event_timer.ML	Wed Sep 06 14:09:27 2023 +0200
@@ -92,7 +92,7 @@
 datatype status = Normal | Shutdown_Req | Shutdown_Ack;
 
 datatype state =
-  State of {requests: requests, status: status, manager: Thread.thread option};
+  State of {requests: requests, status: status, manager: Isabelle_Thread.T option};
 
 fun make_state (requests, status, manager) =
   State {requests = requests, status = status, manager = manager};
@@ -128,7 +128,7 @@
   then manager_loop () else ();
 
 fun manager_check manager =
-  if is_some manager andalso Thread.isActive (the manager) then manager
+  if is_some manager andalso Isabelle_Thread.is_active (the manager) then manager
   else
     SOME (Isabelle_Thread.fork {name = "event_timer", stack_limit = NONE, interrupts = false}
       manager_loop);