diff --git a/macro.rkt b/macro.rkt
new file mode 100644
index 0000000..510449a
--- /dev/null
+++ b/macro.rkt
@@ -0,0 +1,13 @@
+#lang racket/base
+(require (for-syntax racket/base))
+
+(provide macro-map)
+
+(define-syntax (macro-map stx)
+  (syntax-case stx ()
+    [(_ macro-name item)
+     #'(macro-name item)]
+    [(_ macro-name item0 items ...)
+     #'(begin
+         (macro-name item0)
+         (macro-map macro-name items ...))]))