From 2e4f86344f54f9eb2066bbf9ddf19e8e96ad7161 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 7 Jun 2006 16:55:53 +0000
Subject: [PATCH] make it compile with both 7.1 and 8.0

svn: r3266
---
 src/mysterx/dotnet/utils.cpp | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/src/mysterx/dotnet/utils.cpp b/src/mysterx/dotnet/utils.cpp
index 2d60232012..5bb529ca4b 100644
--- a/src/mysterx/dotnet/utils.cpp
+++ b/src/mysterx/dotnet/utils.cpp
@@ -40,7 +40,13 @@ int show_trace (char * str, va_list marker)
     int i = 1;
 
     while (count < 0) {
-        buffer.ReSizeThrows (STRING_BUFFER_LEN * i);
+# if _MSC_VER < 1400
+        HRESULT hr;
+        if (FAILED(hr = buffer.ReSize (STRING_BUFFER_LEN * i)))
+	  die("Resize failed.", hr);
+#else
+	buffer.ReSizeThrows (STRING_BUFFER_LEN * i);
+#endif
         count = _vsnprintf ((char *) buffer.Ptr(), STRING_BUFFER_LEN * i, str, marker);
         i *= 2;
         }