suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

chunks are translated to subsections -- not working right yet, but save a checkpoint

Browse Source 
svn: r13651

original commit: 3467bf2ce644a276e4748c0ebdf8b734581f4869
This commit is contained in:
Eli Barzilay 2009-02-16 03:19:05 +00:00
parent 5b8c9ce05a
commit c62039efce
2 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/games/chat-noir/chat-noir-doc.ss
View File

@ -1,3 +0,0 @@
#lang scribble/doc
@(require "literate-doc-wrapper.ss")
@(include "chat-noir-literate.ss")

7
collects/games/chat-noir/literate-doc-wrapper.ss
View File

@ -10,11 +10,12 @@
;; define `chunk' as a macro that typesets the code ;; define `chunk' as a macro that typesets the code
(define-syntax-rule (chunk name expr ...) (define-syntax-rule (chunk name expr ...)
(make-splice (list (emph (scheme name) " ::=") (make-splice (list (subsection #:tag (format "~a" 'name)
(scheme name))
(schemeblock expr ...)))) (schemeblock expr ...))))
;; HACK: provide a fake `module', which makes it possible to include a module ;; HACK: provide a fake `module', which makes it possible to include a module
;; and get only its code in. ;; and get only its code in.
(provide module) (provide module)
(define-syntax module (define-syntax-rule (module name base body ...)
(syntax-rules () [(module name base body ...) (begin body ...)])) (begin body ...))