|
@@ -338,7 +338,7 @@ let rec concat ctx s f = function
|
|
|
*)
|
|
|
let declare_rest_args_legacy com offset rest_arg =
|
|
|
let i = string_of_int offset in
|
|
|
- let new_array = mk (TIdent ("new Array($l-"^ i ^")")) t_dynamic rest_arg.v_pos
|
|
|
+ let new_array = mk (TIdent ("new Array($l>" ^ i ^ "?$l-"^ i ^":0)")) t_dynamic rest_arg.v_pos
|
|
|
and populate = mk (TIdent ("for(var $i=" ^ i ^ ";$i<$l;++$i){" ^ (ident rest_arg.v_name) ^ "[$i-" ^ i ^ "]=arguments[$i];}")) com.basic.tvoid rest_arg.v_pos
|
|
|
in
|
|
|
[
|