;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:09:06 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/obsolete/awk-mode.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

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


#@44 Syntax table in use in `awk-mode' buffers.
(defvar awk-mode-syntax-table (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\306#\210\302\310\311#\210\302\312\313#\210\302\314\315#\210\302\316\315#\210\302\317\315#\210\302\320\315#\210\302\321\315#\210\302\322\315#\210\302\323\315#\210\302\324\315#\210\302\325\315#\210\302\326\327#\210\302\330\313#\210)\207" [st make-syntax-table modify-syntax-entry 92 "\\" 10 ">   " 12 35 "<   " 47 "\"" 42 "." 43 45 61 37 60 62 38 124 95 "_" 39] 4) (#$ . 560))
#@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\\|d\\(?:elete\\|o\\)\\|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)) (#$ . 1092))
(require 'syntax)
#@36 Syntactic keywords for `awk-mode'.
(defconst awk-font-lock-syntactic-keywords '(("[^<=>-+*%/!^,~(?:|& 	\n\f]\\s-*\\(/\\)" (1 (unless (nth 3 (syntax-ppss (match-beginning 1))) ".")))) (#$ . 2056))
(byte-code "\300\301N\204\302\300\301\303\304!#\210\305\306!\204\302\306\307\310#\210\300\207" [awk-mode-hook variable-documentation put purecopy "Hook run when entering AWK mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" boundp awk-mode-map definition-name awk-mode] 5)
(defvar awk-mode-map (make-sparse-keymap))
(byte-code "\300\301N\204\302\300\301\303\304!#\210\305\306!\204\302\306\307\310#\210\300\207" [awk-mode-map variable-documentation put purecopy "Keymap for `awk-mode'." boundp awk-mode-syntax-table definition-name awk-mode] 5)
(defvar awk-mode-syntax-table (make-syntax-table))
(byte-code "\300\301N\204\302\300\301\303\304!#\210\302\305\306\307#\207" [awk-mode-syntax-table variable-documentation put purecopy "Syntax table for `awk-mode'." awk-mode-abbrev-table definition-name awk-mode] 5)
(defvar awk-mode-abbrev-table (progn (define-abbrev-table 'awk-mode-abbrev-table nil) awk-mode-abbrev-table))
(byte-code "\300\301N\204\302\300\301\303\304!#\210\302\305\306\307#\207" [awk-mode-abbrev-table variable-documentation put purecopy "Abbrev table for `awk-mode'." awk-mode derived-mode-parent c-mode] 5)
#@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\300!\210\307\310 \210\311\312\310\313N\203\314\311\313\310\313N#\210\315!\204'\316\317 \"\210\320\f!\211\2036
\321 =\203<\322\f\323 \"\210)\324%\325\"\204V%&=\204V\326%\325&C#\210\327!\210\330\f!\210%&\306\331!\210\332'P\306\333!\210\306\334!\210\335\306\336!\210\337\306\340!\210\341 \342()\343\344!\207" [delay-mode-hooks major-mode mode-name awk-mode-map awk-mode-syntax-table parent make-local-variable t c-mode awk-mode "AWK" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table paragraph-start "$\\|" paragraph-separate comment-start "# " comment-end "" comment-start-skip "#+ *" (awk-font-lock-keywords nil nil ((95 . "w")) nil (parse-sexp-lookup-properties . t) (font-lock-syntactic-keywords . awk-font-lock-syntactic-keywords)) run-mode-hooks awk-mode-hook awk-mode-abbrev-table local-abbrev-table page-delimiter font-lock-defaults] 6 (#$ . 3479) nil])
(provide 'awk-mode)