;ELC   
;;; Compiled by pot@pot.cnuce.cnr.it on Tue Mar 18 15:50:05 2003
;;; from file /home/pot/gnu/emacs-pretest.new/lisp/progmodes/awk-mode.el
;;; in Emacs version 21.3
;;; 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 "`awk-mode.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@42 Syntax table in use in Awk-mode buffers.
(defvar awk-mode-syntax-table nil (#$ . 628))
(byte-code "\204g \301 \302\303\304#\210\302\305\306#\210\302\307\306#\210\302\310\311#\210\302\312\313#\210\302\314\313#\210\302\315\313#\210\302\316\313#\210\302\317\313#\210\302\320\313#\210\302\321\313#\210\302\322\313#\210\302\323\313#\210\302\324\313#\210\302\325\326#\210\302\327\330#\210\301\207" [awk-mode-syntax-table make-syntax-table modify-syntax-entry 92 "\\" 10 ">   " 12 35 "<   " 47 "." 42 43 45 61 37 60 62 38 124 95 "_" 39 "\""] 4)
#@47 Default expressions to highlight in AWK mode.
(defconst awk-font-lock-keywords '(("^[ 	]*\\(function\\)\\>[ 	]*\\(\\sw+\\)?" (1 font-lock-keyword-face) (2 font-lock-function-name-face nil t)) ("\\<\\(ARG\\(?:IND\\|[CV]\\)\\|CONVFMT\\|E\\(?:NVIRON\\|RRNO\\)\\|F\\(?:I\\(?:ELDWIDTHS\\|LENAME\\)\\|NR\\|S\\)\\|IGNORECASE\\|N[FR]\\|O\\(?:F\\(?:MT\\|S\\)\\|RS\\)\\|R\\(?:LENGTH\\|S\\(?:TART\\)?\\)\\|SUBSEP\\)\\>" . font-lock-variable-name-face) "\\<\\(BEGIN\\|END\\|break\\|continue\\|delete\\|e\\(?:lse\\|xit\\)\\|for\\|getline\\|if\\|next\\|printf?\\|return\\|while\\)\\>" ("\\<\\(atan2\\|c\\(?:lose\\|os\\|time\\)\\|exp\\|gsub\\|in\\(?:dex\\|t\\)\\|l\\(?:ength\\|og\\)\\|match\\|rand\\|s\\(?:in\\|p\\(?:lit\\|rintf\\)\\|qrt\\|rand\\|ub\\(?:str\\)?\\|ystem\\)\\|t\\(?:ime\\|o\\(?:\\(?:low\\|upp\\)er\\)\\)\\)\\>" 1 font-lock-builtin-face) ("![=~]\\|&&\\|<=\\|==\\|>=\\|||\\|[<>~]" . font-lock-constant-face)) (#$ . 1190))
(byte-code "\301B\303\301!\204 \304 \302B\303\302!\204 \305\306\307\"\310B\311\310\307\"\210\312\313\314\315#\207" [current-load-list awk-mode-map awk-mode-syntax-table boundp make-sparse-keymap make-char-table syntax-table nil awk-mode-abbrev-table define-abbrev-table put awk-mode derived-mode-parent c-mode] 4)
#@303 Major mode for editing AWK code.
This is much like C mode except for the syntax of comments.  Its keymap
inherits from C mode's and it has the same variables for customizing
indentation.  It has its own abbrev table and its own syntax table.

Turning on AWK mode runs `awk-mode-hook'.

\{awk-mode-map}
(defalias 'awk-mode #[nil "\306 \210\306\307N\203 \310\311\307\312#\210\311\313\314\n!\204 \315\n\316 \"\210\317!\211\203. \f\320 =\2034 \321\322 \"\210)\203> \323\324\"\210\325\n!\210\326!\210$\327\330!\331%PL\210\327\332!L\210\327\333!\334L\210\327\335!\336L\210\327\337!\340L\210\341&\342\343!\207" [major-mode mode-name awk-mode-map awk-mode-syntax-table parent local-abbrev-table c-mode special put awk-mode t "AWK" keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table mapatoms #[(symbol) "\302\303!	\"\206 \304	\303!JK$\207" [symbol awk-mode-abbrev-table intern-soft symbol-name define-abbrev] 5] use-local-map set-syntax-table make-local-variable paragraph-start "$\\|" paragraph-separate comment-start "# " comment-end "" comment-start-skip "#+ *" (awk-font-lock-keywords nil nil ((95 . "w"))) run-hooks awk-mode-hook awk-mode-abbrev-table page-delimiter font-lock-defaults] 5 (#$ . 2441) nil])
(provide 'awk-mode)