summaryrefslogtreecommitdiff
path: root/libguile/posix.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1998-07-12 00:10:02 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1998-07-12 00:10:02 +0000
commita8741caa54fa6fc14bc290c40cc97361db850953 (patch)
tree0cc6d2e9e5f5dc6c85497eb51de3b5339dec95b6 /libguile/posix.c
parenta61ef59b0bb8c556d2ffb950b7f24674cd61034b (diff)
downloadguile-a8741caa54fa6fc14bc290c40cc97361db850953.tar.gz
* eval.c, filesys.c, fluids.c, gc.c, gh_data.c, init.c, kw.c,
net_db.c, posix.c, print.c, regex-posix.c, scmsigs.c, socket.c, stime.c, symbols.c, unif.c, vectors.c, weaks.c: Removed third argument in call to scm_make_vector.
Diffstat (limited to 'libguile/posix.c')
-rw-r--r--libguile/posix.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/posix.c b/libguile/posix.c
index 6ae76daaa..585b2471d 100644
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -234,7 +234,7 @@ scm_getgroups()
SCM_SETCHARS(grps, groups); /* set up grps as a GC protect */
SCM_SETLENGTH(grps, 0L + ngroups * sizeof(GETGROUPS_T), scm_tc7_string);
SCM_ALLOW_INTS;
- ans = scm_make_vector(SCM_MAKINUM(ngroups), SCM_UNDEFINED, SCM_BOOL_F);
+ ans = scm_make_vector (SCM_MAKINUM(ngroups), SCM_UNDEFINED);
while (--ngroups >= 0) SCM_VELTS(ans)[ngroups] = SCM_MAKINUM(groups[ngroups]);
SCM_SETCHARS(grps, groups); /* to make sure grps stays around. */
return ans;
@@ -253,7 +253,7 @@ scm_getpwuid (user)
struct passwd *entry;
SCM *ve;
- result = scm_make_vector (SCM_MAKINUM (7), SCM_UNSPECIFIED, SCM_BOOL_F);
+ result = scm_make_vector (SCM_MAKINUM (7), SCM_UNSPECIFIED);
ve = SCM_VELTS (result);
if (SCM_UNBNDP (user) || SCM_FALSEP (user))
{
@@ -326,7 +326,7 @@ scm_getgrgid (name)
SCM result;
struct group *entry;
SCM *ve;
- result = scm_make_vector (SCM_MAKINUM (4), SCM_UNSPECIFIED, SCM_BOOL_F);
+ result = scm_make_vector (SCM_MAKINUM (4), SCM_UNSPECIFIED);
ve = SCM_VELTS (result);
SCM_DEFER_INTS;
if (SCM_UNBNDP (name) || (name == SCM_BOOL_F))
@@ -873,7 +873,7 @@ scm_uname ()
{
#ifdef HAVE_UNAME
struct utsname buf;
- SCM ans = scm_make_vector(SCM_MAKINUM(5), SCM_UNSPECIFIED, SCM_BOOL_F);
+ SCM ans = scm_make_vector (SCM_MAKINUM(5), SCM_UNSPECIFIED);
SCM *ve = SCM_VELTS (ans);
SCM_DEFER_INTS;
if (uname (&buf) < 0)