]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/text-interface.cc
Imported Upstream version 2.19.51
[lilypond.git] / lily / text-interface.cc
index 4598246163af04abbab830d2e6bf23f0186aaa9a..d930cdaa372868622e4624883c4ace2f5539e2a9 100644 (file)
@@ -134,6 +134,7 @@ Text_interface::interpret_markup (SCM layout_smob, SCM props, SCM markup)
       scm_dynwind_unwind_handler (markup_down_depth, 0, SCM_F_WIND_EXPLICITLY);
       if (markup_depth > max_depth)
         {
+          scm_dynwind_end ();
           string name = ly_symbol2string (scm_procedure_name (func));
           // TODO: Also print the arguments of the markup!
           non_fatal_error (_f ("Markup depth exceeds maximal value of %d; "