From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 28 Oct 1995 02:10:32 +0000 (+0000)
Subject: Fix typos.
X-Git-Tag: 20090517-FFI~5827
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=077c4f83a11efa6f526440b9c77545c3e0a69d40;p=mit-scheme.git

Fix typos.
---

diff --git a/v7/src/microcode/ntfs.c b/v7/src/microcode/ntfs.c
index fb1aa7902..ef60189cf 100644
--- a/v7/src/microcode/ntfs.c
+++ b/v7/src/microcode/ntfs.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: ntfs.c,v 1.9 1995/10/28 01:03:40 cph Exp $
+$Id: ntfs.c,v 1.10 1995/10/28 02:10:32 cph Exp $
 
 Copyright (c) 1992-95 Massachusetts Institute of Technology
 
@@ -140,7 +140,7 @@ DEFUN (OS_file_rename, (from, to),
        CONST char * from AND
        CONST char * to)
 {
-  guarantee_writable (name, 1);
+  guarantee_writable (to, 1);
   STD_BOOL_SYSTEM_CALL (syscall_rename, (MoveFile (from, to)));
 }
 
@@ -149,7 +149,7 @@ DEFUN (OS_file_copy, (from, to),
        CONST char * from AND
        CONST char * to)
 {
-  guarantee_writable (name, 1);
+  guarantee_writable (to, 1);
   /* This system-call name is wrong, but there's no corresponding unix
      operation, and I don't feel like customizing this for NT now.  */
   STD_BOOL_SYSTEM_CALL (syscall_rename, (CopyFile (from, to, FALSE)));