version 1.16, 2006/04/05 21:07:43
|
version 1.19, 2007/06/01 16:27:37
|
Line 1
|
Line 1
|
\ lib.fs shared library support package 11may97py |
\ lib.fs shared library support package 11may97py |
|
|
\ Copyright (C) 1995,1996,1997,1998,2000,2003,2005 Free Software Foundation, Inc. |
\ Copyright (C) 1995,1996,1997,1998,2000,2003,2005,2006 Free Software Foundation, Inc. |
|
|
\ This file is part of Gforth. |
\ This file is part of Gforth. |
|
|
Line 24
|
Line 24
|
[IFDEF] ffi-call |
[IFDEF] ffi-call |
include libffi.fs |
include libffi.fs |
[ELSE] |
[ELSE] |
|
.( Neither libffi nor ffcall are available ) cr |
|
abort |
|
.( Using oldlib.fs; incompatible with fflib.fs and libffi.fs) cr |
include oldlib.fs |
include oldlib.fs |
[THEN] |
[THEN] |
[THEN] |
[THEN] |
|
|
\ testing stuff |
\ testing stuff |
|
|
|
[IFUNDEF] libc |
|
s" os-type" environment? [IF] |
|
2dup s" linux-gnu" str= [IF] 2drop |
|
library libc libc.so.6 |
|
[ELSE] 2dup s" cygwin" str= [IF] 2drop |
|
library libc cygwin1.dll |
|
[ELSE] s" bsd" search nip nip [IF] |
|
library libc libc.so |
|
[THEN] |
|
[THEN] |
|
[THEN] |
|
[THEN] |
|
[THEN] |
|
|
[ifdef] testing |
[ifdef] testing |
|
|
library libc libc.so.6 |
library libc libc.so.6 |