blob: d0f73b4281176db720955f1e1f5365b43d2426cb (
about) (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
%% Toplevel initialisation file.
#(define-public point-and-click #f)
#(define-public midi-debug #f)
\version "2.3.16"
\include "declarations-init.ly"
#(ly:set-option 'new-relative)
#(ly:set-point-and-click #f)
#(define toplevel-scores '())
#(define $globalheader #f)
\maininput
%% there is a problem at the end of the input file
%%
%% Above and below comments compensate for the parser's look-ahead.
%%
#(if (and (ly:get-option 'old-relative)
(defined? 'input-file-name)
(not (ly:get-option 'old-relative-used)))
(ly:warn (string-append
"\n"
input-file-name ": old relative compatibility was not used."
)))%% there is a problem at the end of the input file
#(if (pair? toplevel-scores)
(ly:parser-print-book parser
(apply ly:make-book $defaultbookpaper $globalheader (reverse toplevel-scores))))
|
