--- a/VariableNode.st Thu Aug 05 13:53:34 2010 +0200
+++ b/VariableNode.st Fri Aug 06 15:22:22 2010 +0200
@@ -9,6 +9,8 @@
other person. No title to or ownership of the software is
hereby transferred.
"
+'From Smalltalk/X, Version:6.1.1 on 02-08-2010 at 14:02:55' !
+
"{ Package: 'stx:libcomp' }"
PrimaryNode subclass:#VariableNode
@@ -723,8 +725,8 @@
nameSym notNil ifTrue:[
^ JAVA at:name
].
- ^ nil.
- ^ Parser::UndefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
+"/ ^ nil.
+ ^ Parser undefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
].
(type == #GlobalVariable) ifTrue:[
nameSym := name asSymbolIfInterned.
@@ -733,8 +735,8 @@
^ Smalltalk at:name
]
].
- ^ nil.
- ^ Parser::UndefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
+"/ ^ nil.
+ ^ Parser undefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
].
(type == #ClassVariable) ifTrue:[
^ value classVarAt:name asSymbol
@@ -975,5 +977,5 @@
!VariableNode class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.75 2008-10-31 14:25:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.76 2010-08-06 13:22:22 stefan Exp $'
! !