gave up the idea of constants.
enhanced namespace handling with selfns and self uniformified identifier handling related to namespacing
This commit is contained in:
		| @ -6,7 +6,7 @@ class(#pointer,#limited) Class(Apex) | ||||
| { | ||||
| 	var spec, selfspec, superclass, subclasses, name, modname. | ||||
| 	var instvars, classinstvars, classvars, pooldics. | ||||
| 	var instmthdic, classmthdic, nsup, nsdic, cdic. | ||||
| 	var instmthdic, classmthdic, nsup, nsdic. | ||||
| 	var trsize, initv, initv_ci. | ||||
|  | ||||
| 	method(#class) initialize { ^self } | ||||
|  | ||||
| @ -217,13 +217,13 @@ extend MethodContext | ||||
| 	method isExceptionContext | ||||
| 	{ | ||||
| 		## 12 - MOO_METHOD_PREAMBLE_EXCEPTION in VM. | ||||
| 		^self.method preambleCode == 12. | ||||
| 		^self.method preambleCode == 13. | ||||
| 	} | ||||
|  | ||||
| 	method isEnsureContext | ||||
| 	{ | ||||
| 		## 13 - MOO_METHOD_PREAMBLE_ENSURE in VM. | ||||
| 		^self.method preambleCode == 13 | ||||
| 		^self.method preambleCode == 14 | ||||
| 	} | ||||
|  | ||||
| 	method ensureBlock | ||||
| @ -236,7 +236,7 @@ extend MethodContext | ||||
| 		 * instance variables of the method context. As MethodContex has | ||||
| 		 * 8 instance variables, the ensure block must be at the 9th position | ||||
| 		 * which translates to index 8 *) | ||||
| 		^if (self.method preambleCode == 13) { self basicAt: 8 } else { nil } | ||||
| 		^if (self.method preambleCode == 14) { self basicAt: 8 } else { nil } | ||||
| 	} | ||||
|  | ||||
|  | ||||
|  | ||||
		Reference in New Issue
	
	Block a user