X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fframework-null.scm;h=96715271852b45d675353d63717ee68a0dc40f61;hb=af709b0a29faa38843c480d03a1d490b2a03c20e;hp=89fae350c2e0072cbdb4144347ba3c68da1233c5;hpb=84ed119f2e76f41fcd4f4fda0614472717a9816c;p=lilypond.git diff --git a/scm/framework-null.scm b/scm/framework-null.scm index 89fae350c2..9671527185 100644 --- a/scm/framework-null.scm +++ b/scm/framework-null.scm @@ -1,21 +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) - (ice-9 format) - (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) -(define-public (output-framework channel book scopes fields ) - #t) (define-public output-classic-framework output-framework) @@ -24,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)