diff --git a/runtime/runtime.c b/runtime/runtime.c
index 20b7c3a04..8cbf6b5f0 100644
--- a/runtime/runtime.c
+++ b/runtime/runtime.c
@@ -228,10 +228,6 @@ extern void* Barray (int n, ...) {
   return r->contents;
 }
 
-extern int __IS_VALID_HEAP_POINTER(size_t *p);
-extern int __IN_PASSIVE_SPACE(size_t * p);
-extern int __IS_FORWARD_PTR(size_t * p);
-
 extern void* Bsexp (int n, ...) {
   va_list args = (va_list) BOX (NULL);
   int     i    = BOX(0);
@@ -257,11 +253,6 @@ extern void* Bsexp (int n, ...) {
     ai = va_arg(args, int);
     
     p = (size_t*) ai;
-    if (!UNBOXED(p) && __IN_PASSIVE_SPACE(p) && __IS_FORWARD_PTR((size_t*)*(p-1))){
-      printf ("Bsexp: %p\n", p);
-      fflush(stdout);
-    }
-      
     ((int*)d->contents)[i] = ai;
   }
 
@@ -468,16 +459,6 @@ static void gc_swap_spaces (void) {
 # define IS_FORWARD_PTR(p)			\
   (!UNBOXED(p) && IN_PASSIVE_SPACE(p))
 
-int __IS_VALID_HEAP_POINTER(size_t *p) {
-  return IS_VALID_HEAP_POINTER(p);
-}
-int __IN_PASSIVE_SPACE(size_t * p) {
-  return IN_PASSIVE_SPACE(p);
-}
-int __IS_FORWARD_PTR(size_t * p) {
-  return IS_FORWARD_PTR(p);
-}
- 
 extern size_t * gc_copy (size_t *obj);
 
 static void copy_elements (size_t *where, size_t *from, int len) {