-%% #(set! point-and-click line-column-location)
-
-%% We want this to perfectly match the Baerenreiter spacing.
-%% If we're not using 6 systems, there's definately a problem.
-#(define (assert-system-count smob n)
- (let ((systems (length (Spanner::get_broken_into
- (Grob::original_scm
- (Grob::line_scm smob))))))
- (if (not (equal? n systems))
- ;; Can't use error yet, as we know that we're not using 6...
- ;;(error
- (warn
- (string-append "Got " (number->string systems)
- " systems (expecting " (number->string n))))))
-
+#(set! point-and-click line-column-location)
+
+forcedBreak = \notes { }
+%%forcedBreak = \notes { \break }
+forcedLastBreak = \notes { \break }
+%%forcedLastBreak = \notes { }
+