From: fred <fred>
Date: Tue, 5 Nov 1996 16:28:39 +0000 (+0000)
Subject: lilypond-0.0.8
X-Git-Tag: release/1.5.59~6903
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=df91d866257eefa6216b3169f549ef0fac6d36a0;p=lilypond.git

lilypond-0.0.8
---

diff --git a/lookupsyms.cc b/lookupsyms.cc
index 294f2e9af4..e6ad52ca5a 100644
--- a/lookupsyms.cc
+++ b/lookupsyms.cc
@@ -3,6 +3,7 @@
 #include "symtable.hh"
 #include "dimen.hh"
 #include "tex.hh"
+
 void
 Lookup::parse(Text_db&t)
 {
@@ -55,6 +56,29 @@ Lookup::flag(int j)
     return (*symtables_)("flags")->lookup(j);
 }
 
+Symbol
+Lookup::streepjes(int i)
+{
+    assert(i);
+    
+    int arg;
+    String idx ;
+    if (i<0) {
+	idx = "botlines";
+	arg = -i;
+    }else {
+	arg = i;
+	idx = "toplines";
+    }
+    Symbol ret = (*symtables_)("streepjes")->lookup(idx);
+    
+    svec<String> a;
+    a.add(arg);
+    ret.tex = substitute_args(ret.tex, a);
+
+    return ret;
+}
+
 /****************************************************************/
 // bare bones.