From f8622080bb4a90429d7d8fc561d5d1ce1cef3ec2 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sun, 12 May 2013 16:59:28 -0600
Subject: [PATCH] fix build for Windows

---
 src/racket/cmdline.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/racket/cmdline.inc b/src/racket/cmdline.inc
index d3f7656fc9..22b4dec266 100644
--- a/src/racket/cmdline.inc
+++ b/src/racket/cmdline.inc
@@ -252,7 +252,7 @@ static void configure_environment(Scheme_Object *mod)
   a[0] = submod;
   a[1] = scheme_make_true();
   v = scheme_apply(mdp, 2, a);
-  if (SCHEME_TRUEP(v)) {
+  if (!SAME_OBJ(scheme_make_false(), v)) {
     dyreq = scheme_builtin_value("dynamic-require");
 
     a[0] = submod;