--- gforth/lib.fs	2007/02/17 21:04:15	1.18
+++ gforth/lib.fs	2007/12/31 17:34:58	1.21
@@ -1,6 +1,6 @@
 \ lib.fs	shared library support package 		11may97py
 
-\ Copyright (C) 1995,1996,1997,1998,2000,2003,2005,2006 Free Software Foundation, Inc.
+\ Copyright (C) 1995,1996,1997,1998,2000,2003,2005,2006,2007 Free Software Foundation, Inc.
 
 \ This file is part of Gforth.
 
@@ -24,6 +24,9 @@
     [IFDEF] ffi-call
 	include libffi.fs
     [ELSE]
+        .( Neither libffi nor ffcall are available ) cr
+        abort
+        .( Using oldlib.fs; incompatible with fflib.fs and libffi.fs) cr
 	include oldlib.fs
     [THEN]
 [THEN]
@@ -36,8 +39,12 @@
 	    library libc libc.so.6
 	[ELSE] 2dup s" cygwin" str= [IF]  2drop
 		library libc cygwin1.dll
-	    [ELSE]  s" bsd" search nip nip [IF]
+	    [ELSE]  2dup s" bsd" search nip nip [IF]  2drop
 		    library libc libc.so
+		[ELSE]  2dup s" darwin" string-prefix? [IF]  2drop
+			library libc libc.dylib
+		    [ELSE]  2drop \ or add your stuff here
+		    [THEN]
 		[THEN]
 	    [THEN]
 	[THEN]