From 246b99687121b3863a931945aa2f3b259adb905a Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Wed, 29 Mar 2023 23:18:06 -0500 Subject: Begin on executable --- wikme.scm | 39 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100644 wikme.scm (limited to 'wikme.scm') diff --git a/wikme.scm b/wikme.scm new file mode 100644 index 0000000..7f992a3 --- /dev/null +++ b/wikme.scm @@ -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 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)) -- cgit 1.4.1-21-gabe81