diff --git a/src/lib/system/darwin/clang/Files.Mod b/src/lib/system/darwin/clang/Files.Mod index 60b81e43..6307407d 100644 --- a/src/lib/system/darwin/clang/Files.Mod +++ b/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; diff --git a/src/lib/system/darwin/clang/Files0.Mod b/src/lib/system/darwin/clang/Files0.Mod index f889db57..4f021ede 100644 --- a/src/lib/system/darwin/clang/Files0.Mod +++ b/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; diff --git a/src/lib/system/freebsd/clang/Files.Mod b/src/lib/system/freebsd/clang/Files.Mod index 60b81e43..6307407d 100644 --- a/src/lib/system/freebsd/clang/Files.Mod +++ b/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; diff --git a/src/lib/system/freebsd/clang/Files0.Mod b/src/lib/system/freebsd/clang/Files0.Mod index f889db57..4f021ede 100644 --- a/src/lib/system/freebsd/clang/Files0.Mod +++ b/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; diff --git a/src/lib/system/linux/clang/Files.Mod b/src/lib/system/linux/clang/Files.Mod index 60b81e43..6307407d 100644 --- a/src/lib/system/linux/clang/Files.Mod +++ b/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; diff --git a/src/lib/system/linux/clang/Files0.Mod b/src/lib/system/linux/clang/Files0.Mod index f889db57..4f021ede 100644 --- a/src/lib/system/linux/clang/Files0.Mod +++ b/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; diff --git a/src/lib/system/linux/gcc/Files.Mod b/src/lib/system/linux/gcc/Files.Mod index 60b81e43..6307407d 100644 --- a/src/lib/system/linux/gcc/Files.Mod +++ b/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; diff --git a/src/lib/system/linux/gcc/Files0.Mod b/src/lib/system/linux/gcc/Files0.Mod index f889db57..4f021ede 100644 --- a/src/lib/system/linux/gcc/Files0.Mod +++ b/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; diff --git a/voc.REMOVED.git-id b/voc.REMOVED.git-id index 8d5d7ade..66a21669 100644 --- a/voc.REMOVED.git-id +++ b/voc.REMOVED.git-id @@ -1 +1 @@ -8419554a07e6b9fb5fa1b56e1e153fc4662c6d9a \ No newline at end of file +52363208815ce01643c02a26ecbdd964dae40104 \ No newline at end of file diff --git a/vocstatic.linux.gcc.x86_64.REMOVED.git-id b/vocstatic.linux.gcc.x86_64.REMOVED.git-id index 8d5d7ade..66a21669 100644 --- a/vocstatic.linux.gcc.x86_64.REMOVED.git-id +++ b/vocstatic.linux.gcc.x86_64.REMOVED.git-id @@ -1 +1 @@ -8419554a07e6b9fb5fa1b56e1e153fc4662c6d9a \ No newline at end of file +52363208815ce01643c02a26ecbdd964dae40104 \ No newline at end of file