diff options
Diffstat (limited to 'src/synth/synth-decls.adb')
| -rw-r--r-- | src/synth/synth-decls.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/synth-decls.adb b/src/synth/synth-decls.adb index 784a3a9b1..6a1ede30c 100644 --- a/src/synth/synth-decls.adb +++ b/src/synth/synth-decls.adb @@ -479,8 +479,8 @@ package body Synth.Decls is Ind : constant Node := Get_Subtype_Indication (Decl); Atype : Node; begin - if Ind = Null_Node then - -- No subtype indication; use the same type. + if Get_Is_Ref (Decl) or else Ind = Null_Iir then + -- A secondary declaration in a list. return Null_Node; end if; Atype := Ind; |