--- lablgtk-2.18.13/src/lablgladecc.ml.orig	2022-10-06 01:55:37.000000000 -0600
+++ lablgtk-2.18.13/src/lablgladecc.ml	2023-06-20 19:24:01.554727185 -0600
@@ -352,7 +352,7 @@ let process ?(file="<stdin>") chan =
   let lexbuf, data =
     if !embed then begin
       let b = Buffer.create 1024 in
-      let buf = String.create 1024 in
+      let buf = Bytes.create 1024 in
       while
         let len = input chan buf 0 1024 in
         Buffer.add_subbytes b buf 0 len;