aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/elab-debugger.ads
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-05-29 08:46:12 +0200
committerTristan Gingold <tgingold@free.fr>2022-05-29 08:46:12 +0200
commitc6bb20d8522bb76bc7d217166384a365881012cb (patch)
tree649ffa003cd4e209f6eb983aafa1d3d426c4eed3 /src/synth/elab-debugger.ads
parentb588ebc8a3fe7be82435e590c793ac7feac8a997 (diff)
downloadghdl-c6bb20d8522bb76bc7d217166384a365881012cb.tar.gz
ghdl-c6bb20d8522bb76bc7d217166384a365881012cb.tar.bz2
ghdl-c6bb20d8522bb76bc7d217166384a365881012cb.zip
elab-debugger: export more subprograms
Diffstat (limited to 'src/synth/elab-debugger.ads')
-rw-r--r--src/synth/elab-debugger.ads6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/synth/elab-debugger.ads b/src/synth/elab-debugger.ads
index 315337dd6..61b16fb97 100644
--- a/src/synth/elab-debugger.ads
+++ b/src/synth/elab-debugger.ads
@@ -64,6 +64,12 @@ package Elab.Debugger is
-- Return the position of the first non-blank character.
function Skip_Blanks (S : String) return Positive;
+ function Skip_Blanks (S : String; F : Positive) return Positive;
+
+ -- Return the position of the last character of the word (the last
+ -- non-blank character).
+ function Get_Word (S : String) return Positive;
+ function Get_Word (S : String; F : Positive) return Positive;
-- Convert STR to number RES, set VALID to true iff the conversion is ok.
procedure To_Num (Str : String; Res : out Uns32; Valid : out Boolean);