aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--main.sts6
1 files 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