False.st
changeset 3044 a0bbac91639b
parent 1303 8fdc2c653d13
child 6906 87afb9964006
--- 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 $'! !