]> git.donarmstrong.com Git - lilypond.git/blob - lily/general-script-def.cc
release: 0.1.7
[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 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     mtor << name() << "{";
55     do_print();
56     mtor << "}";
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);