]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/type-swallow-trans.cc
release: 1.1.7
[lilypond.git] / lily / type-swallow-trans.cc
index b90ced5d1bba02871382e80517547df20aad38a4..ee3bbd594727734994ffeb75ae28dd639f5631a3 100644 (file)
@@ -3,26 +3,22 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+  (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
 #include "type-swallow-trans.hh"
 #include "musical-request.hh"
 
-Type_swallow_translator::Type_swallow_translator ()
-{
-  type_ =0;
-}
 
 bool
-Type_swallow_translator::do_try_request (Request*r)
+Type_swallow_translator::do_try_music (Music*r)
 {
-  if (type_&&r->is_type_b (type_))
+  if (classname (r) == swallow_str_)
       return true;
   return false;
 }
 
-IMPLEMENT_IS_TYPE_B1(Type_swallow_translator, Translator);
 
-DECLARE_REQUEST_SWALLOWER(Skip_req);
 
+DECLARE_REQUEST_SWALLOWER(Skip_req);
+DECLARE_REQUEST_SWALLOWER(Beam_req);