[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Kawa-commonlisp-dev] tagbodies
From: |
Charles Turner |
Subject: |
Re: [Kawa-commonlisp-dev] tagbodies |
Date: |
Fri, 27 Jul 2012 18:34:48 +0100 |
On 27 July 2012 17:14, Jamison Hope <address@hidden> wrote:
> So since we now have a working FLET, how about something like this:
>
> (define-syntax labels
> (syntax-rules ()
> ((labels ((fname parameters body ...) ...) e ...)
> (flet ((fname parameters #!void) ...)
> (set! #'fname (lambda parameters body ...)) ...
> e ...))))
Thanks Jamison. That works for me too.
Charles.
Re: [Kawa-commonlisp-dev] tagbodies, Charles Turner, 2012/07/27