+;;(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 #t)))
+
+(call-with-output-file "markup-list-commands.tely"
+ (lambda (port)
+ (dump-node (markup-list-doc-node) port 2 #t)))
+