]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
modula2: correct prototype for lseek within gcc/m2/gm2-libs/libc.def
authorGaius Mulley <gaiusmod2@gmail.com>
Thu, 25 Jan 2024 15:04:53 +0000 (15:04 +0000)
committerGaius Mulley <gaiusmod2@gmail.com>
Thu, 25 Jan 2024 15:04:53 +0000 (15:04 +0000)
This patch corrects the definition of lseek by changing the second
parameter to a CSSIZE_T rather than LONGINT and allow the return value
to be ignored.

gcc/m2/ChangeLog:

* gm2-libs/libc.def (lseek): Change the second parameter
type to CSSIZE_T and make the return value optional.

Signed-off-by: Gaius Mulley <gaiusmod2@gmail.com>
gcc/m2/gm2-libs/libc.def

index 4a389f5d49f833d9d422c08d3eedda33051a4629..f28f8b5f2bcaccb06e534d60b966d71a9ce44160 100644 (file)
@@ -227,7 +227,7 @@ PROCEDURE creat (filename: ADDRESS; mode: CARDINAL) : INTEGER;
            off_t lseek(int fildes, off_t offset, int whence);
 *)
 
-PROCEDURE lseek (fd: INTEGER; offset: LONGINT; whence: INTEGER) : LONGINT ;
+PROCEDURE lseek (fd: INTEGER; offset: CSSIZE_T; whence: INTEGER) : [ CSSIZE_T ] ;
 
 
 (*