;ELC   
;;; compiled by rms@mole.gnu.ai.mit.edu on Wed Mar  6 00:35:03 1996
;;; from file /home/fsf/rms/e19/lisp/paren.el
;;; emacs version 19.30.91.2.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`paren.el' was compiled for Emacs 19.29 or later"))


(byte-code "! B! B!  B!- B!: B" [boundp show-paren-overlay nil current-load-list show-paren-overlay-1 show-paren-mode show-paren-idle-timer show-paren-mismatch-face] 2)
#@62 *Time in seconds to delay before showing the matching paren.
(defvar show-paren-delay (byte-code "! Ç" [featurep lisp-float-type .125 1] 2) (#$ . -683))
#@58 *Name of the face to use for showing the matching paren.
(defvar show-paren-face (quote region) (#$ . -849))
#@287 Toggle Show Paren mode.
With prefix ARG, turn Show Paren mode on if and only if ARG is positive.
Returns the new status of Show Paren mode (non-nil means on).

When Show Paren mode is enabled, any matching parenthesis is highlighted
after `show-paren-delay' seconds of Emacs idle time.
(defalias 'show-paren-mode #[(&optional arg) "V 	 	!V \f??! !0 \n#R A !A !R !R !)" [window-system arg prefix-numeric-value 0 show-paren-mode on-p blink-matching-paren-on-screen show-paren-idle-timer cancel-timer run-with-idle-timer show-paren-delay t show-paren-function show-paren-overlay overlay-buffer delete-overlay show-paren-overlay-1] 5 (#$ . 965) "P"])
(defalias 'show-paren-function #[nil "5`\nhz= ' gz='  \fA e`\fZ]d`\f\\^}Ώl \f^\f]fzUk Sff!=?*    \"!\" \"\"  !*U ! !`\\`p$ `\\`\"!!# ! !! !!' 'Zp$\nZ\"''#4'$'!$'!!4!!4!!-" [window-system nil show-paren-face face oldpos mismatch dir pos 41 -1 40 1 blink-matching-paren-distance (byte-code "`	\"" [scan-sexps dir pos] 3) ((error)) end beg 36 matching-paren show-paren-mismatch-face x-display-color-p add-to-list facemenu-unlisted-faces paren-mismatch make-face face-nontrivial-p t set-face-background "purple" set-face-foreground "white" message "Paren mismatch" show-paren-overlay-1 move-overlay make-overlay overlay-put overlay-buffer delete-overlay show-paren-overlay] 6])
(byte-code "\"!!" [add-hook window-setup-hook (lambda nil (show-paren-mode t)) show-paren-mode t provide paren] 3)
