10 lines
173 B
Plaintext
10 lines
173 B
Plaintext
|
(local { : view } (require :fennel))
|
||
|
|
||
|
(fn rover [x y direction]
|
||
|
{})
|
||
|
|
||
|
(let [r (rover 0 0 :n)]
|
||
|
(match r
|
||
|
{:x 0 :y 0 :direction :n} true
|
||
|
_ (assert false (view r))))
|