7 lines
123 B
Plaintext
7 lines
123 B
Plaintext
|
; return the first item in a table
|
||
|
|
(fn head [t] (if (> (length t) 0)
|
||
|
|
(?. t 1)
|
||
|
|
[]))
|
||
|
|
|
||
|
|
{: head}
|