add hook for parsing transformers

This commit is contained in:
jon 2010-04-21 17:59:34 -06:00 committed by Jon Rafkind
parent 35f64145ca
commit e052c33998

View File

@ -0,0 +1,10 @@
#lang scheme
(require (for-syntax syntax/parse))
(provide (all-defined-out))
(define-syntax (field-access stx)
(syntax-parse stx
[(_ field object)
#'(get-field field object)]))