remove old code that has been commented out for a long

This commit is contained in:
Yuichi Nishiwaki 2014-08-03 14:04:26 +09:00
parent 3f2b1d85bf
commit 82f82da213
1 changed files with 0 additions and 13 deletions

View File

@ -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)