# HG changeset patch
# User viteno
# Date 1189883515 0
# Node ID effc49a3bfb97614891d3315bc3b25d967e4c0a3
# Parent  2a953c771a4809a82c88562a2578c6d58f724e37
[xemacs-hg @ 2007-09-15 19:11:54 by viteno]
Revert Steve Young's byte-optimize change.

diff -r 2a953c771a48 -r effc49a3bfb9 lisp/byte-optimize.el
--- a/lisp/byte-optimize.el	Fri Sep 14 21:51:12 2007 +0000
+++ b/lisp/byte-optimize.el	Sat Sep 15 19:11:55 2007 +0000
@@ -1169,14 +1169,6 @@
 	(eval form)
       form)))
 
-(put 'featurep 'byte-optimizer 'byte-optimize-featurep)
-(defun byte-optimize-featurep (form)
-  (let ((str (prin1-to-string (cdr-safe form)))
-	(regex #r"\s-+s?xemacs\(\s-\|)\)"))
-    (if (string-match regex str)
-	(byte-optimize-predicate form)
-      form)))
-
 
 ;;; enumerating those functions which need not be called if the returned
 ;;; value is not used.  That is, something like