diff options
| author | Tristan Gingold | 2015-09-24 21:08:49 +0200 |
|---|---|---|
| committer | Tristan Gingold | 2015-09-24 21:08:49 +0200 |
| commit | a3dbf28891487f13726061f607c3cd62e5f69e1e (patch) | |
| tree | 553844f1b472e1d678cc231be0b90d4137a6341d /src/vhdl/evaluation.adb | |
| parent | 90c54be9f71aef3fadeb4be7e859bfaedf364527 (diff) | |
| download | ghdl-a3dbf28891487f13726061f607c3cd62e5f69e1e.tar.gz ghdl-a3dbf28891487f13726061f607c3cd62e5f69e1e.tar.bz2 ghdl-a3dbf28891487f13726061f607c3cd62e5f69e1e.zip | |
Fix crash for access type in aggregate.
Fix ticket95
Diffstat (limited to 'src/vhdl/evaluation.adb')
| -rw-r--r-- | src/vhdl/evaluation.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/vhdl/evaluation.adb b/src/vhdl/evaluation.adb index c2283c5..b85b093 100644 --- a/src/vhdl/evaluation.adb +++ b/src/vhdl/evaluation.adb @@ -2574,6 +2574,10 @@ package body Evaluation is end; end; + when Iir_Kind_Access_Type_Definition + | Iir_Kind_Access_Subtype_Definition => + return True; + when Iir_Kind_Array_Type_Definition | Iir_Kind_Record_Type_Definition | Iir_Kind_Record_Subtype_Definition => |