* lily/include/lily-guile.hh: many new ly_ functions. Thanks to

[lilypond.git] / lily / my-lily-parser.cc

diff --git a/lily/my-lily-parser.cc b/lily/my-lily-parser.cc
index c87b1416ef3228f278a483d91ec62764120856e6..412778f801f541fe7847a4fd90640c6486f4dbef 100644 (file)
--- a/lily/my-lily-parser.cc
+++ b/lily/my-lily-parser.cc
@@ -132,10 +132,10 @@ My_lily_parser::paper_description ()
 
   SCM al = p->translator_tab_->to_alist ();
   SCM l = SCM_EOL;
-  for (SCM s = al ; gh_pair_p (s); s = ly_cdr (s))
+  for (SCM s = al ; ly_pair_p (s); s = ly_cdr (s))
     {
       Context_def * td = unsmob_context_def (ly_cdar (s));
-      l = gh_cons (gh_cons (ly_caar (s), td->to_alist ()),  l);
+      l = scm_cons (scm_cons (ly_caar (s), td->to_alist ()),  l);
     }
   return l;  
 }