enabled the compiler to support a class name as a namespace.
started adding code for event-driven IO handling
This commit is contained in:
		| @ -4,7 +4,7 @@ | ||||
| ## | ||||
| class(#pointer) Class(Apex) | ||||
| { | ||||
| 	dcl spec selfspec superclass subclasses name instvars classvars classinstvars pooldics instmthdic classmthdic. | ||||
| 	dcl spec selfspec superclass subclasses name instvars classvars classinstvars pooldics instmthdic classmthdic nsdic. | ||||
|  | ||||
| 	method(#class) basicNew | ||||
| 	{ | ||||
|  | ||||
| @ -99,7 +99,7 @@ class(#pointer) Process(Object) | ||||
|  | ||||
| class Semaphore(Object) | ||||
| { | ||||
| 	dcl count waiting_head waiting_tail heapIndex fireTimeSec fireTimeNsec. | ||||
| 	dcl count waiting_head waiting_tail heapIndex fireTimeSec fireTimeNsec ioIndex ioData ioMask. | ||||
|  | ||||
| 	method(#class) forMutualExclusion | ||||
| 	{ | ||||
| @ -112,9 +112,14 @@ class Semaphore(Object) | ||||
| 	method initialize | ||||
| 	{ | ||||
| 		self.count := 0. | ||||
| 		 | ||||
| 		self.heapIndex := -1. | ||||
| 		self.fireTimeSec := 0. | ||||
| 		self.fireTimeNsec := 0. | ||||
| 		 | ||||
| 		self.ioIndex := -1. | ||||
| 		self.ioData := nil. | ||||
| 		self.ioMask := 0. | ||||
| 	} | ||||
|  | ||||
| 	## ================================================================== | ||||
|  | ||||
		Reference in New Issue
	
	Block a user