remove file.

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

diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm
index 6343e9dba158e4542c843b169617515ff7b0d158..247656c215cd41a89b185e4558da23aebef39971 100644 (file)
--- a/scm/framework-ps.scm
+++ b/scm/framework-ps.scm
@@ -269,6 +269,11 @@
     (postprocess-output book framework-ps-module filename (ly:output-formats)) 
 ))
 
+(if (not (defined? 'nan?))
+    (define (nan? x) #f))
+(if (not (defined? 'inf?))
+    (define (inf? x) #f))
+
 (define-public (output-preview-framework basename book scopes fields )
   (let* ((filename (format "~a.ps" basename))
         (outputter  (ly:make-paper-outputter filename