diff options
Diffstat (limited to 'lang/modula-3-lib/files')
| -rw-r--r-- | lang/modula-3-lib/files/patch-ah | 2 | ||||
| -rw-r--r-- | lang/modula-3-lib/files/patch-bk | 32 | ||||
| -rw-r--r-- | lang/modula-3-lib/files/patch-bs | 18 |
3 files changed, 48 insertions, 4 deletions
diff --git a/lang/modula-3-lib/files/patch-ah b/lang/modula-3-lib/files/patch-ah index d01badcde98a..01c66c6a37e8 100644 --- a/lang/modula-3-lib/files/patch-ah +++ b/lang/modula-3-lib/files/patch-ah @@ -193,7 +193,7 @@ Update the m3build templates for FreeBSD-2.1 and later. proc after_library_hooks(x) is local lib_a = format ("lib%s.a", x) - local lib_so = format ("lib%s.so.1.1", x) -+ local lib_so = format ("lib%s.so.5.0", x) ++ local lib_so = format ("lib%s.so.6.0", x) local dest = format ("%s%s%s%s%s", PKG_INSTALL, SL, BUILD_PACKAGE, SL, BUILD_DIR) diff --git a/lang/modula-3-lib/files/patch-bk b/lang/modula-3-lib/files/patch-bk index f94316eb14ec..6d721061f979 100644 --- a/lang/modula-3-lib/files/patch-bk +++ b/lang/modula-3-lib/files/patch-bk @@ -1,8 +1,10 @@ Support for SOCKS wrappers in Unix.i3. Also add some missing system call declarations. +Also fix misdirected entries for "open" and "fcntl" which bypassed the +VM wrappers. --- m3/m3core/src/unix/freebsd-2/Unix.i3.orig Sat Jan 7 14:41:42 1995 -+++ m3/m3core/src/unix/freebsd-2/Unix.i3 Thu Jul 10 18:32:36 1997 ++++ m3/m3core/src/unix/freebsd-2/Unix.i3 Thu Apr 23 22:09:54 1998 @@ -84,9 +84,10 @@ <*EXTERNAL*> PROCEDURE fchmod (fd, mode: mode_t): int; (* ok *) @@ -35,7 +37,18 @@ Also add some missing system call declarations. (* ok *) (*** execve - execute a file ***) -@@ -773,6 +774,9 @@ +@@ -156,10 +157,7 @@ + F_WRLCK = 3; (* Write lock *) + F_UNLCK = 2; (* Remove lock(s) *) + +-(* with vm use this + <*EXTERNAL "ufcntl"*> PROCEDURE fcntl (fd, request, arg: int): int; +-*) +-<*EXTERNAL "m3_fcntl"*> PROCEDURE fcntl (fd, request, arg: int): int; + (* ok *) + + (*** flock - apply or remove an advisory lock on an open file ***) +@@ -773,6 +771,9 @@ PROCEDURE lseek (d: int; offset: off_t; whence: int): off_t; (* ok *) @@ -45,7 +58,20 @@ Also add some missing system call declarations. (*** mkdir - make a directory file ***) <*EXTERNAL*> PROCEDURE mkdir (path: char_star; mode: mode_t): int; (* ok *) -@@ -892,7 +896,7 @@ +@@ -827,12 +828,8 @@ + + M3_NONBLOCK = O_NONBLOCK; (* -1 => would block, 0 => EOF *) + +-(* with vm use this + <*EXTERNAL "uopen" *> PROCEDURE open (name: char_star; + flags, mode: int): int; +-*) +-<*EXTERNAL "m3_open" *> PROCEDURE open (name: char_star; +- flags, mode: int): int; + (* ok *) + + (*** pipe - create an interprocess channel ***) +@@ -892,7 +889,7 @@ TYPE FDSet = SET OF [0 .. MAX_FDSET - 1]; diff --git a/lang/modula-3-lib/files/patch-bs b/lang/modula-3-lib/files/patch-bs new file mode 100644 index 000000000000..a58a5f7de94c --- /dev/null +++ b/lang/modula-3-lib/files/patch-bs @@ -0,0 +1,18 @@ +--- m3/m3core/src/unix/freebsd-2/off_t_wrap.c.orig Thu Jan 12 09:28:20 1995 ++++ m3/m3core/src/unix/freebsd-2/off_t_wrap.c Thu Apr 23 22:08:58 1998 +@@ -33,15 +33,3 @@ + off_t len = (off_t) length; + return ftruncate(fd, length); + } +- +-/* added to avoid problems with the ellipsis... */ +- +-int m3_fcntl(int fd, int cmd, int arg) +-{ +- return fcntl(fd, cmd, arg); +-} +- +-int m3_open(const char *path, int flags, mode_t mode) +-{ +- return open(path, flags, mode); +-} |