| Current Path : /usr/share/emacs/24.3/lisp/progmodes/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/progmodes/cc-awk.elc |
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:09:18 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/progmodes/cc-awk.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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'cc-defs)
#@42 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\306#\210\302\311\312#\210\302\313\314#\210\302\315\314#\210\302\316\314#\210\302\317\314#\210\302\320\314#\210\302\321\314#\210\302\322\314#\210\302\323\314#\210\302\324\314#\210\302\325\314#\210\302\326\327#\210\302\330\314#\210)\207" [st make-syntax-table modify-syntax-entry 92 "\\" 10 "> " 13 12 35 "< " 47 "." 42 43 45 61 37 60 62 38 124 95 "_" 39] 4) (#$ . 578))
(defconst c-awk-esc-pair-re "\\\\\\(.\\|\n\\|
\\|\\'\\)")
(defconst c-awk-non-eol-esc-pair-re "\\\\\\(.\\|\\'\\)")
(defconst c-awk-comment-without-nl "#.*")
(defconst c-awk-nl-or-eob "\\(\n\\|
\\|\\'\\)")
(defconst c-awk-escaped-nl "\\\\[\n
]")
(defconst c-awk-escaped-nls* (concat "\\(" c-awk-escaped-nl "\\)*"))
(defconst c-awk-escaped-nls*-with-space* (concat "\\(" c-awk-escaped-nl "\\|" "[ ]" "\\)*"))
(defconst c-awk-blank-or-comment-line-re "[ ]*\\(#\\|\\\\?$\\)")
(defconst c-awk-harmless-char-re "[^_#/\"\\\\\n
]")
(defconst c-awk-harmless-_ "_\\([^\"]\\|\\'\\)")
(defconst c-awk-harmless-string*-re (concat "\\(" c-awk-harmless-char-re #1="\\|" c-awk-esc-pair-re #1# c-awk-harmless-_ "\\)*"))
(defconst c-awk-harmless-string*-here-re (concat "\\=" c-awk-harmless-string*-re))
(defconst c-awk-harmless-line-re (concat c-awk-harmless-string*-re "\\(" c-awk-comment-without-nl "\\)?" c-awk-nl-or-eob))
(defconst c-awk-harmless-lines+-here-re (concat "\\=\\(" c-awk-harmless-line-re "\\)+"))
(defconst c-awk-string-ch-re "[^\"\\\n
]")
(defconst c-awk-string-innards-re (concat "\\(" c-awk-string-ch-re "\\|" c-awk-esc-pair-re "\\)*"))
(defconst c-awk-string-without-end-here-re (concat "\\=_?\"" c-awk-string-innards-re))
(defconst c-awk-one-line-possibly-open-string-re (concat "\"\\(" c-awk-string-ch-re "\\|" c-awk-non-eol-esc-pair-re "\\)*" "\\(\"\\|\\\\?$\\|\\'\\)"))
(defconst c-awk-regexp-normal-re "[^[/\\\n
]")
(defconst c-awk-escaped-newlines*-re "\\(\\\\[\n
]\\)*")
(defconst c-awk-regexp-char-class-re "\\[:[a-z]+:\\]")
(defconst c-awk-regexp-char-list-re (concat "\\[" c-awk-escaped-newlines*-re "^?" c-awk-escaped-newlines*-re "]?" "\\(" c-awk-esc-pair-re #1="\\|" c-awk-regexp-char-class-re #1# "[^]\n
]" "\\)*" "\\(]\\|$\\)"))
(defconst c-awk-regexp-one-line-possibly-open-char-list-re (concat "\\[\\]?\\(" c-awk-non-eol-esc-pair-re "\\|" "[^]\n
]" "\\)*" "\\(]\\|\\\\?$\\|\\'\\)"))
(defconst c-awk-regexp-innards-re (concat "\\(" c-awk-esc-pair-re #1="\\|" c-awk-regexp-char-list-re #1# c-awk-regexp-normal-re "\\)*"))
(defconst c-awk-regexp-without-end-re (concat "/" c-awk-regexp-innards-re))
(defconst c-awk-one-line-possibly-open-regexp-re (concat "/\\(" c-awk-non-eol-esc-pair-re #1="\\|" c-awk-regexp-one-line-possibly-open-char-list-re #1# c-awk-regexp-normal-re "\\)*" "\\(/\\|\\\\?$\\|\\'\\)"))
(defconst c-awk-neutral-re "\\([{}@` ]\\|\\+\\+\\|--\\|\\\\.\\)")
(defconst c-awk-neutrals*-re (concat "\\(" c-awk-neutral-re "\\)*"))
(defconst c-awk-var-num-ket-re "[])0-9a-zA-Z_$.\200-\377]+")
(defconst c-awk-div-sign-re (concat c-awk-var-num-ket-re c-awk-neutrals*-re "/"))
(defconst c-awk-non-arith-op-bra-re "[[(&=:!><,?;'~|]")
(defconst c-awk-regexp-sign-re (concat c-awk-non-arith-op-bra-re c-awk-neutrals*-re "/"))
(defconst c-awk-_-harmless-nonws-char-re "[^#/\"\\\\\n
]")
(defconst c-awk-one-line-non-syn-ws*-re (concat "\\([ ]*" "\\(" c-awk-_-harmless-nonws-char-re #1="\\|" c-awk-non-eol-esc-pair-re #1# c-awk-one-line-possibly-open-string-re #1# c-awk-one-line-possibly-open-regexp-re "\\)" "\\)*"))
(defalias 'c-awk-after-if-for-while-condition-p #[(&optional do-lim) "`Sf\302=\205+ \212\303\304\305\217\211\205* b\210\306 \210\307\310!\206* \307\311!\205* \312 !\313=?*\207" [par-pos do-lim 41 nil (byte-code "\300`\301\302#\207" [scan-lists -1 0] 4) ((error)) c-backward-token-1 looking-at "\\(if\\|for\\)\\>\\([^_]\\|$\\)" "while\\>\\([^_]\\|$\\)" c-beginning-of-statement-1 beginning] 4])
(defalias 'c-awk-after-function-decl-param-list #[nil "`Sf\301=\205% \212\302\303\304\217\211\205$ b\210\305 \210\306\307!\205$ \305 \210\306\310!*\207" [par-pos 41 nil (byte-code "\300`\301\302#\207" [scan-lists -1 0] 4) ((error)) c-backward-token-1 looking-at "[_a-zA-Z][_a-zA-Z0-9]*\\>" "func\\(tion\\)?\\>"] 4])
(defalias 'c-awk-after-continue-token #[nil "\212\300 \210\301\302!\203 o\204 \303u\210\301\304!)\207" [c-backward-token-1 looking-at "[&|]" -1 "[,{?:]\\|&&\\|||\\|do\\>\\|else\\>"] 2])
(defalias 'c-awk-after-rbrace-or-statement-semicolon #[nil "`Sf\301=\206- `Sf\302=\205- \212\303\304\305\217\211\205, b\210\306\307!\205+ \310 \205+ \306\311!?*\207" [par-pos 125 59 nil (byte-code "\300`\301\302#\207" [scan-lists -1 1] 4) ((error)) looking-at "(" c-backward-token-1 "for\\>"] 4])
(defalias 'c-awk-back-to-contentful-text-or-NL-prop #[nil "\304\211\211o\204l \305`S\306\"\211\204l \307\310!`\214 \206 ed}\210\311 \210)`U\203> \312`S\313 \211T\306\n$\210)\202l \314\315!\203h \304\210\316\317 \320#\203e \304\210\321u\210\214 \206[ ed}\210\311 \210)\202h \304\210n\204 \n+\207" [bsws-pos bol-pos nl-prop -pos- nil get-text-property c-awk-NL-prop line-beginning-position 0 c-backward-sws 36 put-text-property looking-at "[ ]*\\\\+$" search-backward-regexp "\\(^\\|[^\\]\\)\\(\\\\\\\\\\)*\\\\$" t -1] 5])
(defalias 'c-awk-calculate-NL-prop-prev-line #[(&optional do-lim) "\212\305 \306\216\307 \210`\310 n\204T \311 !\204\" \312 \204\" \313 \203& \314\202B \315\316!\2035 \317 \2045 \320\202B `Sf\321>\203A \322\202B \323\324\210` \325\f\211T\326\n$\210)\324y\210` W\203\205 \n\327>\203e \330\202s \n\320=\203s \315\316!\204s \323\324y\210`S \325\f\211T\326\n$\210)\202T \n-\207" [save-match-data-internal pos nl-prop do-lim -pos- match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) beginning-of-line c-awk-back-to-contentful-text-or-NL-prop c-awk-after-if-for-while-condition-p c-awk-after-function-decl-param-list c-awk-after-continue-token 123 looking-at "[ ]*\\\\$" c-awk-after-rbrace-or-statement-semicolon 92 (59 125) 125 36 nil put-text-property c-awk-NL-prop (125 36 nil) 35] 5])
(defalias 'c-awk-get-NL-prop-prev-line #[(&optional do-lim) "o?\205 \301\302\303!\304\"\206 \305!\207" [do-lim get-text-property line-end-position 0 c-awk-NL-prop c-awk-calculate-NL-prop-prev-line] 3])
(defalias 'c-awk-get-NL-prop-cur-line #[(&optional do-lim) "\212\302\211\210\302y\303U\203 \304\305\303\"\210\306\307 !\203 \310\311!\210*\207" [extra-nl do-lim nil 1 insert-char 10 t c-awk-get-NL-prop-prev-line delete-char -1] 4])
(defalias 'c-awk-prev-line-incomplete-p #[(&optional do-lim) "\301!\302>\207" [do-lim c-awk-get-NL-prop-prev-line (92 123)] 2])
(put 'c-awk-prev-line-incomplete-p 'byte-optimizer 'byte-compile-inline-expand)
(defalias 'c-awk-cur-line-incomplete-p #[(&optional do-lim) "\301!\302>\207" [do-lim c-awk-get-NL-prop-cur-line (92 123)] 2])
(put 'c-awk-cur-line-incomplete-p 'byte-optimizer 'byte-compile-inline-expand)
(defalias 'c-awk-at-vsemi-p #[(&optional pos) "\212\305\203 b\210`\306y\210\307 !\210` =\2052 \310 \211\311=\203/ \305y\306=\203/ \312\f!\204 \n\313=+\207" [pos pos-or-point nl-prop c-awk-one-line-non-syn-ws*-re c-awk-blank-or-comment-line-re nil 0 search-forward-regexp c-awk-get-NL-prop-cur-line 92 looking-at 36] 2])
(defalias 'c-awk-vsemi-status-unknown-p #[nil "\300\301 \302\"?\207" [get-text-property line-end-position c-awk-NL-prop] 3])
(defalias 'c-awk-clear-NL-props #[(beg end) "\214~\210\301d\302#)\207" [beg remove-text-properties (c-awk-NL-prop nil)] 4])
(defalias 'c-awk-unstick-NL-prop #[nil "\301\300!\205 \302\303\"?\205 \304B\211\207" [text-property-default-nonsticky boundp assoc c-awk-NL-prop (c-awk-NL-prop . t)] 3])
(defalias 'c-awk-beginning-of-logical-line #[(&optional pos) "\203 b\210\301y\210`eV\203 `SSf\302=\203 \303y\210\202\n `\207" [pos 0 92 -1] 2])
(defalias 'c-awk-beyond-logical-line #[(&optional pos) "\212\203 b\210\301\210`dW\203 `Sf\302=\203 \303\210\202 `dW\203* `T\202+ `)\207" [pos nil 92 2] 2])
(defalias 'c-awk-set-string-regexp-syntax-table-properties #[(beg end) "f\303=\203\n T d=\203 \304\n\211T\305\306$\210)\202\\ f fU\204? \304\n\211T\305\307$\210) \304\n\211T\305\310$\210)\202\\ f\311=\203\\ \304\n\211T\305\312$\210) \304\n\211T\305\313$\210)\212Tb\210m\206| \314\315 \316#\205| `S\304\n\211T\305\317$\210)\202e )\207" [beg end -pos- 95 put-text-property syntax-table (15) (15) (15) 47 (7) (7) search-forward "\"" t (1)] 5])
(defalias 'c-awk-syntax-tablify-string #[nil "\301\302\303#\210\304\305\224\305\225\"\210\306\307!\203 \302u\210\303\207\306\310!\203# \302u\210\302\207\302\207" [c-awk-string-without-end-here-re search-forward-regexp nil t c-awk-set-string-regexp-syntax-table-properties 0 looking-at "\"" "[\n
]"] 4])
(defalias 'c-awk-syntax-tablify-/ #[(anchor anchor-state-/div) "` b\210\n\203 \306 T\307#?\202 \306\fT\307#\203$ Tb\210\310\202M b\210\306
!\210\311\312\224\312\225\"\210\313\314!\203? \310u\210\307\202M \313\315!\203L \310u\210\310\202M \310)\207" [/point anchor anchor-state-/div c-awk-regexp-sign-re c-awk-div-sign-re c-awk-regexp-without-end-re search-forward-regexp t nil c-awk-set-string-regexp-syntax-table-properties 0 looking-at "/" "[\n
]"] 4])
(defalias 'c-awk-set-syntax-table-properties #[(lim) "\305\211\306 \210\307`\n\310#\210\311 \305\312#\203 \305`\nW\2038 `\311\f\305\312#\210\313\314!\2030 \315 \2024 \316 \"\202
*\305\207" [anchor-state-/div anchor lim c-awk-harmless-lines+-here-re c-awk-harmless-string*-here-re nil c-awk-beginning-of-logical-line remove-text-properties (syntax-table nil) search-forward-regexp t looking-at "_?\"" c-awk-syntax-tablify-string c-awk-syntax-tablify-/] 4])
(defvar c-awk-old-ByLL 0)
(make-variable-buffer-local 'c-awk-old-Byll)
(defalias 'c-awk-record-region-clear-NL #[(beg end) "\306 \307\211\307\310\211 \310\211
\310 \311\216\312!\306 \307\211\307\310\211 \310\211
\310 \313\216\314d\".\207" [modified buffer-undo-list inhibit-read-only inhibit-point-motion-hooks before-change-functions after-change-functions buffer-modified-p t nil ((byte-code "\204
\301 \203
\302\303!\210\303\207" [modified buffer-modified-p set-buffer-modified-p nil] 2)) c-awk-beyond-logical-line ((byte-code "\204
\301 \203
\302\303!\210\303\207" [modified buffer-modified-p set-buffer-modified-p nil] 2)) c-awk-clear-NL-props deactivate-mark buffer-file-name buffer-file-truename end c-awk-old-ByLL] 4])
(defalias 'c-awk-end-of-change-region #[(beg end old-len) " Z\n Z\\\304\n!]\207" [c-awk-old-ByLL old-len end beg c-awk-beyond-logical-line] 3])
(defalias 'c-awk-extend-and-syntax-tablify-region #[(beg end old-len) "\306 \307\211\307\310\211 \310\211
\310 \311\216\312#\313!\211b\210\314!.\n\207" [modified buffer-undo-list inhibit-read-only inhibit-point-motion-hooks before-change-functions after-change-functions buffer-modified-p t nil ((byte-code "\204
\301 \203
\302\303!\210\303\207" [modified buffer-modified-p set-buffer-modified-p nil] 2)) c-awk-end-of-change-region c-awk-beginning-of-logical-line c-awk-set-syntax-table-properties deactivate-mark buffer-file-name buffer-file-truename beg end old-len c-new-END c-new-BEG] 5])
#@47 Default expressions to highlight in AWK mode.
(defconst awk-font-lock-keywords '(("^\\s *\\(func\\(tion\\)?\\)\\>\\s *\\(\\sw+\\)?" (1 font-lock-keyword-face) (3 font-lock-function-name-face nil t)) ("\\<\\(ARG\\(?:IND\\|[CV]\\)\\|BINMODE\\|CONVFMT\\|E\\(?:NVIRON\\|RRNO\\)\\|F\\(?:I\\(?:ELDWIDTHS\\|LENAME\\)\\|NR\\|S\\)\\|IGNORECASE\\|LINT\\|N[FR]\\|O\\(?:F\\(?:MT\\|S\\)\\|RS\\)\\|PROCINFO\\|R\\(?:LENGTH\\|START\\|[ST]\\)\\|SUBSEP\\|TEXTDOMAIN\\)\\>" . font-lock-variable-name-face) ("\\(\"/dev/\\(fd/[0-9]+\\|p\\(\\(\\(gr\\)?p\\)?id\\)\\|std\\(err\\|in\\|out\\)\\|user\\)\\)\\>\\(\\(\"\\)\\|\\([^\"/\n
][^\"\n
]*\\)?$\\)" (1 font-lock-variable-name-face t) (8 font-lock-variable-name-face t t)) ("\\(\"/inet/\\(\\(raw\\|\\(tc\\|ud\\)p\\)/lport/rhost/rport\\)\\)\\>\\(\\(\"\\)\\|\\([^\"/\n
][^\"\n
]*\\)?$\\)" (1 font-lock-variable-name-face t) (6 font-lock-variable-name-face t t)) "\\<\\(BEGIN\\|END\\|break\\|c\\(?:\\(?:as\\|ontinu\\)e\\)\\|d\\(?:e\\(?:fault\\|lete\\)\\|o\\)\\|e\\(?:lse\\|xit\\)\\|for\\|getline\\|i[fn]\\|next\\(?:file\\)?\\|return\\|switch\\|while\\)\\>" (eval list "\\<\\(a\\(?:dump\\|nd\\|sort\\|tan2\\)\\|bindtextdomain\\|c\\(?:lose\\|o\\(?:mpl\\|s\\)\\)\\|dcgettext\\|ex\\(?:p\\|tension\\)\\|fflush\\|g\\(?:\\(?:en\\)?sub\\)\\|in\\(?:dex\\|t\\)\\|l\\(?:ength\\|og\\|shift\\)\\|m\\(?:atch\\|ktime\\)\\|or\\|printf?\\|r\\(?:and\\|shift\\)\\|s\\(?:in\\|p\\(?:lit\\|rintf\\)\\|qrt\\|rand\\|t\\(?:opme\\|r\\(?:ftime\\|tonum\\)\\)\\|ub\\(?:str\\)?\\|yst\\(?:em\\|ime\\)\\)\\|\\(?:to\\(?:\\(?:low\\|upp\\)e\\)\\|xo\\)r\\)\\>" 0 c-preprocessor-face-name) ("\\(\\w\\|_\\)\\(\\\\[\n
]\\)*\\s \\(\\\\[\n
]\\|[ ]\\)*(" (0 'font-lock-warning-face)) ("\\\\\\s +$" 0 font-lock-warning-face t) ("\\s|" 0 font-lock-warning-face t nil) ("\\(_\\)\\s|" 1 font-lock-warning-face) ("\\(_\\)\\s\"" 1 font-lock-string-face)) (#$ . 11877))
(defconst c-awk-terminated-regexp-or-string-here-re "\\=\\s\"\\S\"*\\s\"")
(defconst c-awk-unterminated-regexp-or-string-here-re "\\=\\s|\\S|*$")
(defconst c-awk-harmless-pattern-characters* (concat "\\([^{;#/\"\\\\\n
]\\|" c-awk-esc-pair-re "\\)*"))
(defalias 'c-awk-at-statement-end-p #[nil "o?\205 \212\300u\210\301\302!\206 \303 \304>\205 \301\305!)\207" [-1 looking-at "[};]" c-awk-get-NL-prop-cur-line (36 92) "[^ \n
\\]\\(\\\\[\n
]\\|[ ]\\)*[#\n
]"] 2])
#@664 Move backward to the beginning of an AWK "defun". With ARG, do it that
many times. Negative arg -N means move forward to Nth following beginning of
defun. Returns t unless search stops due to beginning or end of buffer.
By a "defun" is meant either a pattern-action pair or a function. The start
of a defun is recognized as code starting at column zero which is neither a
closing brace nor a comment nor a continuation of the previous line. Unlike
in some other modes, having an opening brace at column 0 is neither necessary
nor helpful.
Note that this function might do hidden buffer changes. See the
comment at the start of cc-engine.el for more info.
(defalias 'c-awk-beginning-of-defun #[(&optional arg) "\204 \306\307 \310\216\311 \312\211 \312 \313\211 \313\211 \313 \314\216\312 \315Y\203W \203\222 \315V\203\222 `e=\204\222 \316\317e\320#\211\203Q \321 \322>\203? S\202. `d=\204` \306u\210\203\211 \315W\203\211 `d=\204\211 \323\317d\320#\211\203\203 \321 \324>\203q T\202` \203\222 \315\224b\210.
\315=\207" [arg save-match-data-internal modified buffer-undo-list inhibit-read-only inhibit-point-motion-hooks 1 match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) buffer-modified-p t nil ((byte-code "\204
\301 \203
\302\303!\210\303\207" [modified buffer-modified-p set-buffer-modified-p nil] 2)) 0 search-backward-regexp "^[^#} \n
]" stop-at-limit c-awk-get-NL-prop-prev-line (36 125 35) search-forward-regexp (36 125 35) before-change-functions after-change-functions deactivate-mark buffer-file-name buffer-file-truename found] 5 (#$ . 14196) "p"])
(defalias 'c-awk-forward-awk-pattern #[nil "\304!\210\305\306!\203
\307\210m\203 \307\207\305\310!\203 \307\207l\203/ \307\311 !\312>)\205O \307y\202I \304\n\307\313#\204 \304 \307\313#\204 \305\314!\205O \307u\210\313\205O \202 \207" [c-awk-harmless-pattern-characters* do-lim c-awk-terminated-regexp-or-string-here-re c-awk-unterminated-regexp-or-string-here-re search-forward-regexp looking-at "#" nil "[{;]" c-awk-get-NL-prop-cur-line (92 123) t "/"] 4])
(defalias 'c-awk-end-of-defun1 #[nil "\300 \210\301\302!\203 \303`\304\"b\210\202& \301\305!\203 \306u\210\202& l\204& \307\310!\210`\207" [c-awk-forward-awk-pattern looking-at "{" scan-sexps 1 ";" nil error "c-awk-end-of-defun1: Failure of c-awk-forward-awk-pattern"] 3])
(defalias 'c-awk-beginning-of-defun-p #[nil "\301\302!\205 \303\304!\305>)?\207" [do-lim looking-at "^[^#} \n
]" nil c-awk-get-NL-prop-prev-line (92 123)] 2])
#@474 Move forward to next end of defun. With argument, do it that many times.
Negative argument -N means move back to Nth preceding end of defun.
An end of a defun occurs right after the closing brace that matches the
opening brace at its start, or immediately after the AWK pattern when there is
no explicit action; see function `c-awk-beginning-of-defun'.
Note that this function might do hidden buffer changes. See the
comment at the start of cc-engine.el for more info.
(defalias 'c-awk-end-of-defun #[(&optional arg) "\204 \306\307 \310\216\311 \312\211 \312 \313\211 \313\211 \313 \314\216`\313 \315V\203k \316 \204D \317\306!\204D b\210\317\320!\210m\204k \321 \203k `V\203[ S\211\202\\ \312\203k \315V\203k \317\320!\204D \315W\205\253 o\204\245 \317\306!\203\245 o\203\207 `\202\213 \212\321 )\211W\203\233 T\211\202\234 \312\203\245 \315W\204u ^b.\207" [arg save-match-data-internal modified buffer-undo-list inhibit-read-only inhibit-point-motion-hooks 1 match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) buffer-modified-p t nil ((byte-code "\204
\301 \203
\302\303!\210\303\207" [modified buffer-modified-p set-buffer-modified-p nil] 2)) 0 c-awk-beginning-of-defun-p c-awk-beginning-of-defun -1 c-awk-end-of-defun1 before-change-functions after-change-functions deactivate-mark buffer-file-name buffer-file-truename end-point start-point] 3 (#$ . 16761) "p"])
(provide 'cc-awk)