Merge branch 'lilypond/translation' of ssh://trettig@git.sv.gnu.org/srv/git/lilypond...

[lilypond.git] / lily / include / parse-scm.hh

diff --git a/lily/include/parse-scm.hh b/lily/include/parse-scm.hh
index 2939bc2f5c228702476732a828343257e8c586c9..3e3f956634528b336abf93aba06db95d881f01a8 100644 (file)
--- a/lily/include/parse-scm.hh
+++ b/lily/include/parse-scm.hh
@@ -21,10 +21,18 @@ struct Parse_start
   int nchars;
   Input start_location_;
   bool safe_;
+  Lily_parser *parser_;
+
+  Parse_start() {
+    str = 0;
+    nchars = 0;
+    safe_ = false;
+    parser_ = 0;
+  }     
 };
 
 SCM catch_protected_parse_body (void *);
 SCM protected_ly_parse_scm (Parse_start *, bool);
-SCM ly_parse_scm (char const *, int *, Input, bool);
+SCM ly_parse_scm (char const *, int *, Input, bool, Lily_parser *);
 
 #endif /* PARSE_SCM_HH */