diff options
-rw-r--r-- | src/ortho/debug/ortho_debug-disp.adb | 2 | ||||
-rw-r--r-- | src/ortho/oread/ortho_front.adb | 2 |
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; |