From 900205b76935aba2f912d67cb63c5a02f15c3e9a Mon Sep 17 00:00:00 2001
From: stanton <stanton>
Date: Fri, 23 Apr 1999 01:57:23 +0000
Subject: * win/tclWinFCmd.c: * win/tclWin32Dll.c: Changed uses of "try" to
 "__try", since that is the actual keyword.  This eliminates the need for some
 -D flags from the makefile.

---
 win/tclWin32Dll.c |  6 +++---
 win/tclWinFCmd.c  | 10 +++++-----
 2 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/win/tclWin32Dll.c b/win/tclWin32Dll.c
index 5a90b77..349e770 100644
--- a/win/tclWin32Dll.c
+++ b/win/tclWin32Dll.c
@@ -10,7 +10,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclWin32Dll.c,v 1.6 1999/04/16 00:48:07 stanton Exp $
+ * RCS: @(#) $Id: tclWin32Dll.c,v 1.7 1999/04/23 01:57:23 stanton Exp $
  */
 
 #include "tclWinInt.h"
@@ -445,10 +445,10 @@ TclpCheckStackSpace()
      * exception if the stack pointer is set below the bottom of the stack.
      */
 
-    try {
+    __try {
 	alloca(TCL_WIN_STACK_THRESHOLD);
 	return 1;
-    } except (1) {}
+    } __except (1) {}
 
     return 0;
 }
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c
index c4e25ae..aa9858b 100644
--- a/win/tclWinFCmd.c
+++ b/win/tclWinFCmd.c
@@ -9,7 +9,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclWinFCmd.c,v 1.5 1999/04/21 21:50:34 rjohnson Exp $
+ * RCS: @(#) $Id: tclWinFCmd.c,v 1.6 1999/04/23 01:57:23 stanton Exp $
  */
 
 #include "tclWinInt.h"
@@ -195,11 +195,11 @@ DoRenameFile(
      * char block device.
      */
 
-    try {
+    __try {
 	if ((*tclWinProcs->moveFileProc)(nativeSrc, nativeDst) != FALSE) {
 	    return TCL_OK;
 	}
-    } except (-1) {}
+    } __except (-1) {}
 
     TclWinConvertError(GetLastError());
 
@@ -484,11 +484,11 @@ DoCopyFile(
      * block device.
      */
 
-    try {
+    __try {
 	if ((*tclWinProcs->copyFileProc)(nativeSrc, nativeDst, 0) != FALSE) {
 	    return TCL_OK;
 	}
-    } except (-1) {}
+    } __except (-1) {}
 
     TclWinConvertError(GetLastError());
     if (Tcl_GetErrno() == EBADF) {
-- 
cgit v0.12