(Arne Babenhauserheide)
2014-01-09: one 2**32 calculation less. one 2**32 calculation less.
diff --git a/examples/tinyenc.w b/examples/tinyenc.w
--- a/examples/tinyenc.w
+++ b/examples/tinyenc.w
@@ -64,7 +64,7 @@ define : encrypt v k
v0 v0
v1 v1
if : = cycle 32
- + v1 : * v0 : integer-expt 2 32
+ + v1 : * v0 uint32-limit
let : : v0tmp : uint32 : + v0 : v0change k0 v1 sum k1
loop
uint32 : + sum delta
@@ -81,7 +81,7 @@ define : decrypt v k
v0 v0
v1 v1
if : = cycle 32
- + v1 : * v0 : integer-expt 2 32
+ + v1 : * v0 uint32-limit
; (x-y) mod N is the same as (x mod N) - (y mod N)
let : : v1tmp : uint32 : - v1 : v1change k2 v0 sum k3
loop