diff options
| author | tgingold <tgingold@users.noreply.github.com> | 2016-11-02 17:32:25 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2016-11-02 17:32:25 +0100 |
| commit | 4c7c53b2fb53cd6ff03776b4ce47f6e9f30fd52f (patch) | |
| tree | 848058e06948a9f57411d33db1d96cd3f47969ac /src/grt/grt-errors.adb | |
| parent | 820589831ff4217081f863b206793a42b9260fd0 (diff) | |
| parent | df259b99050928cd72874377d7797c0de797935b (diff) | |
| download | ghdl-4c7c53b2fb53cd6ff03776b4ce47f6e9f30fd52f.tar.gz ghdl-4c7c53b2fb53cd6ff03776b4ce47f6e9f30fd52f.tar.bz2 ghdl-4c7c53b2fb53cd6ff03776b4ce47f6e9f30fd52f.zip | |
Merge pull request #184 from Jonsba/jonsba/signals_selection
Support added for * and **. Current version set to 1.1
Diffstat (limited to 'src/grt/grt-errors.adb')
| -rw-r--r-- | src/grt/grt-errors.adb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/grt/grt-errors.adb b/src/grt/grt-errors.adb index 56d1e6f81..9a48de48e 100644 --- a/src/grt/grt-errors.adb +++ b/src/grt/grt-errors.adb @@ -142,6 +142,12 @@ package body Grt.Errors is Newline_Err; end Report_E; + procedure Report_E (N : Integer) is + begin + Put_Err (N); + Newline_Err; + end Report_E; + procedure Report_E (Str : Std_String_Ptr) is subtype Ada_Str is String (1 .. Natural (Str.Bounds.Dim_1.Length)); |