aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-stmts.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2019-11-22 18:48:03 +0100
committerTristan Gingold <tgingold@free.fr>2019-11-22 18:48:03 +0100
commit777617b6c027da1cc3ffb2aec7d108fe4802a835 (patch)
tree66d0a06b14f667c4f0dd4220933e112ca2e39d74 /src/synth/synth-stmts.adb
parent14fabc924d198110afd39e7c94f7b37843109ad4 (diff)
downloadghdl-777617b6c027da1cc3ffb2aec7d108fe4802a835.tar.gz
ghdl-777617b6c027da1cc3ffb2aec7d108fe4802a835.tar.bz2
ghdl-777617b6c027da1cc3ffb2aec7d108fe4802a835.zip
synth-stmts: fix warnings.
Diffstat (limited to 'src/synth/synth-stmts.adb')
-rw-r--r--src/synth/synth-stmts.adb4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb
index c1c90388a..68486da58 100644
--- a/src/synth/synth-stmts.adb
+++ b/src/synth/synth-stmts.adb
@@ -1093,8 +1093,6 @@ package body Synth.Stmts is
procedure Synth_Case_Statement_Static_Scalar
(C : in out Seq_Context; Stmt : Node; Sel : Int64)
is
- use Vhdl.Sem_Expr;
-
Choices : constant Node := Get_Case_Statement_Alternative_Chain (Stmt);
Choice : Node;
Stmts : Node;
@@ -1148,8 +1146,6 @@ package body Synth.Stmts is
procedure Synth_Case_Statement (C : in out Seq_Context; Stmt : Node)
is
- use Vhdl.Sem_Expr;
-
Expr : constant Node := Get_Expression (Stmt);
Sel : Value_Acc;
begin