aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/translate/trans-chap8.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2017-06-18 20:59:27 +0200
committerTristan Gingold <tgingold@free.fr>2017-06-18 20:59:27 +0200
commit2a7b36fb2a33e2f01ef87acc60cf6ac397327e36 (patch)
treeaf9cc5a92bb528880c74df4561bebd9cd9d5217f /src/vhdl/translate/trans-chap8.adb
parentb5c534ec627db2e61da9b5c9eacaa1b066cde53b (diff)
downloadghdl-2a7b36fb2a33e2f01ef87acc60cf6ac397327e36.tar.gz
ghdl-2a7b36fb2a33e2f01ef87acc60cf6ac397327e36.tar.bz2
ghdl-2a7b36fb2a33e2f01ef87acc60cf6ac397327e36.zip
Do_Conversion: pass a real location.
Fix #369
Diffstat (limited to 'src/vhdl/translate/trans-chap8.adb')
-rw-r--r--src/vhdl/translate/trans-chap8.adb2
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;