]> git.donarmstrong.com Git - lilypond.git/blob - lily/program-option.cc
Run `make grand-replace'.
[lilypond.git] / lily / program-option.cc
1 /* 
2   program-option.cc -- program options, non-scheme.
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 2007--2008 Han-Wen Nienhuys <hanwen@lilypond.org>
7   
8 */
9
10 #include "program-option.hh"
11
12 string
13 get_output_backend_name ()
14 {
15   return ly_symbol2string (ly_get_option (ly_symbol2scm ("backend")));
16 }
17
18 bool
19 get_program_option (const char *s)
20 {
21   SCM sym = ly_symbol2scm (s);
22
23   return to_boolean (ly_get_option (sym));
24 }
25