15 lines
230 B
Text
15 lines
230 B
Text
|
#'Method when := {
|
||
|
|
localize.
|
||
|
|
if ($1) then {
|
||
|
|
this.
|
||
|
|
} else { }.
|
||
|
|
}.
|
||
|
|
|
||
|
|
#'Method unless := {
|
||
|
|
#'self when ($1 not).
|
||
|
|
}.
|
||
|
|
|
||
|
|
;; Example usage
|
||
|
|
{ needUmbrella = True. } when (raining).
|
||
|
|
{ needUmbrella = True. } unless (raining not).
|