From a5a57f9386ce54d37c3b7de31db669b0f5236bf0 Mon Sep 17 00:00:00 2001
From: Aleksey Veresov <aleksey@veresov.pro>
Date: Sat, 17 Oct 2020 17:36:16 +0300
Subject: .

---
 cipher.sts | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'cipher.sts')

diff --git a/cipher.sts b/cipher.sts
index d351397..cdcdc30 100644
--- a/cipher.sts
+++ b/cipher.sts
@@ -1,10 +1,10 @@
 defword cipher
-    3 ref as byte
-    2 get as password
-    1 get as plen
-    0 get as pos
-    pos @ password + @ byte @ xor byte !
-    pos @ 1 + pos !
-    pos @ plen = if 0 pos ! fi
+    3 ref as cipher.byte
+    2 get as cipher.password
+    1 get as cipher.len
+    0 get as cipher.pos
+    cipher.pos @ cipher.password + @ cipher.byte @ xor cipher.byte !
+    cipher.pos @ 1 + cipher.pos !
+    cipher.pos @ cipher.len = if 0 cipher.pos ! fi
     drop drop drop
 exit
-- 
cgit v1.2.3