No TParenthesis TArrayDecl in blocks

From this:
```
bla;
(blah());
[blah(), blah(), blah()];
[1,hi(),3];
bla;
```
to this:
```
bla;
blah();
blah(); blah(); blah();
hi();
bla;
```

genlua.ml

@@ -772,6 +772,8 @@ and gen_block_element ?(after=false) ctx e =
     begin match e.eexpr with
 	| TTypeExpr _ -> ()
 	| TCast (ce,_) -> gen_block_element ctx ce
+	| TParenthesis pe -> gen_block_element ctx pe
+	| TArrayDecl el -> concat ctx " " (gen_block_element ctx) el;
 	| TBinop (op,e1,e2) when op <> Ast.OpAssign ->
 		let f () = gen_tbinop ctx op e1 e2 in
 		gen_iife_assign ctx f;