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)]))