Force QAST_BLOCK_NO_CLOSE in compile_qast() in qast tests.

Author: pmichaud

t/qast/qast.t

@@ -4,6 +4,7 @@ plan(72);
 
 # Following a test infrastructure.
 sub compile_qast($qast) {
+    my $*QAST_BLOCK_NO_CLOSE := 1;
     my $pirt := QAST::Compiler.as_post($qast);
     my $pir := $pirt.pir();
     QAST::Compiler.evalpmc($pir);