join

Summary

Join every element of α together into a string with GLUE inbetween

Bytecode

Probably only interesting to you if you want to understand more about the Nujel VM or care very much about performance.

(    0 ($get/val 'glue))
(    2 ($jf* 7))
(    5 ($push/nil))
(    6 ($jmp* 7))
(    9 ($push/val ))
(   11 ($set/val 'glue))
(   13 ($drop))
(   14 ($get/val 'l))
(   16 ($jf* 22))
(   19 ($get/val 'reduce))
(   21 ($get/val 'l))
(   23 ($push/val 'anonymous))
(   25 ($push/val (a b)))
(   27 ($push/val #@()))
(   29 ($push/val #{##(a cat glue b)
0E000B00100E010E000E020E0304030900050E0301
}))
(   31 ($fn/dynamic))
(   32 ($push/nil))
(   33 ($apply 3))
(   35 ($jmp* 5))
(   38 ($push/val ))
(   40 ($ret))