True.st
branchjv
changeset 17732 a1892eeca6c0
parent 17728 bbc5fa73dfab
child 17761 b0e5971141bc
equal deleted inserted replaced
17731:295728e8f410 17732:a1892eeca6c0
    75 
    75 
    76     ^ block1 value and:block2
    76     ^ block1 value and:block2
    77 !
    77 !
    78 
    78 
    79 and:block1 and:block2 and:block3
    79 and:block1 and:block2 and:block3
       
    80     "evaluate block1 if the receiver is true, 
       
    81      if that is also true, evaluate block2.
       
    82      if that is also true, return the result from block3."
       
    83 
    80     block1 value ifFalse:[^ false].
    84     block1 value ifFalse:[^ false].
    81     block2 value ifFalse:[^ false].
    85     block2 value ifFalse:[^ false].
    82     ^ block3 value
    86     ^ block3 value
    83 !
    87 !
    84 
    88 
    85 and:block1 and:block2 and:block3 and:block4
    89 and:block1 and:block2 and:block3 and:block4
       
    90     "evaluate block1 if the receiver is true, 
       
    91      if that is also true, evaluate block2.
       
    92      if that is also true, evaluate block3.
       
    93      if that is also true, return the result from block4."
       
    94 
    86     block1 value ifFalse:[^ false].
    95     block1 value ifFalse:[^ false].
    87     block2 value ifFalse:[^ false].
    96     block2 value ifFalse:[^ false].
    88     block3 value ifFalse:[^ false].
    97     block3 value ifFalse:[^ false].
    89     ^ block4 value
    98     ^ block4 value
    90 !
    99 !
   226 ! !
   235 ! !
   227 
   236 
   228 !True class methodsFor:'documentation'!
   237 !True class methodsFor:'documentation'!
   229 
   238 
   230 version
   239 version
   231     ^ '$Id: True.st 10467 2009-08-19 16:14:36Z vranyj1 $'
   240     ^ '$Id: True.st 10473 2009-10-24 15:48:19Z vranyj1 $'
   232 ! !
   241 ! !
       
   242