style

6 years ago · b137554658
parent 4e3baaab17
commit b137554658
1 changed files with 5 additions and 5 deletions
--- a/txexpr/main.rkt
+++ b/txexpr/main.rkt
@ -1,13 +1,13 @@
 #lang racket/base

-(define-syntax-rule (r+p modname ...)
+(define-syntax-rule (r+p MODNAME ...)
  (begin
    (begin
-      (require modname)
-      (provide (all-from-out modname))
+      (require MODNAME)
+      (provide (all-from-out MODNAME))
      (module+ safe
-        (require (submod modname safe))
-        (provide (all-from-out (submod modname safe))))) ...))
+        (require (submod MODNAME safe))
+        (provide (all-from-out (submod MODNAME safe))))) ...))

 (r+p "base.rkt"
     "stx.rkt"