PNG images.")
(backend ps
"Select backend. Possible values: 'eps, 'null,
-'ps, 'scm, 'svg.")
+'ps, 'scm, 'socket, 'svg.")
(check-internal-types #f
"Check every property assignment for types.")
(clip-systems #f
(verbose ,(ly:command-line-verbose?)
"Value of the --verbose flag (read-only).")
(warning-as-error #f
-"Exit if an undefined stencil expression is
-found.")
+"Change all warning and programming_error
+messages into errors.")
))
;; Need to do this in the beginning. Other parts of the Scheme
(if (ly:get-option 'trace-scheme-coverage)
(coverage:enable))
+(if (ly:get-option 'warning-as-error)
+ (begin
+ (set! ly:warning ly:error)
+ (set! ly:programming-error ly:error)))
+
(define-public parser #f)
(recursion-helper (cdr signature) (cdr arguments) (1+ count)))))
(recursion-helper signature arguments 1))
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; output
-
-;; (define-public (output-framework) (write "hello\n"))
-
-(define output-ps-module
- (make-module 1021 (list (resolve-interface '(scm output-ps)))))
-
-(define-public (ps-output-expression expr port)
- (display (eval expr output-ps-module) port))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Safe definitions utility
"part-combiner.scm"
"autochange.scm"
"define-music-properties.scm"
+ "beam-settings.scm"
"auto-beam.scm"
"chord-name.scm"
"paper.scm"
"backend-library.scm"
"x11-color.scm"
+ "tablature.scm"
;; must be after everything has been defined
"safe-lily.scm"))