[project @ 2000-05-10 13:07:43 by simonmar]

[ghc-hetmet.git] / ghc / interpreter / object.c

diff --git a/ghc/interpreter/object.c b/ghc/interpreter/object.c
index e676f59..75a1b7f 100644 (file)
--- a/ghc/interpreter/object.c
+++ b/ghc/interpreter/object.c
@@ -81,9 +81,6 @@ ObjectCode*  ocNew ( void   (*errMsg)(char*),
    oc->sizesectionTab    = 0;
    oc->usedsectionTab    = 0;
    oc->next              = NULL;
-fprintf ( stderr, "ocNew: loading into %10p .. %10p (%d)\n", 
-          ((char*)(oc->oImage)),
-          ((char*)(oc->oImage)) + objFileSize - 1, objFileSize );
    return oc;
 }