diff options
| author | John Polstra <jdp@FreeBSD.org> | 1996-10-29 23:01:55 +0000 |
|---|---|---|
| committer | John Polstra <jdp@FreeBSD.org> | 1996-10-29 23:01:55 +0000 |
| commit | d5a92ea9241e6b6b531220df28c2fc1b569388f3 (patch) | |
| tree | d4e99980d84282a78dcd8c40088cda1fe63a11f8 /lang/modula-3-lib/files/patch-bk | |
| parent | Upgrade to v1.0prerelease-1 (diff) | |
Split the Modula-3 port into two pieces, creating a new port
"modula-3-lib". It installs only the shared libraries needed for
executing Modula-3 programs. This saves a lot of disk space for
people who need to run Modula-3 programs but don't need to build
them. The original "modula-3" port now depends on this one, and
uses it to install the compiler and the rest of the development
system.
Also, everything is now built with optimization. I have been
testing this for at least a month, and haven't seen any problems
from it. It makes the libraries and executables substantially
smaller.
This new port also includes some hooks that will make SOCKS support
possible in the near future.
Diffstat (limited to 'lang/modula-3-lib/files/patch-bk')
| -rw-r--r-- | lang/modula-3-lib/files/patch-bk | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/lang/modula-3-lib/files/patch-bk b/lang/modula-3-lib/files/patch-bk new file mode 100644 index 000000000000..b01ef3e17004 --- /dev/null +++ b/lang/modula-3-lib/files/patch-bk @@ -0,0 +1,34 @@ +Support for SOCKS wrappers in Unix.i3. + +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 @@ + (* ok *) + + (*** close - delete a descriptor ***) +-<*EXTERNAL*> PROCEDURE close (d: int): int; ++<*EXTERNAL "m3_close"*> PROCEDURE close (d: int): int; + (* ok *) + + (*** creat - create a new file ***) +@@ -102,8 +102,8 @@ + (* ok, but obsolete *) + + (*** dup, dup2 - duplicate an open file descriptor ***) +-<*EXTERNAL*> PROCEDURE dup (oldd: int): int; +-<*EXTERNAL*> PROCEDURE dup2 (oldd, newd: int): int; ++<*EXTERNAL "m3_dup"*> PROCEDURE dup (oldd: int): int; ++<*EXTERNAL "m3_dup2"*> PROCEDURE dup2 (oldd, newd: int): int; + (* ok *) + + (*** execve - execute a file ***) +@@ -892,7 +892,7 @@ + TYPE + FDSet = SET OF [0 .. MAX_FDSET - 1]; + +-<*EXTERNAL*> PROCEDURE select (nfds: int; ++<*EXTERNAL "m3_select"*> PROCEDURE select (nfds: int; + readfds, writefds, exceptfds: UNTRACED REF FDSet; + timeout: UNTRACED REF struct_timeval): int; + (* ok *) |