Re: procedure-source availability

2012-10-08 Thread Panicz Maciej Godek
Hellu! >> Yes, you're right. >> I even went a little further with that and now I also capture lexical >> environment: >> (use-modules (system syntax) (ice-9 local-eval)) >> >> (define-macro (function args . body) >> `(let ((environment (the-environment)) >> (lexical-names (lexical-names

Re: procedure-source availability

2012-10-08 Thread Mark H Weaver
Panicz Maciej Godek writes: > The strange thing was that I had to define the macro ``function'' > using define-macro -- the define-syntax counterpart for some reason > wouldn't work. So for example, if I wrote > (define f (let ((y 5)) (function x (set! y (apply + y x)) y)) > then if ``function'' w