conservatory/ikarus - ikarus - Scheme.org Gitea

2 lines

5 B

Plaintext

Raw Normal View History

- added the ability to inject arbitrary compile time values using: (define-syntax foo (make-compile-time-value <expr>)) The value can be retrieved using curried macro transformers. E.g., (let-syntax ([idval (lambda (x) (syntax-case x () [(_ id) (lambda (rho) (with-syntax ([val (datum->syntax #'here (rho #'id))]) #''val))]))]) (let-syntax ([ctval (make-compile-time-value 'foo)]) (list (idval ctval) (idval others)))) ;=> (foo #f)

2008-11-14 04:32:08 -05:00

1676