summaryrefslogtreecommitdiff
path: root/src/vhdl/translate/trans.ads
diff options
context:
space:
mode:
authorTristan Gingold2015-01-21 05:22:36 +0100
committerTristan Gingold2015-01-21 05:22:36 +0100
commit04d92625d6761d80feb826d5a04cfcbe54d3c0f4 (patch)
tree91d92080e7e59ebca5660471eaaa7dfdb15a0f55 /src/vhdl/translate/trans.ads
parent2ed44b53f4c88ff4253ba1bfdb69ba7405046ef3 (diff)
downloadghdl-04d92625d6761d80feb826d5a04cfcbe54d3c0f4.tar.gz
ghdl-04d92625d6761d80feb826d5a04cfcbe54d3c0f4.tar.bz2
ghdl-04d92625d6761d80feb826d5a04cfcbe54d3c0f4.zip
Translate: fix thinko for implicit conversion after conversion in assoc.
Diffstat (limited to 'src/vhdl/translate/trans.ads')
-rw-r--r--src/vhdl/translate/trans.ads2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans.ads b/src/vhdl/translate/trans.ads
index 9a10b65..dd1e508 100644
--- a/src/vhdl/translate/trans.ads
+++ b/src/vhdl/translate/trans.ads
@@ -1106,7 +1106,7 @@ package Trans is
-- Field in the frame for a pointer to the RESULT structure.
Res_Record_Var : Var_Type := Null_Var;
- -- For a subprogram with a result interface:
+ -- For a procedure: record containing inout/out scalar parameters.
-- Type definition for the record.
Res_Record_Type : O_Tnode := O_Tnode_Null;
-- Type definition for access to the record.