--- a/False.st Thu Jun 11 17:31:18 2009 +0200
+++ b/False.st Thu Jun 11 17:31:25 2009 +0200
@@ -55,6 +55,7 @@
"
! !
+
!False methodsFor:'conditional evaluation'!
and:aBlock
@@ -117,6 +118,12 @@
!False methodsFor:'converting'!
+asInteger
+ "false->0; true->1"
+
+ ^ 0
+!
+
asNumber
"false->0; true->1"
@@ -188,5 +195,5 @@
!False class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/False.st,v 1.24 2007-12-19 14:33:31 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/False.st,v 1.25 2009-06-11 15:31:25 cg Exp $'
! !