Joseph Ferano
dfd64d89ea
Copying a snippet into HTML is where a documented language stops being the real one. Each block on the page is a program here with its recorded output beside it, and check.sh is what says the page is still true after a change.
13 lines
268 B
Plaintext
13 lines
268 B
Plaintext
(defstruct Missing [id i32])
|
|
|
|
(defn load [n i32] i32
|
|
(restart-case
|
|
(do (error (Missing {:id n})) ; Never — only a transfer gets past
|
|
0)
|
|
(use-placeholder [] -1)
|
|
(retry [] 7)))
|
|
|
|
(defn main []
|
|
(print-i64 (i64 (load 1)))
|
|
(newline))
|