From: fred <fred>
Date: Tue, 29 Oct 1996 00:30:37 +0000 (+0000)
Subject: lilypond-0.0.9
X-Git-Tag: release/1.5.59~7009
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f6fa085ee2a7788ca904b65fd6872570a1cd4132;p=lilypond.git

lilypond-0.0.9
---

diff --git a/src/command.cc b/src/command.cc
new file mode 100644
index 0000000000..23edf1ec36
--- /dev/null
+++ b/src/command.cc
@@ -0,0 +1,39 @@
+#include "string.hh"
+#include "debug.hh"
+#include "command.hh"
+
+bool
+Command::isbreak()const
+{
+    return (code >= BREAK_PRE && code <= BREAK_END);
+}
+
+Command::Command()
+{
+    code = NOP;
+    when = -1;
+    priority=0;
+}
+
+
+
+Command::Command(Real w)
+{
+    code = NOP;
+    when = w;
+    priority=0;
+}
+
+void
+Command::print() const
+{
+#ifndef NPRINT
+    mtor << "command at " << when << ", code " << code << " prio " << priority;
+    if (args.sz()) {
+	mtor<< " args: ";
+	for (int i = 0; i<args.sz(); i++)
+	    mtor << "`"<<args[i] <<"',";
+    }
+    mtor << "\n";
+#endif
+}