I'm closing this ticket since this works now and there are tests in 
S02-literals/heredocs.t (cmp. commit 
https://github.com/perl6/roast/commit/978e4a8ac166821ab18a8c02c906063b6e489dd6)

$ perl6 -e 'say (EVAL "q:to/E/;\n\tfoo\n\tbar\n\tE") eq "foo\nbar\n"'
True

$ perl6 -e 'say (EVAL "q:to/E/;\n\tfoo\n\tbar\nE") eq "\tfoo\n\tbar\n"'
True

Reply via email to