From 651f0712cc1349ae152ee6a93302f22c25f89b43 Mon Sep 17 00:00:00 2001 From: Drahflow Date: Sat, 8 Dec 2012 16:55:18 +0100 Subject: Minimal IO possibilities --- examples/non-working/.io.ey.swp | Bin 12288 -> 0 bytes examples/non-working/io.ey | 3 --- examples/working/io.ey | 16 ++++++++++++++++ examples/working/scope.ey | 7 +++++++ 4 files changed, 23 insertions(+), 3 deletions(-) delete mode 100644 examples/non-working/.io.ey.swp delete mode 100644 examples/non-working/io.ey create mode 100644 examples/working/io.ey (limited to 'examples') diff --git a/examples/non-working/.io.ey.swp b/examples/non-working/.io.ey.swp deleted file mode 100644 index 661a09e..0000000 Binary files a/examples/non-working/.io.ey.swp and /dev/null differ 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 -- cgit v1.2.3