From 3d8e08ebf6d4d4477452a147d3bfe0329177a9c3 Mon Sep 17 00:00:00 2001
From: Aleksey Veresov <aleksey@veresov.pro>
Date: Fri, 16 Oct 2020 18:24:17 +0300
Subject: Reversed echo.

---
 main.sts | 17 ++++++++++-------
 1 file changed, 10 insertions(+), 7 deletions(-)

diff --git a/main.sts b/main.sts
index 18964bb..f13ae68 100644
--- a/main.sts
+++ b/main.sts
@@ -1,14 +1,17 @@
 module ia32/elf/begin.sts
 
-set_entry
+defarr bigbad 1048576
+
+set_entry ; reversed echo
+    0 ; bigbad index
+    do sys_read 0 = until
+        over bigbad + !
+        1 +
+    od ; bigbad length will be on top of stack
 
     do
-        34 sys_write
-        sys_read
-    0 = until
-        sys_write
-    od
-    drop
+        1 - dup bigbad + @ sys_write
+    dup 0 = untilod drop
 sys_exit
 
 module ia32/elf/end.sts
-- 
cgit v1.2.3