diff --git a/collects/macro-debugger/expand.ss b/collects/macro-debugger/expand.ss
index 68d64b9..1d52b22 100644
--- a/collects/macro-debugger/expand.ss
+++ b/collects/macro-debugger/expand.ss
@@ -1,6 +1,7 @@
 
 (module expand mzscheme
-  (require "view/gui.ss")
+  (require (lib "unitsig.ss"))
+  (require "view/view.ss")
   (provide expand/step)
 
   (define (expand/step stx)
diff --git a/collects/macro-debugger/view/view.ss b/collects/macro-debugger/view/view.ss
new file mode 100644
index 0000000..166e398
--- /dev/null
+++ b/collects/macro-debugger/view/view.ss
@@ -0,0 +1,13 @@
+
+(module view mzscheme
+  (require (lib "unitsig.ss"))
+  (require "gui.ss")
+  (provide (all-defined))
+
+  (define-values/invoke-unit/sig view^
+    (compound-unit/sig
+      (import)
+      (link (BASE : view-base^ (view-base@))
+            (VIEW : view^ (view@ BASE)))
+      (export (open VIEW))))
+  )
\ No newline at end of file