]> git.donarmstrong.com Git - lilypond.git/commitdiff
Remove obsolete object key code.
authorNeil Puttock <n.puttock@gmail.com>
Sun, 18 Apr 2010 19:08:05 +0000 (20:08 +0100)
committerNeil Puttock <n.puttock@gmail.com>
Sun, 18 Apr 2010 19:08:05 +0000 (20:08 +0100)
lily/include/book.hh
lily/include/lily-proto.hh
lily/include/output-def.hh
lily/include/score.hh
lily/lily-lexer.cc
lily/parser.yy
lily/score-scheme.cc

index 83a645c850265792c8c228ec376e43acb3a3d834..f99b7875f0156ef751dc3b0545513f77125a3436 100644 (file)
@@ -31,7 +31,6 @@ class Book
   DECLARE_SMOBS (Book);
 
 public:
-  string user_key_;
   SCM header_;
   Output_def *paper_;
   SCM scores_;
@@ -39,8 +38,8 @@ public:
   SCM input_location_;
 
   Book (Book const &);
-  Input *origin() const;
-  VIRTUAL_COPY_CONSTRUCTOR(Book, Book);
+  Input *origin () const;
+  VIRTUAL_COPY_CONSTRUCTOR (Book, Book);
   Book ();
   void add_score (SCM);
   void add_bookpart (SCM);
index 04b9b23d53c12b2ecd6b4290c0a1de1438f1214d..afe7d0e73274af790f32fa26cbd45188b5766595 100644 (file)
@@ -129,9 +129,6 @@ class Music_wrapper;
 class Music_wrapper_iterator;
 class Note_performer;
 class Output_def;
-class Object_key;
-class Object_key_dumper;
-class Object_key_undumper;
 class Open_type_font;
 class Output_property;
 class Page_breaking;
@@ -198,7 +195,8 @@ class Translator_group;
 class Transposed_music;
 class yyFlexLexer;
 
-typedef void (*Engraver_void_function_engraver_grob_info) (Engraver *, Grob_info);
+typedef void (*Engraver_void_function_engraver_grob_info) (Engraver *,
+                                                          Grob_info);
 typedef void (*Translator_void_method_ptr) (Translator *);
 
 #endif /* LILY_PROTO_HH */
index 2c63766f7ad31b8c610c57ba04acc1615e6924d2..968779d2025d026e5f3c6e6edcbe9fb0766e4f4a 100644 (file)
@@ -17,8 +17,8 @@
   along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 */
 
-#ifndef MUSIC_OUTPUT_DEF_HH
-#define MUSIC_OUTPUT_DEF_HH
+#ifndef OUTPUT_DEF_HH
+#define OUTPUT_DEF_HH
 
 #include "lily-proto.hh"
 #include "virtual-methods.hh"
@@ -58,7 +58,6 @@ public:
   Output_def *parent_;
   
   Input input_origin_;
-  string user_key_;
 
   Output_def (Output_def const&);
   Output_def ();
@@ -86,9 +85,10 @@ DECLARE_UNSMOB (Output_def, output_def);
 
 
 Font_metric* find_pango_font (Output_def *layout,  SCM descr, Real factor);
-Font_metric *find_scaled_font (Output_def *od, Font_metric *f, Real magnification);
+Font_metric *find_scaled_font (Output_def *od, Font_metric *f,
+                              Real magnification);
 Output_def *scale_output_def (Output_def *def, Real scale);
 
 Real output_scale (Output_def*);
 
-#endif /* MUSIC_OUTPUT_DEF_HH */
+#endif /* OUTPUT_DEF_HH */
index 0e34d2e90be70e051e5ce89a08b1ab7307559a19..7fa687c4e5ca9ae81f5abdf8840da55d764a0fcc 100644 (file)
@@ -35,17 +35,16 @@ class Score
   SCM input_location_;
   SCM header_;
 public:
-  Input *origin() const;
-  vector<Output_def*> defs_;
-  string user_key_;
+  Input *origin () const;
+
+  vector<Output_def *> defs_;
   bool error_found_;
 
   Score ();
   Score (Score const &);
 
   VIRTUAL_COPY_CONSTRUCTOR (Score, Score);
-  
+
   SCM get_music () const;
   void add_output_def (Output_def *def);
   void set_music (SCM music);
index 1c5931dfe90fa04234ca196044f015e9ac9943f5..d3673f2cdfbbea141d3edf80b56727be4285953f 100644 (file)
@@ -23,7 +23,7 @@
 #include <sstream>
 using namespace std;
 
-#include "context.hh"  // for nested_property_alist
+#include "context.hh" // for nested_property_alist
 #include "international.hh"
 #include "interval.hh"
 #include "keyword.hh"
@@ -71,7 +71,6 @@ static Keyword_ent the_key_tab[]
   {"name", NAME},
   {"new", NEWCONTEXT},
   {"notemode", NOTEMODE},
-  {"objectid", OBJECTID},
   {"once", ONCE},
   {"override", OVERRIDE},
   {"paper", PAPER},
@@ -118,7 +117,7 @@ Lily_lexer::Lily_lexer (Sources *sources, Lily_parser *parser)
 Lily_lexer::Lily_lexer (Lily_lexer const &src, Lily_parser *parser)
   : Includable_lexer ()
 {
-  parser_ = parser; 
+  parser_ = parser;
   keytable_ = (src.keytable_) ? new Keyword_table (*src.keytable_) : 0;
   chordmodifier_tab_ = src.chordmodifier_tab_;
   pitchname_tab_stack_ = src.pitchname_tab_stack_;
@@ -204,7 +203,7 @@ Lily_lexer::keyword_list () const
 {
   if (!keytable_)
     return SCM_EOL;
-  
+
   SCM l = SCM_EOL;
   SCM *tail = &l;
   for (vsize i = 0; i < keytable_->table_.size (); i++)
@@ -244,7 +243,6 @@ Lily_lexer::start_main_input ()
   yy_flex_debug = get_program_option ("debug-lexer");
   parser_->set_yydebug (get_program_option ("debug-parser"));
 
-  
   new_input (main_input_name_, sources_);
 
   scm_module_define (scm_car (scopes_),
@@ -372,7 +370,7 @@ SCM
 Lily_lexer::mark_smob (SCM s)
 {
   ASSERT_LIVE_IS_ALLOWED ();
-  
+
   Lily_lexer *lexer = (Lily_lexer *) SCM_CELL_WORD_1 (s);
 
   scm_gc_mark (lexer->chordmodifier_tab_);
index 41e5080f9854651069dcf7c9ef0c798d0b318716..99e15a46d8b2dae649e0b719fe295abc17f03132 100644 (file)
@@ -199,7 +199,6 @@ void set_music_properties (Music *p, SCM a);
 %token MIDI "\\midi"
 %token NAME "\\name"
 %token NOTEMODE "\\notemode"
-%token OBJECTID "\\objectid"
 %token OCTAVE "\\octave"
 %token ONCE "\\once"
 %token OVERRIDE "\\override"
@@ -429,7 +428,6 @@ If we give names, Bison complains.
 %type <scm> number_expression
 %type <scm> number_factor
 %type <scm> number_term
-%type <scm> object_id_setting
 %type <scm> octave_check
 %type <scm> optional_context_mod
 %type <scm> optional_id
@@ -478,10 +476,6 @@ lilypond:  /* empty */
        ;
 
 
-object_id_setting:
-       OBJECTID STRING { $$ = $2; }
-       ;
-
 toplevel_expression:
        lilypond_header {
                PARSER->lexer_->set_identifier (ly_symbol2scm ("$defaultheader"), $1);
@@ -748,9 +742,6 @@ book_body:
                $$->scores_ = SCM_EOL;
                $$->bookparts_ = SCM_EOL;
        }
-       | book_body object_id_setting {
-               $$->user_key_ = ly_scm2string ($2);
-       }
        ;
 
 bookpart_block:
@@ -802,9 +793,6 @@ bookpart_body:
                $$->paper_ = 0;
                $$->scores_ = SCM_EOL;
        }
-       | bookpart_body object_id_setting {
-               $$->user_key_ = ly_scm2string ($2);
-       }
        ;
 
 score_block:
@@ -829,9 +817,6 @@ score_body:
                $$->protect ();
                $$->origin ()->set_spot (@$);
        }
-       | score_body object_id_setting {
-               $$->user_key_ = ly_scm2string ($2);
-       }
        | score_body lilypond_header    {
                $$->set_header ($2);
        }
index 6785ae7e32b084e36339d20a1d7cc47cad5c31da..0fd7be0d6ff7e2aacd3383f8f60f086e033cc161 100644 (file)
@@ -73,7 +73,6 @@ LY_DEFINE (ly_score_header, "ly:score-header",
   return sc->get_header ();
 }
 
-
 LY_DEFINE (ly_score_set_header_x, "ly:score-set-header!",
           2, 0, 0, (SCM score, SCM module),
           "Set the score header.")
@@ -81,13 +80,12 @@ LY_DEFINE (ly_score_set_header_x, "ly:score-set-header!",
   LY_ASSERT_SMOB (Score, score, 1);
   SCM_ASSERT_TYPE (ly_is_module (module), module, SCM_ARG2, __FUNCTION__,
                   "module");
-  
+
   Score *sc = unsmob_score (score);
   sc->set_header (module);
   return SCM_UNSPECIFIED;
 }
 
-
 LY_DEFINE (ly_score_music, "ly:score-music",
           1, 0, 0, (SCM score),
           "Return score music.")
@@ -110,8 +108,7 @@ LY_DEFINE (ly_score_embedded_format, "ly:score-embedded-format",
           2, 0, 0, (SCM score, SCM layout),
           "Run @var{score} through @var{layout} (an output definition)"
           " scaled to correct output-scale already, returning a list of"
-          " layout-lines.  This function takes an optional"
-          " @code{Object_key} argument.")
+          " layout-lines.")
 {
   LY_ASSERT_SMOB (Score, score, 1);
   LY_ASSERT_SMOB (Output_def, layout, 2);