From 1cca70d6adaf1aee3d2833a650923aa8ae8c35dd Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 24 Aug 1991 01:51:14 +0000
Subject: [PATCH] Change to match "ux.h".

---
 v7/src/microcode/utabmd.scm | 5 +++--
 v8/src/microcode/utabmd.scm | 5 +++--
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm
index b65986f0e..372a41489 100644
--- a/v7/src/microcode/utabmd.scm
+++ b/v7/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.57 1991/05/05 00:30:52 jinx Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.58 1991/08/24 01:51:14 cph Exp $
 ;;;
 ;;;	Copyright (c) 1987-91 Massachusetts Institute of Technology
 ;;;
@@ -591,6 +591,7 @@
 	       FSTAT
 	       FTRUNCATE
 	       GETCWD
+	       GETHOSTNAME
 	       GETTIMEOFDAY
 	       IOCTL-TIOCGPGRP
 	       IOCTL-TIOCSIGSEND
@@ -694,4 +695,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.57 1991/05/05 00:30:52 jinx Exp $"
\ No newline at end of file
+"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.58 1991/08/24 01:51:14 cph Exp $"
\ No newline at end of file
diff --git a/v8/src/microcode/utabmd.scm b/v8/src/microcode/utabmd.scm
index da4ae808a..50c22bbce 100644
--- a/v8/src/microcode/utabmd.scm
+++ b/v8/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.57 1991/05/05 00:30:52 jinx Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.58 1991/08/24 01:51:14 cph Exp $
 ;;;
 ;;;	Copyright (c) 1987-91 Massachusetts Institute of Technology
 ;;;
@@ -591,6 +591,7 @@
 	       FSTAT
 	       FTRUNCATE
 	       GETCWD
+	       GETHOSTNAME
 	       GETTIMEOFDAY
 	       IOCTL-TIOCGPGRP
 	       IOCTL-TIOCSIGSEND
@@ -694,4 +695,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.57 1991/05/05 00:30:52 jinx Exp $"
\ No newline at end of file
+"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.58 1991/08/24 01:51:14 cph Exp $"
\ No newline at end of file
-- 
2.25.1