diff --git a/c/print.h b/c/print.h
index 67031db..389c952 100644
--- a/c/print.h
+++ b/c/print.h
@@ -1059,14 +1059,6 @@ static struct builtinspec printfunc_info[] = {
     { "write-shared", builtin_write_shared },
     { "write-simple", builtin_write_simple },
     { "newline", builtin_newline },
-
-    { "xdisplay", builtin_display },
-    { "xdisplayln", builtin_displayln },
-    { "xwrite", builtin_write },
-    { "xwriteln", builtin_writeln },
-    { "xwrite-shared", builtin_write_shared },
-    { "xwrite-simple", builtin_write_simple },
-    { "xnewline", builtin_newline },
     { NULL, NULL }
 };
 
diff --git a/scheme-core/system.scm b/scheme-core/system.scm
index eed8af4..570afe8 100644
--- a/scheme-core/system.scm
+++ b/scheme-core/system.scm
@@ -5,9 +5,6 @@
 
 (define (void) #t)  ; the unspecified value
 
-(define princ #f)
-(define print #f)
-
 (define *builtins*
   (vector
    0 0 0 0 0 0 0 0 0 0 0 0