new file, used for benchmarking.

[lilypond.git] / scm / framework-null.scm

diff --git a/scm/framework-null.scm b/scm/framework-null.scm
new file mode 100644 (file)
index 0000000..89fae35
--- /dev/null
+++ b/scm/framework-null.scm
@@ -0,0 +1,28 @@
+;; 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))
+
+(define-public (output-framework channel book scopes fields )
+
+  
+  #t)
+
+(define-public output-classic-framework output-framework)
+
+
+(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)