]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/lily-lexer-scheme.cc
Use be_safe_global for determining whether file inclusion
[lilypond.git] / lily / lily-lexer-scheme.cc
index 424b4fa816adb3227493709edcaf12c8146b7673..7cb6d53691de01dd04a3bb281133ad57ac948984 100644 (file)
@@ -17,17 +17,3 @@ LY_DEFINE(ly_lexer_keywords, "ly:lexer-keywords",
   SCM_ASSERT_TYPE(lex, lexer, SCM_ARG1, __FUNCTION__, "lily lexer");
   return lex->keyword_list ();
 }
-         
-
-LY_DEFINE(ly_lexer_set_safe, "ly:lexer-set-safe!",
-         1, 0, 0, (SCM lexer),
-         "Switch on safe mode for the rest of the file.")
-{
-  Lily_lexer * lex = Lily_lexer::unsmob (lexer);
-  SCM_ASSERT_TYPE(lex, lexer, SCM_ARG1, __FUNCTION__, "lily lexer");
-
-  lex->be_safe_ = true;
-  lex->allow_includes_ = false;
-  
-  return SCM_UNSPECIFIED;
-}