--- a/False.st Thu Oct 16 13:17:03 1997 +0200
+++ b/False.st Tue Oct 21 19:44:59 1997 +0200
@@ -68,7 +68,9 @@
and:aBlock
"evaluate aBlock if the receiver is true.
(since the receiver is false return false).
- - open coded by compiler"
+ Notice:
+ This method is open coded (inlined) by the compiler(s)
+ - redefining it may not work as expected."
^ self
!
@@ -76,28 +78,36 @@
ifFalse:aBlock
"return the value of evaluating aBlock if the receiver is false.
(since the receiver is known to be false always evaluate)
- - open coded by compiler"
+ Notice:
+ This method is open coded (inlined) by the compiler(s)
+ - redefining it may not work as expected."
^ aBlock value
!
ifFalse:falseBlock ifTrue:trueBlock
"return the value of evaluating falseBlock (since the receiver is false)
- - open coded by compiler"
+ Notice:
+ This method is open coded (inlined) by the compiler(s)
+ - redefining it may not work as expected."
^ falseBlock value
!
ifTrue:aBlock
"return the false alternative, nil (since the receiver is false)
- - open coded by compiler"
+ Notice:
+ This method is open coded (inlined) by the compiler(s)
+ - redefining it may not work as expected."
^ nil
!
ifTrue:trueBlock ifFalse:falseBlock
"return the value of evaluating falseBlock (since the receiver is false)
- - open coded by compiler"
+ Notice:
+ This method is open coded (inlined) by the compiler(s)
+ - redefining it may not work as expected."
^ falseBlock value
!
@@ -105,7 +115,9 @@
or:aBlock
"evaluate aBlock if the receiver is false.
(since the receiver is false return the value of evaluating aBlock).
- - open coded by compiler"
+ Notice:
+ This method is open coded (inlined) by the compiler(s)
+ - redefining it may not work as expected."
^ aBlock value
! !
@@ -128,7 +140,10 @@
not
"return true, if the receiver is false, false otherwise
- (since the receiver is false, return true)"
+ (since the receiver is false, return true).
+ Notice:
+ This method is open coded (inlined) by the compiler(s)
+ - redefining it may not work as expected."
^ true
!
@@ -158,4 +173,4 @@
!False class methodsFor:'documentation'!
version
-^ '$Header: /cvs/stx/stx/libbasic/False.st,v 1.17 1996-04-26 07:11:48 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libbasic/False.st,v 1.18 1997-10-21 17:42:26 cg Exp $'! !