pike.git/ src/ testsuite.in

2015-08-03

2015-08-03 12:30:50 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• ebe209a40e5628c61c22acfe5ceff9ae46cc9418 (13 lines) (+7/-6) ^{[ Show | Annotate ]}
  Branch: 8.0

Testsuite: Survive CRNL-mode in new-style literal strings.

37:   test_eq([[#"foo\   bar"]],[["foobar"]]);   test_eq([[#(foo - bar#)]],[["foo\nbar"]]); + bar#) - "\r"]],[["foo\nbar"]]);   test_eq([[#(foo\ - bar#)]],[["foo\\\nbar"]]); + bar#) - "\r"]],[["foo\\\nbar"]]);   test_eq([[#[foo - bar#] ]],[["foo\nbar"]]); + bar#] - "\r"]],[["foo\nbar"]]);   test_eq([[#[foo\ - bar#] ]],[["foo\\\nbar"]]); + bar#] - "\r"]],[["foo\\\nbar"]]);   test_eq([[#{foo - bar#}]],[["foo\nbar"]]); + bar#} - "\r"]],[["foo\nbar"]]);   test_eq([[#{foo\ - bar#}]],[["foo\\\nbar"]]); + bar#} - "\r"]],[["foo\\\nbar"]]);   test_true([[stringp(#string "Makefile")]]);   test_any([[class Bar { array(int) foo = ({}); };    class Foo { inherit Bar; array(int) foo = ({1}); };