aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-debugger.ads
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2021-11-01 19:50:19 +0100
committerTristan Gingold <tgingold@free.fr>2021-11-01 21:11:10 +0100
commit86fd1ab3079b50c5b7234db2cedf3d1e8c0f081b (patch)
treee34bdcf719bdc08cb22a65e04ad67b57b0c06879 /src/synth/synth-debugger.ads
parent74043fa1aa40c375c7f299e6b5f1b6ea9150580e (diff)
downloadghdl-86fd1ab3079b50c5b7234db2cedf3d1e8c0f081b.tar.gz
ghdl-86fd1ab3079b50c5b7234db2cedf3d1e8c0f081b.tar.bz2
ghdl-86fd1ab3079b50c5b7234db2cedf3d1e8c0f081b.zip
synth: do full elaboration before synthesis
Diffstat (limited to 'src/synth/synth-debugger.ads')
-rw-r--r--src/synth/synth-debugger.ads37
1 files changed, 0 insertions, 37 deletions
diff --git a/src/synth/synth-debugger.ads b/src/synth/synth-debugger.ads
deleted file mode 100644
index 329bab3e2..000000000
--- a/src/synth/synth-debugger.ads
+++ /dev/null
@@ -1,37 +0,0 @@
--- Debugging during synthesis.
--- Copyright (C) 2019 Tristan Gingold
---
--- This file is part of GHDL.
---
--- This program is free software: you can redistribute it and/or modify
--- it under the terms of the GNU General Public License as published by
--- the Free Software Foundation, either version 2 of the License, or
--- (at your option) any later version.
---
--- This program is distributed in the hope that it will be useful,
--- but WITHOUT ANY WARRANTY; without even the implied warranty of
--- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
--- GNU General Public License for more details.
---
--- You should have received a copy of the GNU General Public License
--- along with this program. If not, see <gnu.org/licenses>.
-
-with Vhdl.Nodes; use Vhdl.Nodes;
-
-with Synth.Vhdl_Context; use Synth.Vhdl_Context;
-
-package Synth.Debugger is
- -- If true, debugging is enabled:
- -- * call Debug_Break() before executing the next sequential statement
- -- * call Debug_Leave when a frame is destroyed.
- Flag_Need_Debug : Boolean := False;
-
- procedure Debug_Init (Top : Node);
- procedure Debug_Break (Inst : Synth_Instance_Acc; Stmt : Node);
-
- procedure Debug_Leave (Inst : Synth_Instance_Acc);
-
- -- To be called in case of execution error, like:
- -- * index out of bounds.
- procedure Debug_Error (Inst : Synth_Instance_Acc; Expr : Node);
-end Synth.Debugger;