From e052c33998fd5ac388885daad89a2b1b6c1fdabe Mon Sep 17 00:00:00 2001
From: jon <jon@jon-laptop.(none)>
Date: Wed, 21 Apr 2010 17:59:34 -0600
Subject: [PATCH] add hook for parsing transformers

---
 collects/honu/private/language.ss | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 collects/honu/private/language.ss

diff --git a/collects/honu/private/language.ss b/collects/honu/private/language.ss
new file mode 100644
index 0000000000..ea77b5ef0d
--- /dev/null
+++ b/collects/honu/private/language.ss
@@ -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)]))