Add syscall_mktime.

diff --git a/v7/src/microcode/msdos.h b/v7/src/microcode/msdos.h
index 74be61bf78c74fa57950518a094953ca899ff647..d4b71851cb03b2de2b4997247dd3988b1cf210ca 100644 (file)
--- a/v7/src/microcode/msdos.h
+++ b/v7/src/microcode/msdos.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Id: msdos.h,v 1.3 1992/10/07 06:23:36 jinx Exp $
+$Id: msdos.h,v 1.4 1993/01/12 19:47:44 gjr Exp $
 
-Copyright (c) 1992 Massachusetts Institute of Technology
+Copyright (c) 1992-1993 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -94,7 +94,6 @@ enum syscall_names
   syscall_listen,
   syscall_localtime,
   syscall_lseek,
-  syscall_lstat,    
   syscall_malloc,
   syscall_mkdir,
   syscall_open,
@@ -126,9 +125,12 @@ enum syscall_names
   syscall_unlink,
   syscall_utime,
   syscall_vfork,
-  syscall_write
+  syscall_write,
+  syscall_stat,
+  syscall_lstat,
+  syscall_mktime
 };
-
+\f
 enum syserr_names
 {
   syserr_unknown,
@@ -172,7 +174,6 @@ enum syserr_names
 };
 
 extern void EXFUN (error_system_call, (int code, enum syscall_names name));
-\f
 
 #include <limits.h>
 #include <time.h>
@@ -399,6 +400,7 @@ extern char * EXFUN (getlogin, (void));
 #define DOS_lseek lseek
 #define DOS_malloc malloc
 #define DOS_mknod mknod
+#define DOS_mktime mktime
 #define DOS_pause pause
 #define DOS_pipe pipe
 #define DOS_read read

diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm
index 4c6cb9ab878928b57af6cd89ce35fde1f89e95f1..d0f8a4aefe40fba5946860497df5cf2075d76135 100644 (file)
--- a/v7/src/microcode/utabmd.scm
+++ b/v7/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.64 1992/11/10 03:05:43 cph Exp $
+;;; $Id: utabmd.scm,v 9.65 1993/01/12 19:50:08 gjr Exp $
 ;;;
 ;;;    Copyright (c) 1987-92 Massachusetts Institute of Technology
 ;;;
@@ -633,6 +633,7 @@
               WRITE
               STAT
               LSTAT
+              MKTIME
               ))
 \f
 ;;; [] System-call errors
@@ -698,4 +699,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.64 1992/11/10 03:05:43 cph Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.65 1993/01/12 19:50:08 gjr Exp $"
\ No newline at end of file

diff --git a/v7/src/microcode/ux.h b/v7/src/microcode/ux.h
index 8e40555fe886c2aa208d54de60d08f0ac2fc6337..8206f877414ed6aa91079975377b4471dacfcd16 100644 (file)
--- a/v7/src/microcode/ux.h
+++ b/v7/src/microcode/ux.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Id: ux.h,v 1.38 1992/08/29 13:41:39 jinx Exp $
+$Id: ux.h,v 1.39 1993/01/12 19:47:49 gjr Exp $
 
-Copyright (c) 1988-1992 Massachusetts Institute of Technology
+Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -125,7 +125,8 @@ enum syscall_names
   syscall_vfork,
   syscall_write,
   syscall_stat,
-  syscall_lstat
+  syscall_lstat,
+  syscall_mktime
 };
 
 enum syserr_names
@@ -738,6 +739,7 @@ extern char * EXFUN (getlogin, (void));
 #define UX_lseek lseek
 #define UX_malloc malloc
 #define UX_mknod mknod
+#define UX_mktime mktime
 #define UX_pause pause
 #define UX_pipe pipe
 #define UX_read read

diff --git a/v8/src/microcode/utabmd.scm b/v8/src/microcode/utabmd.scm
index 4c6cb9ab878928b57af6cd89ce35fde1f89e95f1..d0f8a4aefe40fba5946860497df5cf2075d76135 100644 (file)
--- a/v8/src/microcode/utabmd.scm
+++ b/v8/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.64 1992/11/10 03:05:43 cph Exp $
+;;; $Id: utabmd.scm,v 9.65 1993/01/12 19:50:08 gjr Exp $
 ;;;
 ;;;    Copyright (c) 1987-92 Massachusetts Institute of Technology
 ;;;
@@ -633,6 +633,7 @@
               WRITE
               STAT
               LSTAT
+              MKTIME
               ))
 \f
 ;;; [] System-call errors
@@ -698,4 +699,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.64 1992/11/10 03:05:43 cph Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.65 1993/01/12 19:50:08 gjr Exp $"
\ No newline at end of file