From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Wed, 21 Jul 1993 06:02:28 +0000 (+0000)
Subject: Fix wrong syscall name.
X-Git-Tag: 20090517-FFI~8183
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=8638f2c6f55532d8df204a4ad1e1f47965f36c13;p=mit-scheme.git

Fix wrong syscall name.
---

diff --git a/v7/src/microcode/ntfs.c b/v7/src/microcode/ntfs.c
index 007e0389e..c6178a2f3 100644
--- a/v7/src/microcode/ntfs.c
+++ b/v7/src/microcode/ntfs.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: ntfs.c,v 1.3 1993/06/24 02:00:59 gjr Exp $
+$Id: ntfs.c,v 1.4 1993/07/21 06:02:28 gjr Exp $
 
 Copyright (c) 1992-1993 Massachusetts Institute of Technology
 
@@ -145,9 +145,8 @@ DEFUN (OS_directory_make, (name), CONST char * name)
 void
 DEFUN (OS_directory_delete, (name), CONST char * name)
 {
-  STD_VOID_SYSTEM_CALL (syscall_mkdir, (RemoveDirectory(name)));
+  STD_VOID_SYSTEM_CALL (syscall_rmdir, (RemoveDirectory (name)));
 }
-
 
 /* This is such that directory open does not return the first file */
 #define DIR_UNALLOCATED (-1L)