diff options
Diffstat (limited to 'src/vhdl/sem_inst.adb')
| -rw-r--r-- | src/vhdl/sem_inst.adb | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/src/vhdl/sem_inst.adb b/src/vhdl/sem_inst.adb index 10eac72dd..30785dbb3 100644 --- a/src/vhdl/sem_inst.adb +++ b/src/vhdl/sem_inst.adb @@ -172,8 +172,7 @@ package body Sem_Inst is begin case L is when Null_Iir_List - | Iir_List_All - | Iir_List_Others => + | Iir_List_All => return L; when others => Res := Create_Iir_List; @@ -756,8 +755,7 @@ package body Sem_Inst is begin case N is when Null_Iir_List - | Iir_List_All - | Iir_List_Others => + | Iir_List_All => pragma Assert (Inst = N); return; when others => @@ -1126,8 +1124,7 @@ package body Sem_Inst is begin case L is when Null_Iir_List - | Iir_List_All - | Iir_List_Others => + | Iir_List_All => return; when others => for I in Natural loop |