From 3a2b562ff4131b62ba9ea9f1071b7ad4276c04b3 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 31 Aug 2012 16:44:23 -0600
Subject: [PATCH] remove debugging printf

---
 collects/ffi/unsafe/com.rkt | 1 -
 1 file changed, 1 deletion(-)

diff --git a/collects/ffi/unsafe/com.rkt b/collects/ffi/unsafe/com.rkt
index 21773db731..8e8ef9f953 100644
--- a/collects/ffi/unsafe/com.rkt
+++ b/collects/ffi/unsafe/com.rkt
@@ -1869,7 +1869,6 @@
                         method-result))
               (cond
                [(zero? hr)
-                                (log-error (format "result kind: ~s" (VARIANT-vt method-result)))
                 (begin0
                  (if method-result
                      (variant-to-scheme method-result)