(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