# HG changeset patch # User Dave Love # Date 1037728770 0 # Node ID 04ce850f4db015258153c02f910cb83669ff2d02 # Parent 192ea43d05e34a9483252562447f92ea30b59682 (side-effect-free-fns): Several additions. diff -r 192ea43d05e3 -r 04ce850f4db0 lisp/emacs-lisp/byte-opt.el --- a/lisp/emacs-lisp/byte-opt.el Tue Nov 19 17:22:52 2002 +0000 +++ b/lisp/emacs-lisp/byte-opt.el Tue Nov 19 17:59:30 2002 +0000 @@ -1,6 +1,6 @@ ;;; byte-opt.el --- the optimization passes of the emacs-lisp byte compiler -;;; Copyright (c) 1991, 1994, 2000, 2001 Free Software Foundation, Inc. +;;; Copyright (c) 1991, 1994, 2000, 2001, 2002 Free Software Foundation, Inc. ;; Author: Jamie Zawinski ;; Hallvard Furuseth @@ -1198,7 +1198,7 @@ length local-variable-if-set-p local-variable-p log log10 logand logb logior lognot logxor lsh make-list make-string make-symbol - marker-buffer max member memq min mod + marker-buffer max member memq min mod multibyte-char-to-unibyte next-window nth nthcdr number-to-string parse-colon-path plist-get plist-member prefix-numeric-value previous-window prin1-to-string propertize @@ -1206,7 +1206,8 @@ region-beginning region-end reverse round sin sqrt string string< string= string-equal string-lessp string-to-char string-to-int string-to-number substring sxhash symbol-function - symbol-name symbol-plist symbol-value + symbol-name symbol-plist symbol-value string-make-unibyte + string-make-multibyte string-as-multibyte string-as-unibyte tan truncate unibyte-char-to-multibyte upcase user-full-name user-login-name user-original-login-name user-variable-p