How can I go about using for-each in this example for the group function to
accept an arbitrary number of parts ?

\version "2.25.7"

parts = #(list
          #{ {c'} #}
          #{ {d'} #}
          #{ {e'} #}
          #{ {f'} #} )

group =
#(define-music-function
  (parts) (list?)
  #{\new StaffGroup <<
    %#(for-each (lambda (part) part) parts)
    #(car parts)
    #(car (cdr parts))
    #(car (cdr (cdr parts)))
    #(car (cdr (cdr (cdr parts))))
  >>#})

\group \parts

-- 
*Pierre-Luc Gauthier*

Reply via email to