From 9eadc7bac8863b7fd3a39edc9ba31cf4d3b5ab95 Mon Sep 17 00:00:00 2001
From: Aleksey Veresov <aleksey@veresov.pro>
Date: Sun, 18 Oct 2020 16:24:52 +0300
Subject: It's alive!

---
 main.sts | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/main.sts b/main.sts
index ae0966a..f112c30 100644
--- a/main.sts
+++ b/main.sts
@@ -196,14 +196,14 @@ set_entry float_init ; this is program with floats
     ; output text
     length do 1 -
         dup word_size mul plaintext + @ sys_write
-    dup 0 = untilod drop
+    dup 1 = untilod drop
     length do 1 -
         swap drop
-    dup 0 = untilod drop
+    dup 1 = untilod drop
 
     ; output key
     keylen do 1 -
-        swap sys_write_err
+        dup word_size mul key + @ sys_write_err
     dup 0 = untilod drop newline sys_write_err
 sys_exit
 
-- 
cgit v1.2.3