release: 1.1.1

[lilypond.git] / lily / script-def.cc

diff --git a/lily/script-def.cc b/lily/script-def.cc
index 5a9c3a65b389b36c73fb3387f6618d0d2142bbea..daf721f0416ac8327228cd3d98e07a0356839e31 100644 (file)
--- a/lily/script-def.cc
+++ b/lily/script-def.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1996, 1997--1998 Han-Wen Nienhuys <hanwen@stack.nl>
+  (c) 1996, 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
 #include "debug.hh"
@@ -46,8 +46,8 @@ Script_def::do_print() const
 bool
 Script_def::do_equal_b (General_script_def const *g) const 
 {
-  Script_def const * c = (Script_def const*) g;
-  return (symidx_str_ == c->symidx_str_ &&
+  Script_def const * c = dynamic_cast<Script_def const*> (g);
+  return c&& (symidx_str_ == c->symidx_str_ &&
          rel_stem_dir_ == c->rel_stem_dir_&&
          staff_dir_ == c->staff_dir_&&
          invertsym_b_ == c->invertsym_b_);
@@ -78,7 +78,7 @@ Script_def::get_atom (Paper_def *p , Direction d) const
   if (invertsym_b_)
     preidx_str = (d < 0)? "d" : "u";
 
-  return p->lookup_l()->script (preidx_str + symidx_str_);
+  return p->lookup_l(0)->script (preidx_str + symidx_str_);
 }