--- a/ClassDefinitionChange.st Tue May 03 09:19:20 2016 +0200
+++ b/ClassDefinitionChange.st Wed May 04 08:22:14 2016 +0200
@@ -810,7 +810,7 @@
parseTree receiver isVariable ifTrue:[
superClassName := parseTree receiver name.
] ifFalse:[
- parseTree receiver isConstant ifTrue:[
+ parseTree receiver isLiteral ifTrue:[
superClassName := parseTree receiver value.
superClassName notNil ifTrue:[
self error: 'Invalid superclass - can be either a class or nil'
@@ -881,11 +881,11 @@
!ClassDefinitionChange class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.99 2015-05-27 13:36:10 cg Exp $'
+ ^ '$Header$'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.99 2015-05-27 13:36:10 cg Exp $'
+ ^ '$Header$'
!
version_HG
@@ -894,6 +894,6 @@
!
version_SVN
- ^ '$Id: ClassDefinitionChange.st,v 1.99 2015-05-27 13:36:10 cg Exp $'
+ ^ '$Id$'
! !