gforth/lib.fs - diff

Return to lib.fs CVS log

Up to [gforth] / gforth

Diff for /gforth/lib.fs between versions 1.29 and 1.36

version 1.29, 2008/07/29 15:55:26	version 1.36, 2008/10/09 20:57:43
Line 17	Line 17
\ You should have received a copy of the GNU General Public License	\ You should have received a copy of the GNU General Public License
\ along with this program. If not, see http://www.gnu.org/licenses/.	\ along with this program. If not, see http://www.gnu.org/licenses/.

s" libffi.so" open-lib [if]	libffi-present [if]
.( including libffi.fs )	require ./libffi.fs
include libffi.fs	[else]
[ELSE]	ffcall-present [if]
s" libavcall.so" open-lib 0<>	require ./fflib.fs
s" libcallback.so" open-lib 0<> and [if]	[else]
.( including fflib.fs [ffcall] )	.( Neither libffi nor ffcall are configured ) cr
include fflib.fs	.( If you have installed one of them, you can use libffi.fs or fflib.fs directly ) cr
[ELSE]	.( Or you can just use the new, documented and better, but different, libcc.fs ) cr
.( Neither libffi nor ffcall are available ) cr
abort	abort
.( Using oldlib.fs; incompatible with fflib.fs and libffi.fs) cr	[then]
include oldlib.fs	[then]
[THEN]
[THEN]

\ testing stuff	\ testing stuff

[IFUNDEF] libc	[IFUNDEF] libc
s" os-type" environment? [IF]	s" os-type" environment? [IF]
2dup s" linux-gnu" str= [IF] 2drop	2dup s" linux-gnu" str= [IF] 2drop
cell 8 = [IF]	library libc libc.so.6
library libc /lib64/libc.so.6
[ELSE]
library libc /lib/libc.so.6
[THEN]
[ELSE] 2dup s" cygwin" str= [IF] 2drop	[ELSE] 2dup s" cygwin" str= [IF] 2drop
library libc cygwin1.dll	library libc cygwin1.dll
[ELSE] 2dup s" bsd" search nip nip [IF] 2drop	[ELSE] 2dup s" bsd" search nip nip [IF] 2drop
Line 57 s" libffi.so" open-lib [if]	Line 50 s" libffi.so" open-lib [if]
[THEN]	[THEN]
[THEN]	[THEN]

[ifdef] testing	0 [if]

library libc libc.so.6	library libc libc.so.6

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.29
changed lines
	Added in v.1.36