On 3/26/07, minh thu <[EMAIL PROTECTED]> wrote:
(define-macro (csg:make-mode-handler mode)
...
`(define ,press '())
`(define ,release '())
`(define (,name+) (print "hello+"))
`(define (,name-) (print "hello-"))))
Only the later `(define ...) is produced. How can I have the three
other ones produced too ?
Wrap the `define' forms in a `begin', like so:
`(begin
(define ,press '())
(define ,release '())
...)
--
Arto Bendiken | http://bendiken.net/
_______________________________________________
Chicken-users mailing list
Chicken-users@nongnu.org
http://lists.nongnu.org/mailman/listinfo/chicken-users
