function hello() { hh\asm(' String "Hello World" RetC '); }
function my_is_int($x) { hh\asm(' IsTypeL $x Int RetC '); }
function f($x) { $y = $x * 100; var_dump(hh\asm(' CGetL $x CGetL $y Add SetL $z PopC # we dont leave anything on the eval stack, # so the emitter should push null ')); return $z; }
function salut($hello) { var_dump(hh\asm(' CGetL $hello JmpZ goodbye String "Hello\\n" Jmp done goodbye: String "Goodbye\\n" done: Print PopC Int 42 ')); }