X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fframework-null.scm;h=96715271852b45d675353d63717ee68a0dc40f61;hb=57f01d7d76f5f682f41da1229fd1fd3ab308201d;hp=a035dc9b927049226604c7d545402455011cde90;hpb=f2f3bda6c3dd0ee1a1be7b2a5ca6a2c3d836ba9c;p=lilypond.git diff --git a/scm/framework-null.scm b/scm/framework-null.scm index a035dc9b92..9671527185 100644 --- a/scm/framework-null.scm +++ b/scm/framework-null.scm @@ -1,20 +1,20 @@ -;; module for benchmarking. +;;;; framework-null.scm -- module for benchmarking. (define-module (scm framework-null) #:export (output-framework) ) (use-modules (ice-9 regex) - (ice-9 string-fun) - (guile) - (srfi srfi-1) - (ice-9 pretty-print) - (srfi srfi-13) - (lily)) + (ice-9 string-fun) + (guile) + (srfi srfi-1) + (ice-9 pretty-print) + (srfi srfi-13) + (lily)) (define-public (output-framework channel book scopes fields) - + #t) (define-public output-classic-framework output-framework) @@ -23,5 +23,3 @@ (define-public (convert-to-ps . args) #t) (define-public (convert-to-pdf . args) #t) (define-public (convert-to-png . args) #t) -(define-public (convert-to-dvi . args) #t) -(define-public (convert-to-tex . args) #t)