diff --git a/scheme/cyclone/macros.sld b/scheme/cyclone/macros.sld
index d514ece2..5c24b115 100644
--- a/scheme/cyclone/macros.sld
+++ b/scheme/cyclone/macros.sld
@@ -27,7 +27,7 @@
       #t)
 
     (define (macro:load-env! defined-macros)
-      (set! *macro-env* (env:extend-environment
+      (set! *macro:env* (env:extend-environment
                           (map car defined-macros)
                           (map cdr defined-macros)
                           env:the-empty-environment)))