From bc7e3d9a7b1a171e13bbd37b76ed00d9394b4d22 Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Sat, 27 Jun 2015 13:45:02 +0200 Subject: [PATCH] Run scripts/auxiliar/fixscm.sh scm/ly-syntax-constructors.scm --- scm/ly-syntax-constructors.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/scm/ly-syntax-constructors.scm b/scm/ly-syntax-constructors.scm index 423726900b..c987a675ca 100644 --- a/scm/ly-syntax-constructors.scm +++ b/scm/ly-syntax-constructors.scm @@ -35,10 +35,10 @@ (let* ((sig (ly:music-function-signature fun)) (pred (if (pair? (car sig)) (caar sig) (car sig)))) (ly:parser-error - (format #f (_ "~a function cannot return ~a") - (type-name pred) - (value->lily-string m)) - (*location*)) + (format #f (_ "~a function cannot return ~a") + (type-name pred) + (value->lily-string m)) + (*location*)) (and (pair? (car sig)) (cdar sig)))) ;; Music function: Apply function and check return value. -- 2.39.2