Initial data commit

This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 72d218235f
commit f23f22d71c
199087 changed files with 3378941 additions and 0 deletions

View file

@ -0,0 +1,10 @@
local 'raining = True.
local 'needUmbrella = False.
if (raining) then {
needUmbrella = True.
} else {}.
{ raining. } ifTrue {
needUmbrella = True.
}.

View file

@ -0,0 +1,14 @@
#'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).

View file

@ -0,0 +1,7 @@
global let= := { self slot ($2) = #'$1. }.
local 'a = 6.
println: a. ;; 6
let 6 = 'b.
println: b. ;; 6