Fixed bug with static exp and array_fill
The power is now in the static args
This commit is contained in:
parent
650bbb1c93
commit
56570f904d
|
@ -111,7 +111,7 @@ let rec static_exp_of_exp const_env e =
|
||||||
else
|
else
|
||||||
raise Not_static
|
raise Not_static
|
||||||
| Econst se -> se.se_desc
|
| Econst se -> se.se_desc
|
||||||
| Eapp({ a_op = Earray_fill }, [e;n]) ->
|
| Eapp({ a_op = Earray_fill; a_params = [n] }, [e]) ->
|
||||||
Sarray_power (static_exp_of_exp const_env e,
|
Sarray_power (static_exp_of_exp const_env e,
|
||||||
static_exp_of_exp const_env n)
|
static_exp_of_exp const_env n)
|
||||||
| Eapp({ a_op = Earray }, e_list) ->
|
| Eapp({ a_op = Earray }, e_list) ->
|
||||||
|
|
Loading…
Reference in a new issue