summaryrefslogtreecommitdiff
path: root/src/vhdl/sem_expr.adb
diff options
context:
space:
mode:
authorTristan Gingold2015-05-11 01:22:40 +0200
committerTristan Gingold2015-05-11 01:22:40 +0200
commitae9bf87f0ecb5f8e43f8e1df4ce9fdb5a16bff8d (patch)
tree5864c2abfab6318b4920d3c356de2d0a677cd232 /src/vhdl/sem_expr.adb
parent4fb0d372c17309ed4c5e2f011d8fa11e89f3295e (diff)
downloadghdl-ae9bf87f0ecb5f8e43f8e1df4ce9fdb5a16bff8d.tar.gz
ghdl-ae9bf87f0ecb5f8e43f8e1df4ce9fdb5a16bff8d.tar.bz2
ghdl-ae9bf87f0ecb5f8e43f8e1df4ce9fdb5a16bff8d.zip
Fix thinko: reject incorrect association (positionnal match followed by
named match with the same formal). Fix ticket 49.
Diffstat (limited to 'src/vhdl/sem_expr.adb')
-rw-r--r--src/vhdl/sem_expr.adb3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/vhdl/sem_expr.adb b/src/vhdl/sem_expr.adb
index 341e7f7..703c554 100644
--- a/src/vhdl/sem_expr.adb
+++ b/src/vhdl/sem_expr.adb
@@ -1176,8 +1176,7 @@ package body Sem_Expr is
-- EXPR is a function or procedure call.
function Sem_Subprogram_Call_Stage1
- (Expr : Iir; A_Type : Iir; Is_Func_Call : Boolean)
- return Iir
+ (Expr : Iir; A_Type : Iir; Is_Func_Call : Boolean) return Iir
is
Imp : Iir;
Nbr_Inter: Natural;