diff options
Diffstat (limited to 'dnw/forms.scm~')
-rw-r--r-- | dnw/forms.scm~ | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/dnw/forms.scm~ b/dnw/forms.scm~ new file mode 100644 index 0000000..99813a7 --- /dev/null +++ b/dnw/forms.scm~ @@ -0,0 +1,22 @@ +(define-module (dnw forms.el-to-html)) + +;; Idea: function that takes in a git repository link pointing to something containing a forms file pair, +;; and reads it in along with a mapping between whatever Elisp functions you use in forms-format-list +;; and equivalent Scheme implementations (bc I can't figure out how to programmatically use Guile's Elisp support). + +(define (forms.el->shtml git-link)) + +(define (forms.el-parse file) + (define-peg-string-patterns + "form-control-file <- (comment/whitespace/setq)+ +comment < ';' (!'\n')* '\n' +whitespace < [\r\n\t ]+ +setq < '(' whitespace? 'setq' whitespace name-val-pair whitespace? ')' + +name-val-pair <- forms-file/forms-format-list/forms-number-of-fields/forms-field-sep +/forms-read-only/forms-multi-line/forms-read-file-filter/forms-write-file-filter +/forms-new-record-filter/forms-insert-after/forms-check-number-of-fields + +value <- string/quoted/ + +")) |