diff options
-rw-r--r-- | common/const.sts | 1 | ||||
-rw-r--r-- | main.sts | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/common/const.sts b/common/const.sts index 46b98e3..b1a08b0 100644 --- a/common/const.sts +++ b/common/const.sts @@ -1,3 +1,4 @@ +defconst newline 0a defconst space 20 defconst '!' 21 defconst '"' 22 @@ -15,6 +15,7 @@ set_entry ; decipher text (length is the same as for ciphertext) 0 0 do dup length = until + 2 print_stack newline sys_write as pos local cipos pos ciphertext + @ password |