From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Wed, 21 Oct 1992 00:49:57 +0000 (+0000)
Subject: Eliminate old alias.
X-Git-Tag: 20090517-FFI~8822
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=ac574ea7627bfcd5547f17eef6d7003489825394;p=mit-scheme.git

Eliminate old alias.
---

diff --git a/v7/src/microcode/prename.h b/v7/src/microcode/prename.h
index 3f23b7879..e84ea1549 100644
--- a/v7/src/microcode/prename.h
+++ b/v7/src/microcode/prename.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/prename.h,v 1.5 1991/10/02 21:17:20 jinx Exp $
+$Id: prename.h,v 1.6 1992/10/21 00:49:57 jinx Exp $
 
-Copyright (c) 1988, 1990 Massachusetts Institute of Technology
+Copyright (c) 1988-1992 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -52,11 +52,10 @@ static struct primitive_alias aliases [] =
     { "RENAME-FILE", "FILE-RENAME" },
     { "COPY-FILE", "FILE-COPY" },
     { "MAKE-DIRECTORY", "DIRECTORY-MAKE" },
-    { "OPEN-DIRECTORY", "DIRECTORY-OPEN" },
     { "SCREEN-X-SIZE", "TTY-X-SIZE" },
     { "SCREEN-Y-SIZE", "TTY-Y-SIZE" },
     { "FILE-SYMLINK?", "FILE-SOFT-LINK?" },
     { "X-GRAPHICS-SET-CLASS-HINT", "X-WINDOW-SET-CLASS-HINT" }
   };
 
-#define N_ALIASES 21
+#define N_ALIASES 20