Mercurial Mercurial > hg > stx-libcomp / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#FEATURE by cg expecco_18_1_0 expecco_18_1_0wa1
authorClaus Gittinger <cg@exept.de>
Sun, 17 Jun 2018 08:31:51 +0200
changeset 4278 d756ed6a7120
parent 4277 6ee15273e438
child 4279 5d61e0122b4e
#FEATURE by cg class: ConstantNode added: #isConstantNumber
ConstantNode.st file | annotate | diff | comparison | revisions 
--- a/ConstantNode.st	Sun Jun 17 08:31:38 2018 +0200
+++ b/ConstantNode.st	Sun Jun 17 08:31:51 2018 +0200
@@ -153,6 +153,7 @@
     ^ #Literal
 ! !
 
+
 !ConstantNode methodsFor:'accessing'!
 
 lineNumber:ignoredLineNumber
@@ -373,6 +374,12 @@
 
 isConstant
     ^ true
+!
+
+isConstantNumber
+    ^ value isNumber
+
+    "Created: / 16-06-2018 / 08:46:53 / Claus Gittinger"
 ! !
 
 !ConstantNode methodsFor:'visiting'!
hg/stx-libcomp