diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-08-28 10:11:47 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-08-28 13:22:29 +0200 |
| commit | b8b61eb99f0fdd3a04a3c5be53c0892f17c921e9 (patch) | |
| tree | b8db5e986ca13eb9b22c56e16267c23741c5d5ec /src/errorout.adb | |
| parent | f09b7440f071bc5544baa692b3b4c1018a7f905c (diff) | |
| download | ghdl-b8b61eb99f0fdd3a04a3c5be53c0892f17c921e9.tar.gz ghdl-b8b61eb99f0fdd3a04a3c5be53c0892f17c921e9.tar.bz2 ghdl-b8b61eb99f0fdd3a04a3c5be53c0892f17c921e9.zip | |
errorout: do not display empty lines
Diffstat (limited to 'src/errorout.adb')
| -rw-r--r-- | src/errorout.adb | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/errorout.adb b/src/errorout.adb index f0316197e..4f0746fcb 100644 --- a/src/errorout.adb +++ b/src/errorout.adb @@ -419,4 +419,14 @@ package body Errorout is begin return (Kind => Earg_Synth_Name, Val_Lang => V); end Make_Earg_Synth_Name; + + function Make_Earg_Verilog_Node (V : Uns32) return Earg_Type is + begin + return (Kind => Earg_Verilog_Node, Val_Lang => V); + end Make_Earg_Verilog_Node; + + function Make_Earg_Verilog_Token (V : Uns32) return Earg_Type is + begin + return (Kind => Earg_Verilog_Token, Val_Lang => V); + end Make_Earg_Verilog_Token; end Errorout; |