diff options
Diffstat (limited to 'src/vhdl/vhdl-disp_vhdl.ads')
| -rw-r--r-- | src/vhdl/vhdl-disp_vhdl.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-disp_vhdl.ads b/src/vhdl/vhdl-disp_vhdl.ads index dd52d7538..a1c0b2b3c 100644 --- a/src/vhdl/vhdl-disp_vhdl.ads +++ b/src/vhdl/vhdl-disp_vhdl.ads @@ -37,8 +37,12 @@ package Vhdl.Disp_Vhdl is subtype Ctxt_Class is Disp_Ctxt'Class; + -- Helper that calls Disp_Char for every character of STR. procedure Disp_Str (Ctxt : in out Ctxt_Class; Str : String); + -- Return True if a space should be displayed between PREV_TOK and TOK. + function Need_Space (Tok, Prev_Tok : Token_Type) return Boolean; + -- General procedure to display a node. -- Mainly used to dispatch to other functions according to the kind of -- the node. |