about summary refs log tree commit diff stats
path: root/subx/examples/ex4.k2
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2018-09-22 00:16:21 -0700
committerKartik Agaram <vc@akkartik.com>2018-09-22 00:16:21 -0700
commit08c2f2a5ce0a55c1b33314309ab857d305a0e58b (patch)
treee50605d4c4a11599c8abbc13e58e52da44f1677b /subx/examples/ex4.k2
parent3f8597bc3d44ab26536b080ae00e3b66202137d6 (diff)
downloadmu-08c2f2a5ce0a55c1b33314309ab857d305a0e58b.tar.gz
4587
Diffstat (limited to 'subx/examples/ex4.k2')
-rw-r--r--subx/examples/ex4.k217
1 files changed, 0 insertions, 17 deletions
diff --git a/subx/examples/ex4.k2 b/subx/examples/ex4.k2
deleted file mode 100644
index ad968eaf..00000000
--- a/subx/examples/ex4.k2
+++ /dev/null
@@ -1,17 +0,0 @@
-# variables are always references
-#   read their address with their names: x (can't write to their address)
-#   read/write their contents with a lookup: *x
-var x : char
-
-fn main [
-  call read 0/stdin, x, 1/size  # watch out; reading a global may not be possible in all instructions
-                                # but the address is more easily obtained
-  result/EAX <- call write 1/stdout, x, 1/size
-  call exit, result/EAX
-]
-
-fn exit x : int [
-  code/EBX <- copy x
-  code/EAX <- copy 1/exit
-  syscall
-]