Remove unused utility

drym-org · Dec 7, 2024 · 4f52295 · 4f52295
1 parent 5bd85d1
commit 4f52295
Showing 1 changed file with 1 addition and 5 deletions.
diff --git a/qi-lib/flow/core/private/form-property.rkt b/qi-lib/flow/core/private/form-property.rkt
@@ -18,8 +18,7 @@
 
 (provide form-position?
          attach-form-property
-         tag-form-syntax
-         get-form-property)
+         tag-form-syntax)
 
 (require (only-in racket/function
                   curry))
@@ -43,9 +42,6 @@
 (define (attach-form-property stx)
   (syntax-property stx 'nonterminal 'floe))
 
-(define (get-form-property stx)
-  (syntax-property stx 'nonterminal))
-
 ;; This traverses a syntax object and indiscriminately tags every node
 ;; as a form. If this operation were applied to syntax in the real
 ;; compiler, it would of course lead to the incorrect optimizations we