summaryrefslogtreecommitdiff
path: root/lang/modula-3-lib/files/patch-bk
diff options
context:
space:
mode:
Diffstat (limited to 'lang/modula-3-lib/files/patch-bk')
-rw-r--r--lang/modula-3-lib/files/patch-bk31
1 files changed, 27 insertions, 4 deletions
diff --git a/lang/modula-3-lib/files/patch-bk b/lang/modula-3-lib/files/patch-bk
index b01ef3e17004..7431cc460bc4 100644
--- a/lang/modula-3-lib/files/patch-bk
+++ b/lang/modula-3-lib/files/patch-bk
@@ -1,9 +1,22 @@
Support for SOCKS wrappers in Unix.i3.
+Also add some missing system call declarations.
Index: m3/m3core/src/unix/freebsd-2/Unix.i3
--- Unix.i3.orig Sat Jan 7 14:41:42 1995
-+++ Unix.i3 Tue Oct 8 14:20:50 1996
-@@ -94,7 +94,7 @@
++++ Unix.i3 Thu Jul 10 18:32:36 1997
+@@ -84,9 +84,10 @@
+ <*EXTERNAL*> PROCEDURE fchmod (fd, mode: mode_t): int;
+ (* ok *)
+
+-(*** chown, fchown - change owner and group of a file ***)
++(*** chown, fchown, lchown - change owner and group of a file ***)
+ <*EXTERNAL*> PROCEDURE chown (path: char_star; owner: uid_t; group: gid_t): int;
+ <*EXTERNAL*> PROCEDURE fchown (fd: int; owner: uid_t; group: gid_t): int;
++<*EXTERNAL*> PROCEDURE lchown (path: char_star; owner: uid_t; group: gid_t): int;
+ (* ok *)
+
+ (*** chroot - change root directory ***)
+@@ -94,7 +95,7 @@
(* ok *)
(*** close - delete a descriptor ***)
@@ -12,7 +25,7 @@ Index: m3/m3core/src/unix/freebsd-2/Unix.i3
(* ok *)
(*** creat - create a new file ***)
-@@ -102,8 +102,8 @@
+@@ -102,8 +103,8 @@
(* ok, but obsolete *)
(*** dup, dup2 - duplicate an open file descriptor ***)
@@ -23,7 +36,17 @@ Index: m3/m3core/src/unix/freebsd-2/Unix.i3
(* ok *)
(*** execve - execute a file ***)
-@@ -892,7 +892,7 @@
+@@ -773,6 +774,9 @@
+ PROCEDURE lseek (d: int; offset: off_t; whence: int): off_t;
+ (* ok *)
+
++(*** mkfifo - make a FIFO (named pipe) ***)
++<*EXTERNAL*> PROCEDURE mkfifo (path: char_star; mode: mode_t): int;
++
+ (*** mkdir - make a directory file ***)
+ <*EXTERNAL*> PROCEDURE mkdir (path: char_star; mode: mode_t): int;
+ (* ok *)
+@@ -892,7 +896,7 @@
TYPE
FDSet = SET OF [0 .. MAX_FDSET - 1];