On 7/21/05, Dale Jordan <[EMAIL PROTECTED]> wrote:
> I have been experimenting with the implementation of srfi-57 which uses
> syntax-case and its module system.  Under Chicken-1.89 I had added (at
> toplevel) a procedure definition to srfi-57.scm that was used in most of
> the modules.  To be precise it was the following:
> 
> (define symbolic-identifier=?
>    (lambda (x y)
>       (eq? (syntax-object->datum x)
>            (syntax-object->datum y))))
> 

This should work (at the top of srfi-57.scm):

(eval-when (compile) (load "srfi-57.scm"))

(define (symbolic-identifier=? ...) ...)

...


cheers,
felix


_______________________________________________
Chicken-users mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/chicken-users

Reply via email to