lily/general-script-def.cc

   1 /*
   2   general-script-def.cc -- implement General_script_def
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9
  10 #include "general-script-def.hh"
  11 #include "debug.hh"
  12 #include "symbol.hh"
  13 int
  14 General_script_def::staff_dir_i()const
  15 {
  16   return -1;
  17 }
  18 int
  19 General_script_def::rel_stem_dir_i()const
  20 {
  21   return 0;
  22 }
  23 int
  24 General_script_def::priority_i()const
  25 {
  26   return 1000;
  27 }
  28
  29 bool
  30 General_script_def::inside_b()const
  31 {
  32   return false;
  33 }
  34
  35 bool
  36 General_script_def::equal_b (General_script_def const&g)const
  37 {
  38   if (name() != g.name ())
  39         return false;
  40
  41   return do_equal_b (&g);
  42 }
  43
  44 bool
  45 General_script_def::do_equal_b (General_script_def const*)const
  46 {
  47   return true;
  48 }
  49
  50
  51 void
  52 General_script_def::print() const
  53 {
  54   DOUT << name() << "{";
  55   do_print();
  56   DOUT << "}";
  57 }
  58
  59 void
  60 General_script_def::do_print() const
  61 {
  62 }
  63
  64 Atom
  65 General_script_def::get_atom (Paper_def*, int)const
  66 {
  67   Symbol s;
  68   return Atom (s);
  69 }
  70
  71 IMPLEMENT_IS_TYPE_B(General_script_def);