diff options
Diffstat (limited to 'tests/programs/ftruth.zc')
| -rw-r--r-- | tests/programs/ftruth.zc | 35 |
1 files changed, 19 insertions, 16 deletions
diff --git a/tests/programs/ftruth.zc b/tests/programs/ftruth.zc index 9d24a42..e99f9ed 100644 --- a/tests/programs/ftruth.zc +++ b/tests/programs/ftruth.zc @@ -1,22 +1,25 @@ +namespace; +include rt; + fn main() { let z = 0.0 * -1.0; let p = 0.0; let n = 1.5; - if (z) put_n(1); else put_n(0); - if (p) put_n(1); else put_n(0); - if (n) put_n(1); else put_n(0); - if (!z) put_n(1); else put_n(0); - if (!p) put_n(1); else put_n(0); - if (!n) put_n(1); else put_n(0); - if (z && n) put_n(1); else put_n(0); - if (n && z) put_n(1); else put_n(0); - if (z || n) put_n(1); else put_n(0); - if (n || z) put_n(1); else put_n(0); - if (p || z) put_n(1); else put_n(0); - for (; z;) put_n(9); - put_n(z == p); - put_n(z < p); - put_n(7); - put_c(10); + if (z) rt.put_n(1); else rt.put_n(0); + if (p) rt.put_n(1); else rt.put_n(0); + if (n) rt.put_n(1); else rt.put_n(0); + if (!z) rt.put_n(1); else rt.put_n(0); + if (!p) rt.put_n(1); else rt.put_n(0); + if (!n) rt.put_n(1); else rt.put_n(0); + if (z && n) rt.put_n(1); else rt.put_n(0); + if (n && z) rt.put_n(1); else rt.put_n(0); + if (z || n) rt.put_n(1); else rt.put_n(0); + if (n || z) rt.put_n(1); else rt.put_n(0); + if (p || z) rt.put_n(1); else rt.put_n(0); + for (; z;) rt.put_n(9); + rt.put_n(z == p); + rt.put_n(z < p); + rt.put_n(7); + rt.put_c(10); return 0; } |