From d6fdcf81ccc13e2db7c174c39a9ac610d02ceaf0 Mon Sep 17 00:00:00 2001
From: Peter Easdown <info@pkclsoft.com>
Date: Mon, 26 Jul 2021 09:07:12 +1000
Subject: [PATCH] Increased the size of GSOSInString to 508 bytes.  Some GSOS
 calls seem to require this (DInfoGS being one example).

---
 Tool.Interface/Common.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Tool.Interface/Common.pas b/Tool.Interface/Common.pas
index 3cf9148..023a3aa 100644
--- a/Tool.Interface/Common.pas
+++ b/Tool.Interface/Common.pas
@@ -66,7 +66,7 @@ type
    gsosInString = record
        size:  integer;
       {Change the array size as needed for your application}
-       theString:  packed array [1..254] of char;
+       theString:  packed array [1..508] of char;
        end;
    gsosInStringPtr = ^gsosInString;