é¢æ°ãå®ç¾©ã§ããããã«ãªã£ãã
rowlVMä¸ã§é¢æ°å®ç¾©ãåºæ¥ãããã«ãªãã¾ããã
以ä¸ã¯fibonacciã®å®ç¾©ããã¤ãã³ã¼ãé·ã¯22ãã¤ãã§ããä»ã¯ææ¸ãã ãã©ãå¾ã§ã³ã³ãã¤ã©ä½ãã¾ãã
(byte[] 100 fib @(assemble `( arg0 imm_i3 isub (if_lt hoge) arg0 imm_i1 isub (vcall 0 4) ; 0çª(fibèªèº«)ãcallï¼å¼æ°ã¯4ãã¤ã arg0 imm_i2 isub (vcall 0 4) iadd ireturn (label hoge) imm_i1 ireturn
ããã
(vm_register_function 0 fib)
ã¨ããé¢æ°ã§VMã®é¢æ°ãã¼ãã«0çªã«ç»é²ãã¾ãããããå¾ã§èªååãã¾ãã
fib(36)ã®å®è¡æéã¯0.92secã§ãããCè¨èªã®5åç¨ã®é度ä½ä¸ã§åã¾ãã¾ããã