Mercurial Mercurial > hg > stx-libbasic / 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.
#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 01 Mar 2019 16:00:20 +0100
changeset 23786 fee4d65305fd
parent 23785 617f45e9fffa
child 23787 f8f3f03ef664
#REFACTORING by cg class: Method changed: #isVisualWorksTypedef (send #~~ instead of #>)
Method.st file | annotate | diff | comparison | revisions 
--- a/Method.st	Fri Mar 01 15:40:42 2019 +0100
+++ b/Method.st	Fri Mar 01 16:00:20 2019 +0100
@@ -2865,8 +2865,10 @@
 isVisualWorksTypedef
     "Return true, if this is a type-returning method (a visualWorks typedef)"
 
-    ^ (self literals size > 0)
+    ^ (self literals size ~~ 0)
     and:[ (self literalAt:1) isKindOf:CType ]
+
+    "Modified: / 01-03-2019 / 15:59:37 / Claus Gittinger"
 !
 
 mclass
hg/stx-libbasic