file/test/module

path base-dir


Summary

Test a module by running all contained tests

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 'string/cut))
(    2 ($get/val 'path))
(    4 ($get/val 'length))
(    6 ($get/val 'base-dir))
(    8 ($apply 1))
(   10 ($apply 2))
(   12 ($det/val 'rel-path))
(   14 ($drop))
(   15 ($get/val 'buffer/ref))
(   17 ($get/val 'rel-path))
(   19 ($push/int/byte 0))
(   21 ($apply 2))
(   23 ($push/int/byte 47))
(   25 ($=))
(   26 ($jf* 16))
(   29 ($get/val 'string/cut))
(   31 ($get/val 'rel-path))
(   33 ($push/int/byte 1))
(   35 ($apply 2))
(   37 ($set/val 'rel-path))
(   39 ($jmp* 4))
(   42 ($push/nil))
(   43 ($drop))
(   44 ($get/val 'string->keyword))
(   46 ($get/val 'path/without-extension))
(   48 ($get/val 'rel-path))
(   50 ($apply 1))
(   52 ($apply 1))
(   54 ($det/val 'module-name))
(   56 ($drop))
(   57 ($get/val 'module/import))
(   59 ($get/val 'module/load))
(   61 ($push/val :ansi))
(   63 ($get/val 'current-closure))
(   65 ($apply 0))
(   67 ($apply 2))
(   69 ($push/val 'blue))
(   71 ($apply 2))
(   73 ($det/val 'blue))
(   75 ($drop))
(   76 ($get/val 'module/import))
(   78 ($get/val 'module/load))
(   80 ($push/val :test))
(   82 ($get/val 'current-closure))
(   84 ($apply 0))
(   86 ($apply 2))
(   88 ($push/val 'init!))
(   90 ($apply 2))
(   92 ($det/val 'init!))
(   94 ($drop))
(   95 ($get/val 'module/import))
(   97 ($get/val 'module/load))
(   99 ($push/val :test))
(  101 ($get/val 'current-closure))
(  103 ($apply 0))
(  105 ($apply 2))
(  107 ($push/val 'finish!))
(  109 ($apply 2))
(  111 ($det/val 'finish!))
(  113 ($drop))
(  114 ($get/val 'init!))
(  116 ($apply 0))
(  118 ($drop))
(  119 ($get/val 'file/test/module/run))
(  121 ($get/val 'filter))
(  123 ($get/val 'read))
(  125 ($get/val 'file/read))
(  127 ($get/val 'path))
(  129 ($apply 1))
(  131 ($apply 1))
(  133 ($get/val 'file/test/valid-test-form?))
(  135 ($apply 2))
(  137 ($get/val 'module-name))
(  139 ($apply 2))
(  141 ($drop))
(  142 ($get/val 'finish!))
(  144 ($get/val 'blue))
(  146 ($get/val 'module-name))
(  148 ($apply 1))
(  150 ($apply 1))
(  152 ($ret))