This is the mail archive of the
guile@sources.redhat.com
mailing list for the Guile project.
Re: `S_IFSOCK' undeclared
- To: "Lars J. Aas" <larsa at sim dot no>
- Subject: Re: `S_IFSOCK' undeclared
- From: Bruce Korb <bkorb at sco dot COM>
- Date: Thu, 28 Sep 2000 13:16:53 -0700
- CC: guile-user at gnu dot org
- List-Id: General Guile related discussions <guile-user.gnu.org>
- Organization: The Santa Cruz Operation
- References: <39D38C49.E10F395A@sco.com> <20000928204715.A2499@sim.no>
"Lars J. Aas" wrote:
>
> On Thu, Sep 28, 2000 at 11:22:01AM -0700, Bruce Korb wrote:
> : posix.c:1230: `S_IFSOCK' undeclared (first use in this function)
>
> Should be the same for BeOS and probably a bunch of other systems
> too...
Anyway, trivial fix. But I still wonder about the nawk problem....
$ diff -u guile-1.4/libguile/$f gl/libguile/$f
--- guile-1.4/libguile/posix.c Mon Jun 12 05:43:37 2000
+++ gl/libguile/posix.c Thu Sep 28 11:22:37 2000
@@ -1226,8 +1226,10 @@
ctype = S_IFCHR;
else if (strcmp (p, "fifo") == 0)
ctype = S_IFIFO;
+#ifdef S_IFSOCK
else if (strcmp (p, "socket") == 0)
ctype = S_IFSOCK;
+#endif
else
SCM_OUT_OF_RANGE (2,type);
--- guile-1.4/libguile/filesys.c Mon Jun 12 05:43:35 2000
+++ gl/libguile/filesys.c Thu Sep 28 11:24:07 2000
@@ -398,8 +398,10 @@
ve[13] = scm_sym_char_special;
else if (S_ISFIFO (mode))
ve[13] = scm_sym_fifo;
+#ifdef S_ISSOCK
else if (S_ISSOCK (mode))
ve[13] = scm_sym_sock;
+#endif
else
ve[13] = scm_sym_unknown;
_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://mail.gnu.org/mailman/listinfo/guile-user