mescc: cleanups.
[mes.git] / module / mes / optargs.scm
index 3e3396ce91da79f5635782ff56f23d3eaa854b9c..943e21fab6361d5dce50f527b102395d80834243 100644 (file)
 
 ;;; Code:
 
-;; (define-module (ice-9 optargs)
-;;   #:use-module (system base pmatch)
-;;   #:replace (lambda*)
-;;   #:export-syntax (let-optional
-;;               let-optional*
-;;               let-keywords
-;;               let-keywords*
-;;               define*
-;;                   define*-public
-;;               defmacro*
-;;               defmacro*-public))
+(define-module (ice-9 optargs)
+  #:use-module (system base pmatch)
+  #:replace (lambda*)
+  #:export-syntax (let-optional
+                 let-optional*
+                 let-keywords
+                 let-keywords*
+                 define*
+                  define*-public
+                 defmacro*
+                 defmacro*-public))
 
 ;; let-optional rest-arg (binding ...) . body
 ;; let-optional* rest-arg (binding ...) . body