]> git.donarmstrong.com Git - lilypond.git/blob - lily/type-swallow-trans.cc
release: 1.0.1
[lilypond.git] / lily / type-swallow-trans.cc
1 /*
2   type-swallow-trans.cc -- implement Type_swallow_translator
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "type-swallow-trans.hh"
10 #include "musical-request.hh"
11
12 Type_swallow_translator::Type_swallow_translator ()
13 {
14   type_ =0;
15 }
16
17 bool
18 Type_swallow_translator::do_try_request (Request*r)
19 {
20   if (type_&&r->is_type_b (type_))
21       return true;
22   return false;
23 }
24
25 IMPLEMENT_IS_TYPE_B1(Type_swallow_translator, Translator);
26
27 DECLARE_REQUEST_SWALLOWER(Skip_req);
28