* lily/parse-scm.cc: add missing header files for

[lilypond.git] / scm / output-lib.scm

diff --git a/scm/output-lib.scm b/scm/output-lib.scm
index 805e5711242aa9560e556c3ad4f898cd4803bbca..b31d0bed133e757eea1f0eb62a2c1533e9a6b8a8 100644 (file)
--- a/scm/output-lib.scm
+++ b/scm/output-lib.scm
@@ -107,10 +107,8 @@
 ;; do nothing in .scm output
 (define-public (comment s) "")
 
-(define-public (numbers->string l)
-  (apply string-append (map ly:number->string l)))
-
-; (define (chop-decimal x) (if (< (abs x) 0.001) 0.0 x))
+(define-public (numbers->string lst)
+  (apply string-append (map ly:number->string lst)))
 
 (define (number->octal-string x)
   (let* ((n (inexact->exact x))