aboutsummaryrefslogtreecommitdiff
path: root/tests/programs/o3bytes.zc
diff options
context:
space:
mode:
Diffstat (limited to 'tests/programs/o3bytes.zc')
-rw-r--r--tests/programs/o3bytes.zc51
1 files changed, 27 insertions, 24 deletions
diff --git a/tests/programs/o3bytes.zc b/tests/programs/o3bytes.zc
index bada583..7c971ed 100644
--- a/tests/programs/o3bytes.zc
+++ b/tests/programs/o3bytes.zc
@@ -1,52 +1,55 @@
+namespace;
+include rt;
+
// byte ops called from o3 stay in the region. ld8/st8 and the 16- and 32-bit
// pair are opcodes there, on the interpreter, the arm64 jit and llvm.
-fn sp() { put_c(32); return 0; }
+fn sp() { rt.put_c(32); return 0; }
fn litw(v) { return v + v + 1; }
-fn f() { put_c('A'); return 0; }
+fn f() { rt.put_c('A'); return 0; }
fn main() {
let buf[4], b, i, s, t, p, v, w;
i = 0;
while (i < 4) { buf[i] = 0; i++; }
- b = addr_b(buf);
+ b = rt.addr_b(buf);
i = 0;
s = 0;
o3 {
while (i < 20) {
t = b + i;
- st8(t, i);
- s = s + ld8(t);
+ rt.st8(t, i);
+ s = s + rt.ld8(t);
i++;
}
}
- put_n(s); sp();
- o3 { st16(b, 4660); w = ld16(b); }
- put_n(w); sp();
+ rt.put_n(s); sp();
+ o3 { rt.st16(b, 4660); w = rt.ld16(b); }
+ rt.put_n(w); sp();
t = b + 7;
- o3 { w = ld8(t); }
- put_n(w); sp();
- o3 { w = ld16(t); }
- put_n(w); sp();
+ o3 { w = rt.ld8(t); }
+ rt.put_n(w); sp();
+ o3 { w = rt.ld16(t); }
+ rt.put_n(w); sp();
t = b + 10;
v = 16909060;
- o3 { st32(t, v); w = ld32(t); }
- put_n(w); sp();
+ o3 { rt.st32(t, v); w = rt.ld32(t); }
+ rt.put_n(w); sp();
t = 0 - 1;
- o3 { st8(t, v); w = ld8(t); }
- put_n(w); sp();
- t = addr_b(MW) - 1;
- o3 { w = ld16(t); }
- put_n(w);
- put_c(10);
+ o3 { rt.st8(t, v); w = rt.ld8(t); }
+ rt.put_n(w); sp();
+ t = rt.addr_b(rt.MW) - 1;
+ o3 { w = rt.ld16(t); }
+ rt.put_n(w);
+ rt.put_c(10);
p = f;
f();
while (*p != litw('A')) p++;
- t = addr_b(p);
+ t = rt.addr_b(p);
v = litw('B') & 255;
- o3 { st8(t, v); }
+ o3 { rt.st8(t, v); }
f();
v = litw('C') & 255;
- o3 { st8(t, v); }
+ o3 { rt.st8(t, v); }
f();
- put_c(10);
+ rt.put_c(10);
return 0;
}