--- a/DoWhatIMeanSupport.st Mon Sep 23 00:15:28 2013 +0200
+++ b/DoWhatIMeanSupport.st Mon Sep 23 11:47:52 2013 +0200
@@ -1775,9 +1775,11 @@
^ SmallInteger
].
- (#( isNil notNil not emptyOrNil notEmptyOrNil notEmpty isEmpty
- = ~= == ~~
+ "/ some wellknown boolean returners (need better type inference here)
+ (#( isNil notNil not isEmptyOrNil notEmptyOrNil notEmpty isEmpty
+ = ~= == ~~ > >= < <=
includes: contains:
+ isBehavior isMeta
and: or:
exists atEnd
) includes:nodeSelector ) ifTrue:[
@@ -4340,10 +4342,10 @@
!DoWhatIMeanSupport class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.165 2013-09-22 22:15:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.166 2013-09-23 09:47:52 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.165 2013-09-22 22:15:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.166 2013-09-23 09:47:52 cg Exp $'
! !