+++ /dev/null
-\score{
- \notes\relative c''{
- \outputproperty #(make-type-checker 'note-head-interface)
- #'extra-offset = #'(2 . 3)
- c2
- c
- \context Score {
- \outputproperty #(make-type-checker 'mark-interface)
- #'extra-offset = #'(-1 . 4)
- }
- \mark A;
- d1
- \mark;
- e
-}
-\paper{
- linewidth=-1.0;
- \translator {
- \ScoreContext
- \consists "Mark_engraver";
- }
-}
-}
+++ /dev/null
-/*
- output-property.cc -- implement Output_property
-
- source file of the GNU LilyPond music typesetter
-
- (c) 2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
-#include "output-property.hh"
-#include "lily-guile.hh"
-
-Output_property::Output_property(SCM pred, SCM sym, SCM val)
-{
- set_mus_property ("predicate", pred);
- set_mus_property ("symbol", sym);
- set_mus_property ("value", val);
-}
-