remove debugging check

svn: r5328
2007-01-12 07:13:12 +00:00 · 2007-01-12 07:13:12 +00:00 · bc1f25bc30
commit bc1f25bc30
parent 91add0453f
1 changed files with 1 additions and 5 deletions
--- a/src/mzscheme/src/print.c
+++ b/src/mzscheme/src/print.c
@ -1308,11 +1308,7 @@ Scheme_Object *scheme_marshal_wrap_set(Scheme_Marshal_Tables *mt, Scheme_Object
      mt->rn_saved = rn_saved;
    }
    if (mt->pass >= 2) {
-      /* REMOVEME */
-      obj = scheme_hash_get(mt->rn_saved, obj);
-      if (!scheme_equal(obj, val))
-        scheme_signal_error("marshaled form changed on third pass: %V versus %V",
-                            obj, val);
+      /* Done already */
    } else
      scheme_hash_set(mt->rn_saved, obj, val);