quebex

 1export function w $main(l %s0, l %s1) {
 2@start
 3	storew 1, %s0
 4	blit %s0, %s1, 8
 5	jmp @bla
 6@bla
 7	%A0 =l alloc4 8
 8	storew 43,  %A0
 9	hlt
10}
11
12export function s $foo(s %s0, s %s1) {
13@start
14	ret %s0
15}