aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2021-10-16 13:09:35 +0200
committerTristan Gingold <tgingold@free.fr>2021-10-18 07:55:01 +0200
commitfb25becab1caec74a5318ef4ac693f08e1c1f156 (patch)
tree6d7cef095c626e47203ba05faa3ddb06f038b666
parentb37ce7900e53973b4527550e9ca5313f9edec0e7 (diff)
downloadghdl-fb25becab1caec74a5318ef4ac693f08e1c1f156.tar.gz
ghdl-fb25becab1caec74a5318ef4ac693f08e1c1f156.tar.bz2
ghdl-fb25becab1caec74a5318ef4ac693f08e1c1f156.zip
ortho/debug and ortho/oread: also increase identifier buffers. For #1894
-rw-r--r--src/ortho/debug/ortho_debug-disp.adb2
-rw-r--r--src/ortho/oread/ortho_front.adb2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/ortho/debug/ortho_debug-disp.adb b/src/ortho/debug/ortho_debug-disp.adb
index 9430452dd..29d07fae4 100644
--- a/src/ortho/debug/ortho_debug-disp.adb
+++ b/src/ortho/debug/ortho_debug-disp.adb
@@ -70,7 +70,7 @@ package body Ortho_Debug.Disp is
-- Line number of the line to be written.
Lineno : Natural;
-- Buffer for the current line.
- Line : String (1 .. 256);
+ Line : String (1 .. 2048);
-- Number of characters currently in the line.
Line_Len : Natural;
diff --git a/src/ortho/oread/ortho_front.adb b/src/ortho/oread/ortho_front.adb
index e82b56d00..6f4a704cc 100644
--- a/src/ortho/oread/ortho_front.adb
+++ b/src/ortho/oread/ortho_front.adb
@@ -219,7 +219,7 @@ package body Ortho_Front is
Token_Number : Unsigned_64;
Token_Float : IEEE_Float_64;
- Token_Ident : String (1 .. 256);
+ Token_Ident : String (1 .. 2048);
Token_Idlen : Natural;
Token_Hash : Hash_Type;
Token_Sym : Syment_Acc;