From f3468eaa313e7cd16005e59a59392390a0bce9f4 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <gingold@adacore.com>
Date: Tue, 5 Jan 2016 06:28:31 +0100
Subject: if/else: add debug line for elsif part.

---
 src/vhdl/translate/trans-chap8.adb | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src')

diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb
index 9bedbf369..d939ce46a 100644
--- a/src/vhdl/translate/trans-chap8.adb
+++ b/src/vhdl/translate/trans-chap8.adb
@@ -304,6 +304,7 @@ package body Trans.Chap8 is
             State_Jump (State_Allocate);
          else
             Open_Temp;
+            New_Debug_Line_Stmt (Get_Line_Number (Else_Clause));
             Translate_If_Statement_State_Jumps (Else_Clause, Fall_State);
             Close_Temp;
          end if;
@@ -358,6 +359,7 @@ package body Trans.Chap8 is
               (Get_Sequential_Statement_Chain (Else_Clause));
          else
             Open_Temp;
+            New_Debug_Line_Stmt (Get_Line_Number (Else_Clause));
             Translate_If_Statement_Direct (Else_Clause);
             Close_Temp;
          end if;
-- 
cgit v1.2.3