src/Pure/ML-Systems/no_multithreading.ML

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/Pure/ML-Systems/no_multithreading.ML	Mon Jul 23 14:06:11 2007 +0200
@@ -0,0 +1,10 @@
+(*  Title:      Pure/ML-Systems/no_multithreading.ML
+    ID:         $Id$
+    Author:     Makarius
+
+Compatibility file for ML systems without multithreading.
+*)
+
+(* critical section *)
+
+fun CRITICAL e = e ();