]> git.donarmstrong.com Git - lilypond.git/blob - lily/translation-property.cc
42e43643490e59a3c354fc2ca8f99d22f484b27a
[lilypond.git] / lily / translation-property.cc
1 /*
2   translation-property.cc -- implement Translation_property
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "translation-property.hh"
10 #include "debug.hh"
11
12 void
13 Translation_property::do_print () const
14 {
15 #ifndef NPRINT
16   DEBUG_OUT << "." << var_str_ << " = " ;
17   if (flower_dstream && !flower_dstream->silent_b ("Translation_property"))
18     ly_display_scm (value_);
19 #endif
20 }