scm/framework-null.scm

   1 ;; module for benchmarking.
   2
   3 (define-module (scm framework-null)
   4   #:export (output-framework)
   5   )
   6
   7 (use-modules (ice-9 regex)
   8              (ice-9 string-fun)
   9              (ice-9 format)
  10              (guile)
  11              (srfi srfi-1)
  12              (ice-9 pretty-print)
  13              (srfi srfi-13)
  14              (lily))
  15
  16 (define-public (output-framework channel book scopes fields )
  17
  18
  19   #t)
  20
  21 (define-public output-classic-framework output-framework)
  22
  23
  24 (define-public (convert-to-ps . args) #t)
  25 (define-public (convert-to-pdf . args) #t)
  26 (define-public (convert-to-png . args) #t)
  27 (define-public (convert-to-dvi . args) #t)
  28 (define-public (convert-to-tex . args) #t)