From 82f82da213ba4503759dda717bdc05af91618350 Mon Sep 17 00:00:00 2001 From: Yuichi Nishiwaki Date: Sun, 3 Aug 2014 14:04:26 +0900 Subject: [PATCH] remove old code that has been commented out for a long --- piclib/prelude.scm | 13 ------------- 1 file changed, 13 deletions(-) diff --git a/piclib/prelude.scm b/piclib/prelude.scm index 35442d50..d6c5ab89 100644 --- a/piclib/prelude.scm +++ b/piclib/prelude.scm @@ -145,19 +145,6 @@ (let ((x (cadr form))) (qq 1 x))))) - #; - (define-syntax let* - (ir-macro-transformer - (lambda (form inject compare) - (let ((bindings (cadr form)) - (body (cddr form))) - (if (null? bindings) - `(let () ,@body) - `(let ((,(caar bindings) - ,@(cdar bindings))) - (let* (,@(cdr bindings)) - ,@body))))))) - (define-syntax let* (er-macro-transformer (lambda (form r compare)