From: fred <fred>
Date: Sun, 24 Mar 2002 19:29:09 +0000 (+0000)
Subject: lilypond-0.0.27
X-Git-Tag: release/1.5.59~5537
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=7d0309c34ebcdfbb68c9400f344ebf9af6bd4d22;p=lilypond.git

lilypond-0.0.27
---

diff --git a/hdr/identifier.hh b/hdr/identifier.hh
index 04bee62255..0c9b252afa 100644
--- a/hdr/identifier.hh
+++ b/hdr/identifier.hh
@@ -19,16 +19,16 @@
 struct Idclass : Identifier {\
     virtual const char *classname() { return #Class; }\
     Idclass(String s, Class*st):Identifier(s) { data = st; }\
-    virtual Class* accessor(bool copy=false) {\
+    virtual Class* accessor(bool copy) {\
 	if (copy)\
 	    return new Class(* (Class*) data);\
 	else\
 	    return (Class*) data;\
     }\
-    ~Idclass() { delete accessor(); }\
+    ~Idclass() { delete accessor(false); }\
 }\
 
-
+make_id_class(Real_id, Real, real);
 make_id_class(Script_id, Script_def, script);
 make_id_class(Lookup_id, Lookup, lookup);
 make_id_class(Symtables_id, Symtables, symtables);
diff --git a/hdr/identparent.hh b/hdr/identparent.hh
index c74be844c8..da7ab7012c 100644
--- a/hdr/identparent.hh
+++ b/hdr/identparent.hh
@@ -9,8 +9,10 @@
 
 #include "proto.hh"
 #include "string.hh"
+
+/* boolean argument to accesor is copy_b..*/
 #define IDACCESSOR( Input_staff, staff)\
-    virtual Input_staff * staff(bool = false) { error(#Input_staff); return 0; }
+    virtual Input_staff * staff(bool) { error(#Input_staff); return 0; }
 
 struct Identifier {
     void *data;
@@ -27,6 +29,7 @@ struct Identifier {
     IDACCESSOR(Symtables, symtables)
     IDACCESSOR(Music_general_chord, mchord)
     IDACCESSOR(Lookup,lookup)
+    IDACCESSOR(Real,real)
     IDACCESSOR(Notename_tab, notename_tab)
 private:
     Identifier(Identifier const&){}