jeltz/heptagon
1
0
Fork 0
Code Issues Pull requests Releases Activity

Fixed bug in Sarray_power typing.

Browse source
This commit is contained in:
Adrien Guatto 2010-08-17 15:26:19 +02:00
parent fe1475a03e
commit d2979fd4dd
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
compiler/heptagon/analysis/typing.ml
View file

@ -470,7 +470,7 @@ and typing_static_exp const_env se =
| Sarray_power (se, n) ->
let typed_n = expect_static_exp const_env (Tid Initial.pint) n in
let typed_se, ty = typing_static_exp const_env se in
Sarray_power (typed_se, typed_n), Tarray(ty, n)
Sarray_power (typed_se, typed_n), Tarray(ty, typed_n)
| Sarray [] ->
message se.se_loc Eempty_array
| Sarray (se::se_list) ->