From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr> Date: Mon, 20 Jan 1992 16:38:07 +0000 (+0000) Subject: Add missing ANSI-style declarations. X-Git-Tag: 20090517-FFI~9962 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=c7ce15cd82a2fa8462e63b108e50e2b604f3afc2;p=mit-scheme.git Add missing ANSI-style declarations. --- diff --git a/v7/src/microcode/ux.c b/v7/src/microcode/ux.c index 7c9d5bc5f..225b123f0 100644 --- a/v7/src/microcode/ux.c +++ b/v7/src/microcode/ux.c @@ -1,8 +1,8 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/ux.c,v 1.8 1991/04/27 00:43:33 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/ux.c,v 1.9 1992/01/20 16:38:07 jinx Exp $ -Copyright (c) 1990-1 Massachusetts Institute of Technology +Copyright (c) 1990-1992 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -391,6 +391,7 @@ DEFUN (UX_mkdir, (name, mode), cc_t DEFUN (UX_PC_VDISABLE, (fildes), int fildes) { + extern long EXFUN (fpathconf, (int, int)); long result = (fpathconf (fildes, _PC_VDISABLE)); return ((result < 0) ? diff --git a/v7/src/microcode/ux.h b/v7/src/microcode/ux.h index d0ce82890..675097f81 100644 --- a/v7/src/microcode/ux.h +++ b/v7/src/microcode/ux.h @@ -1,8 +1,8 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/ux.h,v 1.28 1991/10/29 13:59:20 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/ux.h,v 1.29 1992/01/20 16:35:42 jinx Exp $ -Copyright (c) 1988-91 Massachusetts Institute of Technology +Copyright (c) 1988-92 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -56,6 +56,7 @@ MIT in each case. */ #include "posixtype.h" extern int errno; +extern int EXFUN (ioctl, (int, int, PTR)); #include "intext.h" #include "dstack.h"