wisp
 
(Arne Babenhauserheide)
2014-01-07: remove inactive and deprecated code.

remove inactive and deprecated code.

diff --git a/examples/tinyenc.w b/examples/tinyenc.w
--- a/examples/tinyenc.w
+++ b/examples/tinyenc.w
@@ -28,22 +28,7 @@ define : v1change k2 v0 sum k3
            uint32 : + v0 sum
            uint32 : + k3 : uint32 : ash v0 -5
 
-; TODO: Define a macro with-split-kv which executes its body with let bindings to k0 k1 k2 k3 v0 and v1
-; http://www.gnu.org/software/guile/manual/html_node/Syntax-Case.html#index-with_002dsyntax
-define-syntax with-split-vk
-    syntax-rules :
-      : with-split-vk v k exp exp* ...
-          let ; TODO: This defines syntmp-v0-# instead of v0. TODO: report bug: this breaks hygiene: (define-syntax with-car-a-cdr-b (syntax-rules () ((_ some-list exp exp* ...) (let ((a (car some-list))(b (cdr some-list))) exp exp* ...)))) (with-car-a-cdr-b (list "1" "2" "3") (display syntmp-a-235)) - adjust syntmp-a-# as needed. To avoid: walk the code to ensure that no used variables are bound.
-            : v0 : uint32 : ash v -32
-              v1 : uint32 v
-              k0 : uint32 : ash k -96
-              k1 : uint32 : ash k -64
-              k2 : uint32 : ash k -32
-              k3 : uint32 k
-            . exp exp* ...
-
-
-; TODO: Define a macro with-split-kv which executes its body with let bindings to k0 k1 k2 k3 v0 and v1
+; Define a macro with-split-kv which executes its body with let bindings to k0 k1 k2 k3 v0 and v1
 ; Use syntax-case to be able to break hygiene.
 ; http://www.gnu.org/software/guile/manual/html_node/Syntax-Case.html#index-with_002dsyntax
 define-syntax with-split-vk