This is the mail archive of the guile@cygnus.com mailing list for the guile project.

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]

Testing availabilty of a procedure

Hi,

I try to test wether a procedure is defined, and define
it if it isn't:

(if (procedure? a)
    #t
    (define (a) #t))

but if a isn't defined at all, this doesn't work.
Any other ideas?


thanks,

Ingo

-- 
Ingo Hohmann <ingo.hohmann@gmx.de>