diff --git a/genjs.ml b/genjs.ml index 81e2864c332..0b461cdc8b9 100644 --- a/genjs.ml +++ b/genjs.ml @@ -579,6 +579,8 @@ and gen_expr ctx e = spr ctx " = "; gen_value ctx e end + | TNew ({ cl_path = [],"Array" },_,[]) -> + print ctx "[]" | TNew (c,_,el) -> print ctx "new %s(" (ctx.type_accessor (TClassDecl c)); concat ctx "," (gen_value ctx) el;