aocla/examples/cat.aocla

12 lines
233 B
Text
Raw Normal View History

// List concatenation. This procedure is just an example, the standard
// library "cat" is implemented in C.
2023-01-30 11:45:55 +01:00
// [1 2 3] [4 5 6] cat => [1 2 3 4 5 6]
[(a b)
$b [$a -> (a)] foreach
$a
] 'cat def
[1 2 3] [4 5 6] cat
showstack