added ReadByte wrapper for compatibility with latest NW Oberon system

Former-commit-id: 0b2f1902ef

src/lib/system/darwin/clang/Files.Mod

@@ -372,6 +372,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

src/lib/system/darwin/clang/Files0.Mod

@@ -371,6 +371,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

src/lib/system/freebsd/clang/Files.Mod

@@ -372,6 +372,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

src/lib/system/freebsd/clang/Files0.Mod

@@ -371,6 +371,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

src/lib/system/linux/clang/Files.Mod

@@ -372,6 +372,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

src/lib/system/linux/clang/Files0.Mod

@@ -371,6 +371,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

src/lib/system/linux/gcc/Files.Mod

@@ -372,6 +372,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

src/lib/system/linux/gcc/Files0.Mod

@@ -371,6 +371,11 @@ END ;
     r.res := 0; r.eof := FALSE
   END ReadBytes;
 
+  PROCEDURE ReadByte* (VAR r : Rider; VAR x : ARRAY OF SYSTEM.BYTE);
+  BEGIN
+     ReadBytes(r, x, 1);
+  END ReadByte;
+
   PROCEDURE Base* (VAR r: Rider): File;
   BEGIN RETURN r.buf.f
   END Base;

voc.REMOVED.git-id

@@ -1 +1 @@
-8419554a07e6b9fb5fa1b56e1e153fc4662c6d9a
+52363208815ce01643c02a26ecbdd964dae40104

vocstatic.linux.gcc.x86_64.REMOVED.git-id

@@ -1 +1 @@
-8419554a07e6b9fb5fa1b56e1e153fc4662c6d9a
+52363208815ce01643c02a26ecbdd964dae40104