diff -r 33b9c4c0eccf -r 914eb1c66bda VariableNode.st --- 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 $' ! !