* scm/ps-to-png.scm (make-ps-images): fix rename-page-1 functionality.

[lilypond.git] / lily / program-option.cc

diff --git a/lily/program-option.cc b/lily/program-option.cc
index c4b2d0c856272a97715510bfc1a1a678622c2806..df34039661761ec6180f486c6c5abf9c16d6c56c 100644 (file)
--- a/lily/program-option.cc
+++ b/lily/program-option.cc
@@ -33,6 +33,13 @@ bool lily_1_8_compatibility_used = false;
 bool do_internal_type_checking_global;
 
 
+struct Lilypond_option_init
+{
+  char const *name_;
+  char const *init_;
+  char const *descr_;
+};
+
 static Lilypond_option_init options[] = {
   {"point-and-click", "#t",
    "use point & click"},
@@ -53,8 +60,13 @@ static Lilypond_option_init options[] = {
    "include book-titles in preview images."},
   {"gs-font-load", "#f",
    "load fonts via Ghostscript."},
+  {"delete-intermediate-files", "#f",
+   "delete unusable PostScript files"},
+  {"verbose", "#f", "value for the --verbose flag"},
   {"ttf-verbosity", "0",
    "how much verbosity for TTF font embedding?"},
+  {"debug-gc", "#f",
+   "dump GC protection info"}, 
   {0,0,0},
 };
 
@@ -168,8 +180,8 @@ Protected_scm command_line_settings = SCM_EOL;
 LY_DEFINE (ly_option_usage, "ly:option-usage", 0, 0, 0, (),
           "Print ly:set-option usage")
 {
-  SCM stdout = scm_current_output_port();
-  scm_display (ly_get_option (ly_symbol2scm ("help")), stdout);
+  SCM scm_stdout = scm_current_output_port();
+  scm_display (ly_get_option (ly_symbol2scm ("help")), scm_stdout);
   exit (0);
   return SCM_UNSPECIFIED;
 }