1
1
mirror of https://github.com/anoma/juvix.git synced 2024-11-30 05:42:26 +03:00
juvix/tests/Reg/positive/test021.jvr
Łukasz Czajka ed15e57d8a
JuvixReg parser and pretty printer (#2617)
* Closes #2578 
* Implements JuvixReg parser and pretty printer.
* Adds the `juvix dev reg read file.jvr` command.
* Adds the `reg` target to the `compile` commands.
* Adds tests for the JuvixReg parser.
2024-02-09 12:19:29 +01:00

34 lines
650 B
Plaintext

function f(integer → integer) : integer;
function h(integer, integer) : integer;
function u(integer) : integer;
function main() : *;
function f(integer → integer) : integer {
tmp[0] = 5;
tmp[1] = arg[0];
tcall tmp[1] (tmp[0]);
}
function h(integer, integer) : integer {
tmp[0] = arg[1];
tmp[1] = arg[0];
tmp[0] = add tmp[1] tmp[0];
ret tmp[0];
}
function u(integer) : integer {
prealloc 3, live: (arg[0]);
tmp[0] = arg[0];
tmp[1] = 4;
tmp[1] = calloc h (tmp[1]);
tmp[1] = call f (tmp[1]), live: (tmp[0], arg[0]);
tmp[0] = add tmp[1] tmp[0];
ret tmp[0];
}
function main() : * {
tmp[0] = 2;
tcall u (tmp[0]);
}