Add missing ANSI-style declarations.

diff --git a/v7/src/microcode/ux.c b/v7/src/microcode/ux.c
index 7c9d5bc5fc2b25def32a60efc10437bc50e7a750..225b123f0ada8fdc5a200695891ab1831f0bfeb9 100644 (file)
--- 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 d0ce8289004b1e6c7c47c70ecc4c29fd2af0b1c6..675097f812ef6021bc87b1f82379f2e484ba48d4 100644 (file)
--- 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"