Minimal IO possibilities

4 files changed, 23 insertions, 3 deletions

diff --git a/examples/non-working/.io.ey.swp b/examples/non-working/.io.ey.swp
deleted file mode 100644
index 661a09e..0000000
--- a/examples/non-working/.io.ey.swp
+++ /dev/null
diff --git a/examples/non-working/io.ey b/examples/non-working/io.ey
deleted file mode 100644
index 24803bc..0000000
--- a/examples/non-working/io.ey
+++ /dev/null
@@ -1,3 +0,0 @@
-"io.ey" linux .ORDONLY 0 linux .open /fd defv
-
-fd linux .close
diff --git a/examples/working/io.ey b/examples/working/io.ey
new file mode 100644
index 0000000..51de912
--- /dev/null
+++ b/examples/working/io.ey
@@ -0,0 +1,16 @@
+# ## variant 0
+# 
+# < sys .file with
+#   "io.ey" RO open
+#   512 read
+#   close
+# > -
+
+## variant 1
+
+sys .file /f defv
+"io.ey" f .open
+512 f .read
+f .close
+
+sys .out .writeall
diff --git a/examples/working/scope.ey b/examples/working/scope.ey
index adf7725..b3d57dc 100644
--- a/examples/working/scope.ey
+++ b/examples/working/scope.ey
@@ -9,3 +9,10 @@
 _00 .a dump
     .b dump
     .c
+
+< <
+  "closure" /x defv
+  { x }
+> - /get deff >
+
+.get dump