]> git.donarmstrong.com Git - lilypond.git/blob - lily/general-script-def.cc
release: 0.1.11
[lilypond.git] / 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 Direction
14 General_script_def::staff_dir() const
15 {
16   return DOWN;
17 }
18
19 Direction
20 General_script_def::rel_stem_dir() const
21 {
22   return CENTER;
23 }
24 int
25 General_script_def::priority_i() const
26 {
27   return 1000;
28 }
29
30 bool
31 General_script_def::inside_b() const
32 {
33   return false;
34 }
35
36 bool
37 General_script_def::equal_b (General_script_def const&g) const
38 {
39   if (name() != g.name ())
40     return false;
41
42   return do_equal_b (&g);
43 }
44
45 bool
46 General_script_def::do_equal_b (General_script_def const*) const
47 {
48   return true;
49 }
50
51
52 void
53 General_script_def::print() const
54 {
55   DOUT << name() << "{";
56   do_print();
57   DOUT << "}";
58 }
59
60 void
61 General_script_def::do_print() const
62 {
63 }
64
65 Atom
66 General_script_def::get_atom (Paper_def*, Direction) const
67 {
68   Symbol s;
69   return Atom (s);
70 }
71
72 IMPLEMENT_IS_TYPE_B(General_script_def);