from-char-code

Summary

Turn the provided char codes into a string and return it

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 'buffer/allocate))
(    2 ($get/val 'list/length))
(    4 ($get/val 'l))
(    6 ($apply 1))
(    8 ($apply 1))
(   10 ($det/val 'buf))
(   12 ($drop))
(   13 ($let))
(   14 ($push/int/byte 0))
(   16 ($det/val 'i))
(   18 ($drop))
(   19 ($push/nil))
(   20 ($jmp* 101))
(   23 ($drop))
(   24 ($push/val :int))
(   26 ($get/val 'type-of))
(   28 ($get/val 'l))
(   30 ($car))
(   31 ($apply 1))
(   33 ($=))
(   34 ($jf* 7))
(   37 ($push/false))
(   38 ($jmp* 4))
(   41 ($push/true))
(   42 ($dup))
(   43 ($jt* 28))
(   46 ($drop))
(   47 ($get/val 'l))
(   49 ($car))
(   50 ($push/val 255))
(   52 ($>))
(   53 ($dup))
(   54 ($jt* 17))
(   57 ($drop))
(   58 ($get/val 'l))
(   60 ($car))
(   61 ($push/int/byte 0))
(   63 ($<))
(   64 ($dup))
(   65 ($jt* 6))
(   68 ($drop))
(   69 ($push/val #f))
(   71 ($jf* 25))
(   74 ($get/val 'throw))
(   76 ($get/val 'list))
(   78 ($push/val :type-error))
(   80 ($push/val (from-char-code) expects :int arguments from 0 to 255, not: ))
(   82 ($get/val 'l))
(   84 ($car))
(   85 ($get/val 'current-lambda))
(   87 ($apply 0))
(   89 ($apply 4))
(   91 ($apply 1))
(   93 ($jmp* 4))
(   96 ($push/nil))
(   97 ($drop))
(   98 ($get/val 'buffer/set!))
(  100 ($get/val 'buf))
(  102 ($get/val 'i))
(  104 ($get/val 'l))
(  106 ($car))
(  107 ($apply 3))
(  109 ($drop))
(  110 ($get/val 'l))
(  112 ($cdr))
(  113 ($set/val 'l))
(  115 ($drop))
(  116 ($get/val 'i))
(  118 ($inc/int))
(  119 ($set/val 'i))
(  121 ($get/val 'i))
(  123 ($get/val 'buffer/length))
(  125 ($get/val 'buf))
(  127 ($apply 1))
(  129 ($<))
(  130 ($jt* -107))
(  133 ($drop))
(  134 ($get/val 'buffer->string))
(  136 ($get/val 'buf))
(  138 ($apply 1))
(  140 ($closure/pop))
(  141 ($ret))