ソースを参照

Added X11 lock

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8236 8c9fc860-2736-0410-a75d-ab315db34111
negelef 7 年 前
コミット
1ec60e0d78
1 ファイル変更2 行追加1 行削除
  1. 2 1
      source/Coop.Machine.Mod

+ 2 - 1
source/Coop.Machine.Mod

@@ -26,7 +26,8 @@ CONST
 	Objects* = 5;   (* Ready queue *)
 	Objects* = 5;   (* Ready queue *)
 	KernelLog* = 7;   (* Atomic output *)
 	KernelLog* = 7;   (* Atomic output *)
 	GC* = 8;
 	GC* = 8;
-	MaxLocks = 9;   (* { <= 32 } *)
+	X11* = 9;   (* XWindows I/O *)
+	MaxLocks = 10;   (* { <= 32 } *)
 
 
 	(* error codes *)
 	(* error codes *)
 	Ok* = 0;
 	Ok* = 0;