# HG changeset patch
# User wenzelm
# Date 1220900910 -7200
# Node ID 9b2f9cc9ff4b36056210a1e90f2382d57bc3aa81
# Parent  a18cf8a0e65656a36370a82c1f89143473f8f37a
proper signature constraint;

diff -r a18cf8a0e656 -r 9b2f9cc9ff4b src/Pure/Concurrent/task_queue.ML
--- a/src/Pure/Concurrent/task_queue.ML	Mon Sep 08 20:35:38 2008 +0200
+++ b/src/Pure/Concurrent/task_queue.ML	Mon Sep 08 21:08:30 2008 +0200
@@ -20,7 +20,7 @@
   val interrupt_task_group: queue -> task -> unit
 end;
 
-structure TaskQueue (* : TASK_QUEUE *) =
+structure TaskQueue: TASK_QUEUE =
 struct
 
 (* identifiers *)