|
Server : Apache/2.2.17 (Unix) mod_ssl/2.2.17 OpenSSL/0.9.8e-fips-rhel5 DAV/2 PHP/5.2.17 System : Linux localhost 2.6.18-419.el5 #1 SMP Fri Feb 24 22:47:42 UTC 2017 x86_64 User : nobody ( 99) PHP Version : 5.2.17 Disable Function : NONE Directory : /proc/21585/root/usr/share/emacs/site-lisp/ |
Upload File : |
;ELC
;;; Compiled by mockbuild@builder3.centos.org on Sat Jan 6 08:45:32 2007
;;; from file /builddir/build/BUILD/autoconf-2.59/lib/emacs/elc.21698/autotest-mode.el
;;; in Emacs version 21.4.1
;;; with bytecomp version 2.85.4.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
(< (aref emacs-version (1- (length emacs-version))) ?A)
(or (and (boundp 'epoch::version) epoch::version)
(string-lessp emacs-version "19.29")))
(error "`autotest-mode.el' was compiled for Emacs 19.29 or later"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\301B\302\301!\204\f \303\301\207" [current-load-list autotest-font-lock-keywords boundp (("\\bdnl\\b\\(.*\\)" 1 font-lock-comment-face t) ("\\$[0-9*#@]" . font-lock-variable-name-face) ("^\\(m4_define\\|m4_defun\\)(\\[*\\([A-Za-z0-9_]+\\)" 2 font-lock-function-name-face) ("^AT_SETUP(\\[+\\([^]]+\\)" 1 font-lock-function-name-face) ("^AT_DATA(\\[+\\([^]]+\\)" 1 font-lock-variable-name-face) ("\\b\\(_?m4_[_a-z0-9]*\\|_?A[ST]_[_A-Z0-9]+\\)\\b" . font-lock-keyword-face) "default font-lock-keywords")] 2)
#@36 syntax table used in autotest mode
(defvar autotest-mode-syntax-table nil (#$ . 1179))
(byte-code "\304 \305\306\307#\210\305\310\311#\210\305\312\313#\210\305\314\315#\210\305\316\317#\210\305\320\321#\210\305\322\323#\210\305\324\325#\210\305\326\327#\210\303 B\330\303!\204O \331 \332\n\333\334#\210\n)\304\207" [autotest-mode-syntax-table current-load-list map autotest-mode-map make-syntax-table modify-syntax-entry 34 "\"" 35 "<\n" 10 ">#" 40 "()" 41 ")(" 91 "(]" 93 ")[" 42 "." 95 "_" boundp make-sparse-keymap define-key [(control c) (\;)] comment-region] 4)
#@118 Autotest value for `add-log-current-defun-function'.
This tells add-log.el how to find the current test group/macro.
(defalias 'autotest-current-defun #[nil "\212\300\301\302\303#\205 \304\224\304\225{)\207" [re-search-backward "^\\(m4_define\\|m4_defun\\|AT_SETUP\\)(\\[+\\([^]]+\\)" nil t 2] 4 (#$ . 1766)])
#@78 A major-mode to edit Autotest files like testsuite.at.
\{autotest-mode-map}
(defalias 'autotest-mode #[nil "\306 \210\307!\210\310\301!\210\311\310\302!\210\312\310\303!\210\313\310\314!\210\315\316\317\f\320!\210\321\322!\207" [autotest-mode-map add-log-current-defun-function comment-start parse-sexp-ignore-comments major-mode mode-name kill-all-local-variables use-local-map make-local-variable autotest-current-defun "# " t font-lock-defaults autotest-mode "Autotest" (autotest-font-lock-keywords nil) set-syntax-table run-hooks autotest-mode-hook autotest-mode-syntax-table] 2 (#$ . 2083) nil])
(provide 'autotest-mode)