Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
antlr-mode.elc	77.56 KB	-rw-r--r--
asm-mode.elc	7.42 KB	-rw-r--r--
autoconf.elc	4.55 KB	-rw-r--r--
bat-mode.elc	6.56 KB	-rw-r--r--
bug-reference.elc	7.3 KB	-rw-r--r--
cc-align.elc	39.52 KB	-rw-r--r--
cc-awk.elc	17.95 KB	-rw-r--r--
cc-bytecomp.elc	10.56 KB	-rw-r--r--
cc-cmds.elc	97.51 KB	-rw-r--r--
cc-defs.elc	66.37 KB	-rw-r--r--
cc-engine.elc	231.26 KB	-rw-r--r--
cc-fonts.elc	153.13 KB	-rw-r--r--
cc-guess.elc	13.35 KB	-rw-r--r--
cc-langs.elc	110.05 KB	-rw-r--r--
cc-menus.elc	8.05 KB	-rw-r--r--
cc-mode.elc	227.86 KB	-rw-r--r--
cc-styles.elc	16.66 KB	-rw-r--r--
cc-vars.elc	77.01 KB	-rw-r--r--
cfengine.elc	48.18 KB	-rw-r--r--
cmacexp.elc	6.2 KB	-rw-r--r--
compile.elc	92.53 KB	-rw-r--r--
cperl-mode.elc	212.98 KB	-rw-r--r--
cpp.elc	23.2 KB	-rw-r--r--
cwarn.elc	11.9 KB	-rw-r--r--
dcl-mode.elc	50.32 KB	-rw-r--r--
ebnf-abn.elc	6.95 KB	-rw-r--r--
ebnf-bnf.elc	8.02 KB	-rw-r--r--
ebnf-dtd.elc	13.53 KB	-rw-r--r--
ebnf-ebx.elc	8.12 KB	-rw-r--r--
ebnf-iso.elc	7.77 KB	-rw-r--r--
ebnf-otz.elc	8.47 KB	-rw-r--r--
ebnf-yac.elc	7.4 KB	-rw-r--r--
ebnf2ps.elc	121.12 KB	-rw-r--r--
ebrowse.elc	202.8 KB	-rw-r--r--
elisp-mode.elc	58.74 KB	-rw-r--r--
etags.elc	61.3 KB	-rw-r--r--
executable.elc	7.83 KB	-rw-r--r--
f90.elc	95.13 KB	-rw-r--r--
flymake-cc.elc	3.55 KB	-rw-r--r--
flymake-proc.elc	38.04 KB	-rw-r--r--
flymake.elc	63.5 KB	-rw-r--r--
fortran.elc	59.75 KB	-rw-r--r--
gdb-mi.elc	188.72 KB	-rw-r--r--
glasses.elc	10.37 KB	-rw-r--r--
grep.elc	40.95 KB	-rw-r--r--
gud.elc	98.55 KB	-rw-r--r--
hideif.elc	48.36 KB	-rw-r--r--
hideshow.elc	25.56 KB	-rw-r--r--
icon.elc	16.75 KB	-rw-r--r--
idlw-complete-structtag.elc	4.22 KB	-rw-r--r--
idlw-help.elc	35.91 KB	-rw-r--r--
idlw-shell.elc	129.89 KB	-rw-r--r--
idlw-toolbar.elc	27.44 KB	-rw-r--r--
idlwave.elc	250.95 KB	-rw-r--r--
inf-lisp.elc	21.06 KB	-rw-r--r--
js.elc	176.3 KB	-rw-r--r--
ld-script.elc	5.44 KB	-rw-r--r--
m4-mode.elc	6.34 KB	-rw-r--r--
make-mode.elc	62.21 KB	-rw-r--r--
meta-mode.elc	31.41 KB	-rw-r--r--
mixal-mode.elc	36.18 KB	-rw-r--r--
modula2.elc	30.37 KB	-rw-r--r--
octave.elc	63.2 KB	-rw-r--r--
opascal.elc	52.47 KB	-rw-r--r--
pascal.elc	39.22 KB	-rw-r--r--
perl-mode.elc	29.41 KB	-rw-r--r--
prog-mode.elc	15.82 KB	-rw-r--r--
project.elc	17.06 KB	-rw-r--r--
prolog.elc	85.47 KB	-rw-r--r--
ps-mode.elc	33 KB	-rw-r--r--
python.elc	178.17 KB	-rw-r--r--
ruby-mode.elc	63.86 KB	-rw-r--r--
scheme.elc	18.81 KB	-rw-r--r--
sh-script.elc	116.3 KB	-rw-r--r--
simula.elc	44.83 KB	-rw-r--r--
sql.elc	182.59 KB	-rw-r--r--
subword.elc	18.77 KB	-rw-r--r--
tcl.elc	40.14 KB	-rw-r--r--
vera-mode.elc	45.08 KB	-rw-r--r--
verilog-mode.elc	450.39 KB	-rw-r--r--
vhdl-mode.elc	528.7 KB	-rw-r--r--
which-func.elc	10.4 KB	-rw-r--r--
xref.elc	56.91 KB	-rw-r--r--
xscheme.elc	38 KB	-rw-r--r--

Code Editor : cc-awk.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.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) (#$ . 427))
(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-_ "_\$[^\"]\\|\\'\$")
(defconst c-awk-harmless-char-re "[^_#/\"{}();\\\n
]")
(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-char-re "[^_#/\"\\\n
]")
(defconst c-awk-harmless-line-string*-re (concat "\$" c-awk-harmless-line-char-re #1="\\|" c-awk-esc-pair-re #1# c-awk-harmless-_ "\$*"))
(defconst c-awk-harmless-line-re (concat c-awk-harmless-line-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-possibly-open-string-re (concat "\"\$" c-awk-string-ch-re "\\|" c-awk-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 "\\|" c-awk-regexp-char-class-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-neutral-re "\$[}@` 	]\\|\\+\\+\\|--\\|\\\\\\(.\\|[\n
]\$\\)")
(defconst c-awk-neutrals*-re (concat "\$" c-awk-neutral-re "\$*"))
(defconst c-awk-var-num-ket-re "[])0-9a-zA-Z_$.]+")
(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-pre-exp-alphanum-kwd-re "\$^\\|\\=\\|[^_\n
]\$\\<\$case\\|print\\|return\$\\>\$[^_\n
]\\|$\$")
(defconst c-awk-kwd-regexp-sign-re (concat c-awk-pre-exp-alphanum-kwd-re c-awk-escaped-nls*-with-space* "/"))
(defconst c-awk-_-harmless-nonws-char-re "[^#/\"\\\n
 	]")
(defconst c-awk-non-/-syn-ws*-re (concat #1="\$" c-awk-escaped-nls*-with-space* #1# c-awk-_-harmless-nonws-char-re #2="\\|" c-awk-non-eol-esc-pair-re #2# c-awk-possibly-open-string-re "\$\\)*"))
(defconst c-awk-space*-/-re (concat c-awk-escaped-nls*-with-space* "/"))
(defconst c-awk-space*-regexp-/-re (concat c-awk-escaped-nls*-with-space* "\\s\""))
(defconst c-awk-space*-unclosed-regexp-/-re (concat c-awk-escaped-nls*-with-space* "\\s|"))
(defalias 'c-awk-after-if-for-while-condition-p #[(&optional do-lim) "`Sf\302=\2056�\212\3031�\304`\305\306#0\202�\210\307\211\2055�b\210\310 \210\311\312!\2065�\311\313!\2055�\314	!\315=?*\207" [par-pos do-lim 41 (error) scan-lists -1 0 nil c-backward-token-1 looking-at "\$if\\|for\$\\>\$[^_]\\|$\$" "while\\>\$[^_]\\|$\$" c-beginning-of-statement-1 beginning] 5])
(defalias 'c-awk-after-function-decl-param-list #[nil "`Sf\301=\2050�\212\3021�\303`\304\305#0\202�\210\306\211\205/�b\210\307 \210\310\311!\205/�\307 \210\310\312!*\207" [par-pos 41 (error) scan-lists -1 0 nil c-backward-token-1 looking-at "[_a-zA-Z][_a-zA-Z0-9]*\\>" "func\$tion\$?\\>"] 5])
(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=\2068�`Sf\302=\2058�\212\3031�\304`\305\306#0\202 �\210\307\211\2057�b\210\310\311!\2056�\312 \2056�\310\313!?*\207" [par-pos 125 59 (error) scan-lists -1 1 nil looking-at "(" c-backward-token-1 "for\\>"] 5])
(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�\n\327\267\202m�\330\202m�\315\316!\204m�\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 #[nil "\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 #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (125 96 36 96 nil 96 92 101)) 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\306	\203\n�	b\210`\307 \310 \311 \210`\fW\203X�\312
\f\"\210\313!\203X�\313!\2034�\314 \210\202�\313!\203O�\3151H�\314 \210\316u0\202K�\210\306\210\202�\317 \210\306u\210\202�`W\203d�\306y\210\202�`\n=\205\204�\320 \211\321=\203\201�\306y\322=\203\201�\313!\204j�\323=-\207" [nl-prop pos pos-or-point bol eol c-awk-non-/-syn-ws*-re nil line-beginning-position line-end-position c-awk-beginning-of-logical-line search-forward-regexp looking-at forward-sexp (error) -1 c-forward-sws c-awk-get-NL-prop-cur-line 92 0 36 c-awk-space*-/-re c-awk-space*-regexp-/-re c-awk-space*-unclosed-regexp-/-re c-awk-blank-or-comment-line-re] 3])
(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#�`S\206�`Sf\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\304=\203\n�T	d=\203\"�\n^\305\n\211T\306\307$\210)\202p�f	fU\204K�\n^\305\n\211T\306\310$\210)	\n^\305\n\211T\306\311$\210)\202p�f\312=\203p�\n^\305\n\211T\306\313$\210)	\n^\305\n\211T\306\314$\210)\212Tb\210m\206\224�\315\316	\317#\205\224�`S\n^\305\n\211T\306\320$\210)\202y�)\207" [beg end -pos- c-syntax-table-hwm 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�\306T\307#?\202\"�\306\fT\307#\204-�\306
T\307#\203-�Tb\210\310\202W�b\210\306!\210\311\312\224\312\225\"\210\313\314!\203I�\310u\210\307\202W�\313\315!\203V�\310u\210\310\202W�\310)\207" [/point anchor anchor-state-/div c-awk-regexp-sign-re c-awk-kwd-regexp-sign-re c-awk-div-sign-re search-forward-regexp t nil c-awk-set-string-regexp-syntax-table-properties 0 looking-at "/" "[\n
]" c-awk-regexp-without-end-re] 4])
(defalias 'c-awk-set-syntax-table-properties #[(lim) "\306\211\307 \210`\n
\f\306\211W\203$�\310\f\311\"\203$�\f\2029�\312\f\311\306$\211W\2037�\2029�+^\313\f\314#\210*\315\306\316#\203N�\306`\nW\203\214�`\315\306\316#\210\317\320!\203h�\321 \202\210�\306f\322=\203v�\323	\"\202\210�\306f\324>\203\204�\306u\210\306\202\210�\306u\210\316\202C�*\306\207" [anchor-state-/div anchor lim -to- -from- c-syntax-table-hwm nil c-awk-beginning-of-logical-line get-text-property syntax-table next-single-property-change remove-text-properties (syntax-table nil) search-forward-regexp t looking-at "_?\"" c-awk-syntax-tablify-string 47 c-awk-syntax-tablify-/ (123 125 40 59) pos most-positive-fixnum c-awk-harmless-lines+-here-re c-awk-harmless-string*-here-re] 7])
(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\216\311\f!\306 \f\307\211\307\312\216\313\fd\".\n\207" [#1=#:modified buffer-undo-list inhibit-read-only inhibit-modification-hooks end c-awk-old-ByLL buffer-modified-p t #[nil "?\205�\301\302!\207" [#1# restore-buffer-modified-p nil] 2] c-awk-beyond-logical-line #[nil "?\205�\301\302!\207" [#2=#:modified restore-buffer-modified-p nil] 2] c-awk-clear-NL-props #2#] 4])
(defalias 'c-awk-end-of-change-region #[(beg end old-len) "	Z\nZ\\\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\216\311\f
\f#
\312\f!\211b\210\313
!-\207" [#1=#:modified buffer-undo-list inhibit-read-only inhibit-modification-hooks beg end buffer-modified-p t #[nil "?\205�\301\302!\207" [#1# restore-buffer-modified-p nil] 2] c-awk-end-of-change-region c-awk-beginning-of-logical-line c-awk-set-syntax-table-properties 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)) (#$ . 12391))
(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\216\312\314Y\203H�\203\203�\314V\203\203�`e=\204\203�\315\316e\317#\211\203B�\320 \321>\2030�S\202�`d=\204Q�\306u\210\203z�\314W\203z�`d=\204z�\322\316d\317#\211\203t�\320 \323>\203b�T\202Q�\203\203�\314\224b\210.\314=\207" [arg save-match-data-internal #1=#:modified buffer-undo-list inhibit-read-only inhibit-modification-hooks 1 match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] buffer-modified-p t #[nil "?\205�\301\302!\207" [#1# restore-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) found] 5 (#$ . 14710) "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\216`\314\315V\203\\�\316 \2045�\317\306!\2045�b\210\317\320!\210m\204\\�\321 \203\\�`V\203L�S\211\202M�\312\203\\�\315V\203\\�\317\320!\2045�\315W\205\234�o\204\226�\317\306!\203\226�o\203x�`\202|�\212\321 )\211W\203\214�T\211\202\215�\312\203\226�\315W\204f�^b.	\207" [arg save-match-data-internal #1=#:modified buffer-undo-list inhibit-read-only inhibit-modification-hooks 1 match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] buffer-modified-p t #[nil "?\205�\301\302!\207" [#1# restore-buffer-modified-p nil] 2] nil 0 c-awk-beginning-of-defun-p c-awk-beginning-of-defun -1 c-awk-end-of-defun1 end-point start-point] 3 (#$ . 17082) "p"])
(provide 'cc-awk)

${this.title}

Code Editor : cc-awk.elc