--- a/SyntaxElement.st Tue Feb 17 16:59:19 2015 +0100
+++ b/SyntaxElement.st Tue Feb 17 17:00:02 2015 +0100
@@ -25,6 +25,8 @@
"
"{ Package: 'stx:libtool' }"
+"{ NameSpace: Smalltalk }"
+
Magnitude subclass:#SyntaxElement
instanceVariableNames:'start stop type value next prev'
classVariableNames:''
@@ -240,7 +242,7 @@
!SyntaxElement methodsFor:'double dispatching'!
lessFromInteger:anInteger
- ^stop < anInteger
+ ^ self stop < anInteger
"Created: / 14-02-2010 / 13:49:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified (format): / 27-07-2012 / 21:53:33 / cg"
@@ -298,10 +300,10 @@
!SyntaxElement class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/SyntaxElement.st,v 1.7 2013-06-24 13:43:05 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/SyntaxElement.st,v 1.8 2015-02-17 16:00:02 stefan Exp $'
!
version_SVN
- ^ '$Id: SyntaxElement.st,v 1.7 2013-06-24 13:43:05 cg Exp $'
+ ^ '$Id: SyntaxElement.st,v 1.8 2015-02-17 16:00:02 stefan Exp $'
! !