(load (string-append laml-dir "laml.scm")) (laml-style "simple-html4.0-loose") (write-text-file (html (head (title "Signature Abstractions")) (body (h1 "Signature Abstractions") "Her er mit dokument" (p) "Kurt Nørmark" (br) (a 'href "mailto:normark@cs.auc.dk" "normark@cs.auc.dk") (br) (a 'href "http://www.cs.auc.dk/~normark/" "http://www.cs.auc.dk/~normark/"))) (string-append (startup-directory) laml-source-file-name-without-extension ".html")) |