release: 0.0.27

[lilypond.git] / hdr / identifier.hh

diff --git a/hdr/identifier.hh b/hdr/identifier.hh
index 04bee62255fe6053d8c967d6ee51e61db15e6f45..0c9b252afa3eeed26ab48bdd8aa36c11da5a5729 100644 (file)
--- 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);