bug-guile
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Errors using `reload' command


From: Andy Wingo
Subject: Re: Errors using `reload' command
Date: Wed, 09 Feb 2011 09:20:23 +0100
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/23.2 (gnu/linux)

On Tue 08 Feb 2011 23:58, Andy Wingo <address@hidden> writes:

> On Thu 03 Feb 2011 20:18, Mark Harig <address@hidden> writes:
>
>> scheme@(guile-user)> ,re (ice-9 readline)
>
> Actually now this causes an infinite loop.  Doh.  We need defvar,
> somehow...

What do people think about this:

    (define-syntax define-once
      (syntax-rules ()
        ((_ sym val)
         (define sym (if (defined? 'sym) sym val)))))

Should work, no?  I added this to boot-9 locally and used it in readline
and it appears to work fine.

Andy
-- 
http://wingolog.org/



reply via email to

[Prev in Thread] Current Thread [Next in Thread]