input/no-notation/safe.ly

   1 \version "2.10.0"
   2
   3 "expect-error" = ##t
   4
   5 #(ly:lexer-set-safe! (ly:parser-lexer parser))
   6
   7 "force-finish" = ##t
   8
   9 \header{
  10     texidoc = "This should not survive lilypond --safe-mode"
  11
  12     #(open-file "w")
  13 }
  14
  15
  16 #(open-file "/tmp/safe-guile.scm" "r")
  17
  18 \include "this-should-fail.ly"
  19