diff options
| author | gingold | 2006-03-04 17:07:33 +0000 |
|---|---|---|
| committer | gingold | 2006-03-04 17:07:33 +0000 |
| commit | 426dac982e3ea0a2025135ebb6df108aca0ccedb (patch) | |
| tree | 92792ec2b7bff110a37ec9924e462cc9c559df33 | |
| parent | 750ed35d4bbec0015e2e7e1f4f3543c7217bbcb2 (diff) | |
| download | ghdl-426dac982e3ea0a2025135ebb6df108aca0ccedb.tar.gz ghdl-426dac982e3ea0a2025135ebb6df108aca0ccedb.tar.bz2 ghdl-426dac982e3ea0a2025135ebb6df108aca0ccedb.zip | |
bug fix (array bound checking)
| -rw-r--r-- | translate/translation.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/translate/translation.adb b/translate/translation.adb index 92a4d04..e4e3d72 100644 --- a/translate/translation.adb +++ b/translate/translation.adb @@ -15181,7 +15181,7 @@ package body Translation is E := Create_Temp_Init (Expr_Info.Ortho_Ptr_Type (Mode_Value), Expr); Chap3.Check_Array_Match - (Res_Type, Mnode_Null, + (Res_Type, T2M (Res_Type, Mode_Value), Expr_Type, Dp2M (E, Expr_Info, Mode_Value), Loc); return New_Convert_Ov |