diff --git a/syndicate/syntax.rkt b/syndicate/syntax.rkt
index 7d24a8f..2315b5b 100644
--- a/syndicate/syntax.rkt
+++ b/syndicate/syntax.rkt
@@ -330,11 +330,11 @@
                                                    (lambda ()
                                                      #,script-stx)))))))))]
     [(asserted P)
-     (analyze-asserted/retracted outer-expr-stx when-pred-stx script-stx #t #'P priority-stx)]
+     (analyse-asserted/retracted outer-expr-stx when-pred-stx script-stx #t #'P priority-stx)]
     [(retracted P)
-     (analyze-asserted/retracted outer-expr-stx when-pred-stx script-stx #f #'P priority-stx)]))
+     (analyse-asserted/retracted outer-expr-stx when-pred-stx script-stx #f #'P priority-stx)]))
 
-(define-for-syntax (analyze-asserted/retracted outer-expr-stx
+(define-for-syntax (analyse-asserted/retracted outer-expr-stx
                                                when-pred-stx
                                                script-stx
                                                asserted?