diff --git a/src/gerbil/core/expander.ss b/src/gerbil/core/expander.ss
index 570eb5566..944dd6e7e 100644
--- a/src/gerbil/core/expander.ss
+++ b/src/gerbil/core/expander.ss
@@ -41,7 +41,7 @@ package: gerbil/core
     current-expander-path
     current-expander-phi
     current-expander-compiling?
-    current-compilation-target?
+    current-compilation-target
     current-module-reader-path
     current-module-reader-args
     local-context? top-context? module-context? prelude-context?
diff --git a/src/gerbil/core/sugar.ss b/src/gerbil/core/sugar.ss
index 77c02c544..3343c1355 100644
--- a/src/gerbil/core/sugar.ss
+++ b/src/gerbil/core/sugar.ss
@@ -149,7 +149,7 @@ package: gerbil/core
               (syntax->list #'(detail ...))))))
 
   (defrules compilation-target? ()
-    ((_ sym) (eq? (gx#current-compilation-target) 'sym))))
+    ((_ sym) (eq? (current-compilation-target) 'sym))))
 
 (module Sugar-2
   (import Sugar-1 (phi: +1 Sugar-1))