From fd00f718cf5b7634cdef934cebd9dc7e844ad198 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 27 Jun 2006 22:29:37 +0000
Subject: [PATCH] accidentally left epm_tried in test mode

svn: r3511
---
 src/foreign/foreign.c   | 2 +-
 src/foreign/foreign.ssc | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/foreign/foreign.c b/src/foreign/foreign.c
index ec3cb4768c..0b365eb7b4 100644
--- a/src/foreign/foreign.c
+++ b/src/foreign/foreign.c
@@ -89,7 +89,7 @@
 START_XFORM_SKIP;
 #endif
 
-int epm_tried = 1;
+int epm_tried = 0;
 typedef BOOL (*EnumProcessModules_t)(HANDLE hProcess, HMODULE* lphModule,
                                      DWORD cb, LPDWORD lpcbNeeded);
 EnumProcessModules_t _EnumProcessModules;
diff --git a/src/foreign/foreign.ssc b/src/foreign/foreign.ssc
index 30a69955b7..7aafbfdac9 100755
--- a/src/foreign/foreign.ssc
+++ b/src/foreign/foreign.ssc
@@ -96,7 +96,7 @@ exec mzpp -s "---begin" -o `echo "$0" | sed 's/ssc$/c/'` "$0"
 START_XFORM_SKIP;
 #endif
 
-int epm_tried = 1;
+int epm_tried = 0;
 typedef BOOL (*EnumProcessModules_t)(HANDLE hProcess, HMODULE* lphModule,
                                      DWORD cb, LPDWORD lpcbNeeded);
 EnumProcessModules_t _EnumProcessModules;