make internal unstable/debug require/provide unconditional

as now in any case included in `deps`
bldl · Apr 9, 2016 · 2b78e8e · 2b78e8e
1 parent 3f45aa8
commit 2b78e8e
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 20 deletions.
diff --git a/util/debug.rkt b/util/debug.rkt
@@ -3,6 +3,5 @@
 #|
 |#
 
-(require "module.rkt")
-
-(require*-if-declared unstable/debug)
+(require unstable/debug)
+(provide (all-from-out unstable/debug))
diff --git a/util/module.rkt b/util/module.rkt
@@ -175,23 +175,6 @@
          #'(begin)
          #'(require spec ...))]))
 
-(define-syntax (when-module-declared stx)
-  (syntax-parse stx
-    [(_ mod:expr load:boolean code:expr ...+)
-     (if (module-declared? (syntax->datum #'mod) (syntax-e #'load))
-         #'(begin code ...)
-         #'(begin))]))
-
-(define-syntax-rule* (require-if-declared mod ...)
-  (begin
-    (when-module-declared mod #f (require mod))
-    ...))
-
-(define-syntax-rule* (require*-if-declared mod ...)
-  (begin
-    (when-module-declared mod #f (require* mod))
-    ...))
-
 (define-syntax* (define-generics* stx)
   (define-splicing-syntax-class opts
     (pattern