T1265 - Remove deprecation warnings when running with Guile V2 Replace scm_str2symbol...

[lilypond.git] / lily / parser.yy

diff --git a/lily/parser.yy b/lily/parser.yy
index fcde80ea58e6e9c1d08a280fd77d77a14adf0a37..abcf101386d6da55e5c7f6a511afeeadb77d3eeb 100644 (file)
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -907,13 +907,13 @@ output_def_body:
 
 tempo_event:
        TEMPO steno_duration '=' bare_unsigned  {
-               $$ = MAKE_SYNTAX ("tempo", @$, SCM_BOOL_F, $2, scm_int2num ($4));
+               $$ = MAKE_SYNTAX ("tempo", @$, SCM_BOOL_F, $2, scm_from_int ($4));
        }
        | TEMPO string steno_duration '=' bare_unsigned {
-               $$ = MAKE_SYNTAX ("tempo", @$, make_simple_markup($2), $3, scm_int2num ($5));
+               $$ = MAKE_SYNTAX ("tempo", @$, make_simple_markup($2), $3, scm_from_int ($5));
        }
        | TEMPO full_markup steno_duration '=' bare_unsigned    {
-               $$ = MAKE_SYNTAX ("tempo", @$, $2, $3, scm_int2num ($5));
+               $$ = MAKE_SYNTAX ("tempo", @$, $2, $3, scm_from_int ($5));
        }
        | TEMPO string {
                $$ = MAKE_SYNTAX ("tempoText", @$, make_simple_markup($2) );