30 lines
1.1 KiB
Perl
30 lines
1.1 KiB
Perl
result = {
|
||
normal = {
|
||
basic = "Foo\nBar\nBaz\n"
|
||
indented = " Foo\n Bar\n Baz\n"
|
||
indented_more = " Foo\n Bar\n Baz\n"
|
||
interp = " Foo\n Bar\n Baz\n"
|
||
newlines_between = "Foo\n\nBar\n\nBaz\n"
|
||
indented_newlines_between = " Foo\n\n Bar\n\n Baz\n"
|
||
|
||
marker_at_suffix = " NOT EOT\n"
|
||
}
|
||
flush = {
|
||
basic = "Foo\nBar\nBaz\n"
|
||
indented = "Foo\nBar\nBaz\n"
|
||
indented_more = "Foo\n Bar\nBaz\n"
|
||
indented_less = " Foo\nBar\n Baz\n"
|
||
interp = "Foo\nBar\nBaz\n"
|
||
interp_indented_more = "Foo\n Bar\nBaz\n"
|
||
interp_indented_less = " Foo\n Bar\n Baz\n"
|
||
tabs = "Foo\n Bar\n Baz\n"
|
||
unicode_spaces = " Foo (there's two \"em spaces\" before Foo there)\nBar\nBaz\n"
|
||
newlines_between = "Foo\n\nBar\n\nBaz\n"
|
||
indented_newlines_between = "Foo\n\nBar\n\nBaz\n"
|
||
}
|
||
}
|
||
result_type = object({
|
||
normal = map(string)
|
||
flush = map(string)
|
||
})
|