X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Finput.hh;h=b77db2d66f547051ca07fd51cdb615dfbc34126d;hb=c1d7bc2217462a63bf5c5c6d6f6df5cb00099180;hp=12c3485b117e8c0761a11b29ffda4849188ac99b;hpb=00b9619cea1020f6773f23df8764ef85ee2912bf;p=lilypond.git diff --git a/lily/include/input.hh b/lily/include/input.hh index 12c3485b11..b77db2d66f 100644 --- a/lily/include/input.hh +++ b/lily/include/input.hh @@ -1,7 +1,7 @@ /* This file is part of LilyPond, the GNU music typesetter. - Copyright (C) 1997--2014 Han-Wen Nienhuys + Copyright (C) 1997--2015 Han-Wen Nienhuys LilyPond is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -33,9 +33,9 @@ class Input : public Simple_smob Source_file *source_file_; public: static const char type_p_name_[]; - static int print_smob (SCM, SCM, scm_print_state *); + int print_smob (SCM, scm_print_state *) const; static SCM equal_p (SCM, SCM); - SCM mark_smob (); + SCM mark_smob () const; Source_file *get_source_file () const; char const *start () const; char const *end () const; @@ -73,4 +73,12 @@ protected: extern Input dummy_input_global; +// The parser calls syntax functions with a lot of arguments +SCM with_location (SCM loc, SCM proc); +SCM with_location (SCM loc, SCM proc, SCM); +SCM with_location (SCM loc, SCM proc, SCM, SCM); +SCM with_location (SCM loc, SCM proc, SCM, SCM, SCM); +SCM with_location (SCM loc, SCM proc, SCM, SCM, SCM, SCM); +SCM with_location (SCM loc, SCM proc, SCM, SCM, SCM, SCM, SCM); + #endif // INPUT_HH