diff options
author | Tristan Gingold <tgingold@free.fr> | 2017-06-18 20:59:27 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2017-06-18 20:59:27 +0200 |
commit | 2a7b36fb2a33e2f01ef87acc60cf6ac397327e36 (patch) | |
tree | af9cc5a92bb528880c74df4561bebd9cd9d5217f /src | |
parent | b5c534ec627db2e61da9b5c9eacaa1b066cde53b (diff) | |
download | ghdl-2a7b36fb2a33e2f01ef87acc60cf6ac397327e36.tar.gz ghdl-2a7b36fb2a33e2f01ef87acc60cf6ac397327e36.tar.bz2 ghdl-2a7b36fb2a33e2f01ef87acc60cf6ac397327e36.zip |
Do_Conversion: pass a real location.
Fix #369
Diffstat (limited to 'src')
-rw-r--r-- | src/vhdl/translate/trans-chap8.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb index 531007d8b..006c1709f 100644 --- a/src/vhdl/translate/trans-chap8.adb +++ b/src/vhdl/translate/trans-chap8.adb @@ -2460,7 +2460,7 @@ package body Trans.Chap8 is end; when Iir_Kind_Type_Conversion => return Chap7.Translate_Type_Conversion - (Src, Get_Type (Expr), Get_Type (Conv), Null_Iir); + (Src, Get_Type (Expr), Get_Type (Conv), Conv); when others => Error_Kind ("do_conversion", Conv); end case; |