From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 23 Dec 2000 02:45:55 +0000 (+0000)
Subject: Must include unix-emulation header files.  These were inadvertently
X-Git-Tag: 20090517-FFI~3044
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=03149b80174a8ce123c1c64a4690a22c053cd377;p=mit-scheme.git

Must include unix-emulation header files.  These were inadvertently
removed with the mktemp changes.
---

diff --git a/v7/src/microcode/bchdmp.c b/v7/src/microcode/bchdmp.c
index 1e72d5907..fa3b38620 100644
--- a/v7/src/microcode/bchdmp.c
+++ b/v7/src/microcode/bchdmp.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: bchdmp.c,v 9.86 2000/12/05 21:23:42 cph Exp $
+$Id: bchdmp.c,v 9.87 2000/12/23 02:45:55 cph Exp $
 
 Copyright (c) 1987-2000 Massachusetts Institute of Technology
 
@@ -63,6 +63,20 @@ extern SCHEME_OBJECT * EXFUN
 #ifdef __OS2__
 #  include "os2.h"
    static char FASDUMP_FILENAME[] = "faXXXXXX";
+#  ifdef __EMX__
+#    include <io.h>
+#  endif
+#  if defined(__IBMC__) || defined(__WATCOMC__)
+#    include <io.h>
+#    include <sys\stat.h>
+#    include <fcntl.h>
+#    ifndef F_OK
+#      define F_OK 0
+#      define X_OK 1
+#      define W_OK 2
+#      define R_OK 4
+#    endif
+#  endif
 #endif
 
 static Tchannel dump_channel;