[plt-scheme] define-syntax help

From: Noel Welsh (noelwelsh at yahoo.com)
Date: Thu Mar 22 08:36:08 EDT 2007

Perhaps I'm missing something.  Why not make these functions?


----- Original Message ----
From: "support at taxupdate.com" <support at taxupdate.com>

Given the following:

(define *field-hash* (make-hash-table))
(define (make-key mod sym)
  (string->symbol (format "~a.~a" mod sym)))
(define-syntax (register stx)
 (syntax-case stx ()
  ((_ sym val mod)
   #`(hash-table-put! *field-hash* (make-key 'mod 'sym) val))))
(reqister you "joe" main)
(register you "sue" aux)


Food fight? Enjoy some healthy debate 
in the Yahoo! Answers Food & Drink Q&A.

Posted on the users mailing list.