"document-functions.scm"
"document-translation.scm"
"document-music.scm"
+ "document-type-predicates.scm"
"document-identifiers.scm"
"document-backend.scm"
"document-markup.scm"))
(slot-ref (all-scheme-functions-doc) 'text)
(open-output-file "scheme-functions.tely"))
-;;(display
+;;(display
;; (markup-doc-string)
;; (open-output-file "markup-commands.tely"))
-(call-with-output-file "markup-commands.tely"
- (lambda (port)
- (dump-node (markup-doc-node) port 2)))
+(display
+ ;; ugly hack to remove the @node... @appendixsec... portion
+ (substring
+ (call-with-output-string
+ (lambda (port)
+ (dump-node (markup-doc-node) port 2)))
+ ;; magic number to remove the initial part. 63 comes from:
+ ;; "\nnode Text markup commands\n@appendixsec Text markup commands\n\n\n\n"
+ ;; which is generated by (dump-node...) in documentation-lib.scm
+ 63
+ )
+ (open-output-file "markup-commands.tely"))
-(call-with-output-file "markup-list-commands.tely"
- (lambda (port)
- (dump-node (markup-list-doc-node) port 2)))
+(display
+ (markup-list-doc-string)
+ (open-output-file "markup-list-commands.tely"))
-(display
+(display
+ type-predicates-doc-string
+ (open-output-file "type-predicates.tely"))
+
+(display
(identifiers-doc-string)
(open-output-file "identifiers.tely"))