--- a/lisp/bytecomp/bytecomp-runtime.el	Mon Aug 13 09:00:04 2007 +0200
+++ b/lisp/bytecomp/bytecomp-runtime.el	Mon Aug 13 09:02:59 2007 +0200
@@ -113,34 +113,6 @@
   (put var 'byte-obsolete-variable new)
   var)
 
-;; By overwhelming demand, we separate out truly obsolete symbols from
-;; those that are present for GNU Emacs compatibility.
-(defun make-compatible (fn new)
-  "Make the byte-compiler know that FUNCTION is provided for compatibility.
-The warning will say that NEW should be used instead.
-If NEW is a string, that is the `use instead' message."
-  (interactive "aMake function compatible: \nxCompatible replacement: ")
-  (let ((handler (get fn 'byte-compile)))
-    (if (eq 'byte-compile-compatible handler)
-	(setcar (get fn 'byte-compatible-info) new)
-      (put fn 'byte-compatible-info (cons new handler))
-      (put fn 'byte-compile 'byte-compile-compatible)))
-  fn)
-
-(defun make-compatible-variable (var new)
-  "Make the byte-compiler know that VARIABLE is provided for compatibility.
-and NEW should be used instead.  If NEW is a string, then that is the
-`use instead' message."
-  (interactive
-   (list
-    (let ((str (completing-read "Make variable compatible: "
-				obarray 'boundp t)))
-      (if (equal str "") (error ""))
-      (intern str))
-    (car (read-from-string (read-string "Compatible replacement: ")))))
-  (put var 'byte-compatible-variable new)
-  var)
-
 (put 'dont-compile 'lisp-indent-hook 0)
 (defmacro dont-compile (&rest body)
   "Like `progn', but the body always runs interpreted (not compiled).
@@ -195,9 +167,9 @@
   verbose	  t, nil		byte-compile-verbose
   optimize	  t, nil, source, byte	byte-optimize
   warnings	  list of warnings	byte-compile-warnings
-  file-format	  emacs18, emacs19	byte-compile-emacs18-compatibility
+  file-format	  emacs19, emacs20	byte-compile-emacs19-compatibility
 
-The value specified with the `warnings' option must be a list, containing
+The value specificed with the `warnings' option must be a list, containing
 some subset of the following flags:
 
   free-vars	references to variables not in the current lexical scope.