-ENTER_DESCRIPTION(System_start_delimiter_engraver,
-/* descr */ "creates a system start delimiter (ie. SystemStart@{Bar,Brace,Bracket@} spanner",
-/* creats*/ "SystemStartBar SystemStartBrace SystemStartBracket",
-/* acks */ "system-start-delimiter-interface staff-symbol-interface",
-/* reads */ "",
-/* write */ "");
+void
+System_start_delimiter_engraver::acknowledge_staff_symbol (Grob_info inf)
+{
+ Grob *staff = inf.grob ();
+ bool succ = nesting_->add_staff (staff);
+
+ if (!succ)
+ {
+ nesting_->children_.push_back (new Bracket_nesting_staff (0));
+ nesting_->add_staff (staff);
+ }
+}
+
+
+
+void
+System_start_delimiter_engraver::acknowledge_system_start_text (Grob_info inf)
+{
+ nesting_->add_support (inf.grob ());
+}
+
+void
+System_start_delimiter_engraver::acknowledge_system_start_delimiter (Grob_info inf)
+{
+ nesting_->add_support (inf.grob ());
+}
+
+#include "translator.icc"
+
+ADD_ACKNOWLEDGER (System_start_delimiter_engraver, staff_symbol);
+ADD_ACKNOWLEDGER (System_start_delimiter_engraver, system_start_delimiter);
+ADD_ACKNOWLEDGER (System_start_delimiter_engraver, system_start_text);
+
+ADD_TRANSLATOR (System_start_delimiter_engraver,
+ /* doc */
+ "Create a system start delimiter (i.e., a"
+ " @code{SystemStartBar}, @code{SystemStartBrace},"
+ " @code{SystemStartBracket} or @code{SystemStartSquare}"
+ " spanner).",
+
+ /* create */
+ "SystemStartSquare "
+ "SystemStartBrace "
+ "SystemStartBracket "
+ "SystemStartBar ",
+
+ /* read */
+ "systemStartDelimiter "
+ "systemStartDelimiterHierarchy "
+ "currentCommandColumn ",
+
+ /* write */
+ ""
+ );