Begin on executable

1 files changed, 39 insertions, 0 deletions

@@ -0,0 +1,39 @@
+;;; wikme.scm --- build a wiki from a folder of markdown --- executable
+
+(import (args)
+        (chicken process-context)
+        (chicken port))
+
+(include "src/wikme")
+
+
+
+  ;; (make-wiki base-url                   ; base URL for links
+  ;;            origin-dir                 ; origin directory
+  ;;            destination-dir            ; destination directory
+  ;;            page-template              ; template for pages
+  ;;            file-transformers          ; list of filename transformers
+  ;;            transformers               ; list of source transformer functions
+  ;;            pages                      ; list of <page>s
+  ;;            )
+
+
+(define options
+  (list (args:make-option )))
+
+
+
+(define (usage)
+  (with-output-to-port (current-error-port)
+    (lambda ()
+      (print "Usage: " (car (argv)) " [options...] [directory]")
+      (newline)
+      (print (args:usage options))))
+  (exit 1))
+
+(define (main args)
+  (receive (options operands)
+      (args:parse args options)
+    #f))
+
+(main (command-line-arguments))