diff --git a/test/active/clojure/record_test.cljc b/test/active/clojure/record_test.cljc
index 12948d6..2fc7077 100644
--- a/test/active/clojure/record_test.cljc
+++ b/test/active/clojure/record_test.cljc
@@ -768,3 +768,10 @@
          canif?
          [])
        "Illegal argument")))
+
+(deftest typo-in-field-name-test
+  (is (throws-exception?
+       (define-record-type Schlingel
+         (make-schlingel name) schlingel?
+         [nam schlingel-name])
+       "Illegal argument")))