mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-28 05:50:30 +02:00
* check/3to2.tst, check/add.tst, check/allocai.tst, check/bp.tst, check/call.tst, check/ccall.c, check/clobber.tst, check/divi.tst, check/fib.tst, check/ldsti.tst, check/ldstr-c.tst, check/ldstr.tst, check/ldstxi-c.tst, check/ldstxi.tst, check/ldstxr-c.tst, check/ldstxr.tst, check/lightning.c, check/rpn.tst, check/stack.tst, check/varargs.tst, include/lightning.h, include/lightning/jit_private.h, lib/jit_arm.c, lib/jit_disasm.c, lib/jit_mips.c, lib/jit_note.c, lib/jit_ppc.c, lib/jit_print.c, lib/jit_x86.c, lib/lightning.c: Extend the "jit_note" abstraction with the new "jit_name" call, that receives a string argument, and should usually be called to mark boundaries of functions of code generating jit (that is, it is not expected that the language generating jit map its functions to jit functions).
35 lines
357 B
Scilab
35 lines
357 B
Scilab
.data 32
|
|
fmt:
|
|
.c "%d + %d = %d\n"
|
|
|
|
.code
|
|
jmpi main
|
|
|
|
name test
|
|
test:
|
|
prolog
|
|
arg $i0
|
|
arg $i1
|
|
getarg %r0 $i0
|
|
getarg %r1 $i1
|
|
addr %r0 %r0 %r1
|
|
retr %r0
|
|
epilog
|
|
|
|
name main
|
|
main:
|
|
prolog
|
|
prepare
|
|
pushargi 5
|
|
pushargi 4
|
|
finishi test
|
|
retval %r0
|
|
prepare
|
|
pushargi fmt
|
|
ellipsis
|
|
pushargi 5
|
|
pushargi 4
|
|
pushargr %r0
|
|
finishi @printf
|
|
ret
|
|
epilog
|