fix Windows build

svn: r18772
2010-04-09 20:05:07 +00:00 · 2010-04-09 20:05:07 +00:00 · c6cd781e82
commit c6cd781e82
parent c7606115e1
1 changed files with 1 additions and 1 deletions
--- a/src/mzscheme/cmdline.inc
+++ b/src/mzscheme/cmdline.inc
@ -198,7 +198,7 @@ static void configure_environment(Scheme_Object *mod)
        break;
      }
    }
-    if (!SCHEME_NULLP(vs)) {
+    if (!SAME_OBJ(vs, scheme_make_null())) {
      scheme_wrong_type("runtime-configure", "list of vectors of three values",
                        -1, 0, a);
    }