diff options
author | Tristan Gingold | 2015-05-11 01:22:40 +0200 |
---|---|---|
committer | Tristan Gingold | 2015-05-11 01:22:40 +0200 |
commit | ae9bf87f0ecb5f8e43f8e1df4ce9fdb5a16bff8d (patch) | |
tree | 5864c2abfab6318b4920d3c356de2d0a677cd232 /src/vhdl/sem_expr.adb | |
parent | 4fb0d372c17309ed4c5e2f011d8fa11e89f3295e (diff) | |
download | ghdl-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.adb | 3 |
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; |