(load (string-append laml-dir "laml.scm")) (style "demo-quiz") (quiz (list (quiz-entry (question-formulation "What is programmatic WWW authoring?") (answers (list (answer (answer-formulation "Authoring for programmers")) (answer (answer-formulation "Authoring by means of program development"))))) (quiz-entry (question-formulation "What is LAML?") (answers (list (answer (answer-formulation "A markup language in the SGML family")) (answer (answer-formulation "A set of Scheme libraries for textual markup purposes")) (answer (answer-formulation "A Lisp abstracted markup language"))))) ) ) |