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-guess.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.

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

(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\311\312\313\314\315&	\210\304\316\317\320\310\311\312\313\314\315&	\207" [require cc-defs cc-engine cc-styles custom-declare-variable c-guess-offset-threshold 10 "Threshold of acceptable offsets when examining indent information.\nDiscard an examined offset if its absolute value is greater than this.\n\nThe offset of a line included in the indent information returned by\n`c-guess-basic-syntax'." :version "24.1" :type integer :group c c-guess-region-max 50000 "The maximum region size for examining indent information with `c-guess'.\nIt takes a long time to examine indent information from a large region;\nthis option helps you limit that time. nil means no limit."] 10)
#@34 Currently guessed offsets-alist.
(defvar c-guess-guessed-offsets-alist nil (#$ . 1156))
#@33 Currently guessed basic-offset.
(defvar c-guess-guessed-basic-offset nil (#$ . 1250))
(defvar c-guess-accumulator nil)
(defconst c-guess-conversions '((c . c-lineup-C-comments) (inher-cont . c-lineup-multi-inher) (string . -1000) (comment-intro . c-lineup-comment) (arglist-cont-nonempty . c-lineup-arglist) (arglist-close . c-lineup-close-paren) (cpp-macro . -1000)))
#@303 Guess the style in the region up to `c-guess-region-max', and install it.

The style is given a name based on the file's absolute file name.

If given a prefix argument (or if the optional argument ACCUMULATE is
non-nil) then the previous guess is extended, otherwise a new guess is
made from scratch.
(defalias 'c-guess #[(&optional accumulate) "\302ed\206�d^	#\207" [c-guess-region-max accumulate c-guess-region] 4 (#$ . 1626) "P"])
#@238 Guess the style in the region up to `c-guess-region-max'; don't install it.

If given a prefix argument (or if the optional argument ACCUMULATE is
non-nil) then the previous guess is extended, otherwise a new guess is
made from scratch.
(defalias 'c-guess-no-install #[(&optional accumulate) "\302ed\206�d^	#\207" [c-guess-region-max accumulate c-guess-region-no-install] 4 (#$ . 2070) "P"])
#@290 Guess the style on the whole current buffer, and install it.

The style is given a name based on the file's absolute file name.

If given a prefix argument (or if the optional argument ACCUMULATE is
non-nil) then the previous guess is extended, otherwise a new guess is
made from scratch.
(defalias 'c-guess-buffer #[(&optional accumulate) "\301ed#\207" [accumulate c-guess-region] 4 (#$ . 2471) "P"])
#@225 Guess the style on the whole current buffer; don't install it.

If given a prefix argument (or if the optional argument ACCUMULATE is
non-nil) then the previous guess is extended, otherwise a new guess is
made from scratch.
(defalias 'c-guess-buffer-no-install #[(&optional accumulate) "\301ed#\207" [accumulate c-guess-region-no-install] 4 (#$ . 2881) "P"])
#@275 Guess the style on the region and install it.

The style is given a name based on the file's absolute file name.

If given a prefix argument (or if the optional argument ACCUMULATE is
non-nil) then the previous guess is extended, otherwise a new guess is
made from scratch.
(defalias 'c-guess-region #[(start end &optional accumulate) "\303	\n#\210\304 \207" [start end accumulate c-guess-region-no-install c-guess-install] 4 (#$ . 3248) "r\nP"])
(defalias 'c-guess-empty-line-p #[nil "\300 \301 =\207" [line-beginning-position line-end-position] 2])
(put 'c-guess-empty-line-p 'byte-optimizer 'byte-compile-inline-expand)
#@794 Guess the style on the region; don't install it.

Every line of code in the region is examined and values for the following two
variables are guessed:

* `c-basic-offset', and
* the indentation values of the various syntactic symbols in
  `c-offsets-alist'.

The guessed values are put into `c-guess-guessed-basic-offset' and
`c-guess-guessed-offsets-alist'.

Frequencies of use are taken into account when guessing, so minor
inconsistencies in the indentation style shouldn't produce wrong guesses.

If given a prefix argument (or if the optional argument ACCUMULATE is
non-nil) then the previous examination is extended, otherwise a new
guess is made from scratch.

Note that the larger the region to guess in, the slower the guessing.
So you can limit the region with `c-guess-region-max'.
(defalias 'c-guess-region-no-install #[(start end &optional accumulate) "\205�	\306\f\n#\307	!\211@
A\211	*\207" [accumulate c-guess-accumulator accumulator start end pair c-guess-examine c-guess-guess c-guess-guessed-basic-offset c-guess-guessed-offsets-alist] 5 (#$ . 3879) "r\nP"])
(defalias 'c-guess-examine #[(start end accumulator) "\306\307!\205�\307\310	#\212b\210`	W\203Q�\311 \312 =\2041�\313\314\315 \316\211\316\317\216\320 -\"\210\n\203K�\n`\321\247\203D�@Y\205I�\322#\266\323y\210\202�)\n\203Z�\324\n!\210)\325!\207" [start end reporter #1=#:modified buffer-undo-list inhibit-read-only fboundp make-progress-reporter "Examining Indentation " line-beginning-position line-end-position mapc #[(s) "\302	\"\206�\211\207" [accumulator s c-guess-accumulate] 3] buffer-modified-p t #[nil "?\205�\301\302!\207" [#1# restore-buffer-modified-p nil] 2] c-guess-basic-syntax nil progress-reporter-do-update 1 progress-reporter-done c-guess-sort-accumulator inhibit-modification-hooks accumulator] 8])
(defalias 'c-guess-guess #[(accumulator) "\306!\307!\310\n	\"\311\312\f!\"	
,B\207" [accumulator basic-offset typical-offsets-alist symbolic-offsets-alist c-guess-conversions merged-offsets-alist c-guess-make-basic-offset c-guess-make-offsets-alist c-guess-symbolize-offsets-alist c-guess-merge-offsets-alists copy-tree] 3])
(defalias 'c-guess-current-offset #[(relpos) "\301 \210i\212b\210i)Z\207" [relpos back-to-indentation] 2])
(defalias 'c-guess-accumulate #[(accumulator syntax-element) "@A@	\247\205�\306	!\307!\fW\205�\310
\n#)*\207" [syntax-element relpos symbol offset c-guess-offset-threshold accumulator c-guess-current-offset abs c-guess-accumulate-offset] 4])
(defalias 'c-guess-accumulate-offset #[(accumulator symbol offset) "\306	\"\211A\307\n\203.�\306
\"\211\203 �\f\211AT\241\210\202*�
\310BB\n\241\210	\2027�
\310B\307BB	B+\207" [symbol accumulator entry counters counter offset assoc nil 1] 4])
(defalias 'c-guess-sort-accumulator #[(accumulator) "\301\302\"\207" [accumulator mapcar #[(entry) "@A\211\303	\304\"*B\207" [entry counters symbol sort #[(a b) "A	AV\203\n�\302\207A	A=\205�@	@W\207" [a b t] 2]] 5]] 3])
(defalias 'c-guess-make-offsets-alist #[(accumulator) "\301\302\"\207" [accumulator mapcar #[(entry) "@A@@B\207" [entry] 2]] 3])
(defalias 'c-guess-merge-offsets-alists #[(strong weak) "\302\303\"\210	\207" [weak strong mapc #[(weak-elt) "\302@	\"?\205�	B\211\207" [weak-elt strong assoc] 3]] 3])
(defalias 'c-guess-make-basic-offset #[(accumulator) "\305\306\307!\"\310\311\312\313\"\"\314\315\316\312\317	\"!\"\312\320\n\"\321\2037�\fA@AW\2030�@A\211\204$�\f@-\207" [accumulator alist offset-list summed majority assq-delete-all c copy-tree apply append mapcar #[(elts) "\301\302A\"\207" [elts mapcar #[(elt) "\301@!AB\207" [elt abs] 2]] 3] delete 0 delete-dups #[(elt) "@\207" [elt] 1] #[(offset) "\302\303\304\305	\"\"B\207" [offset alist apply + mapcar #[(a) "@	=\203\n�A\207\302\207" [a offset 0] 2]] 6] (nil . 0)] 7])
(defalias 'c-guess-symbolize-offsets-alist #[(offsets-alist basic-offset) "\301\302\"\207" [offsets-alist mapcar #[(elt) "@A	\250\203�\n\304	\"B\202�*\207" [elt v s basic-offset c-guess-symbolize-integer] 4]] 3])
(defalias 'c-guess-symbolize-integer #[(int basic-offset) "\303!\n=\203�\304\202I�	\n=\203�\305\202I�\306\n_=\203$�\307\202I�	\306\n_=\2030�\310\202I�\306_\n=\203<�\311\202I�\306	_\n=\203H�\305\202I�)\207" [int aint basic-offset abs + - 2 ++ -- *] 3])
(defalias 'c-guess-style-name #[nil "\300\301\302 \"\207" [format "*c-guess*:%s" buffer-file-name] 3])
(defalias 'c-guess-make-style #[(basic-offset offsets-alist) "\205�\303	\n\"\304B\302	)BD\207" [basic-offset offsets-alist c-offsets-alist c-guess-merge-offsets-alists c-basic-offset] 3])
#@363 Install the latest guessed style into the current buffer.
(This guessed style is a combination of `c-guess-guessed-basic-offset',
`c-guess-guessed-offsets-alist' and `c-offsets-alist'.)

The style is entered into CC Mode's style system by
`c-add-style'.  Its name is either STYLE-NAME, or a name based on
the absolute file name of the file if STYLE-NAME is nil.
(defalias 'c-guess-install #[(&optional style-name) "\304	\"\211\203$�\305\232\204�\206�\306 \307\n\310#\210\311\312\")\202'�\313\314!)\207" [c-guess-guessed-basic-offset c-guess-guessed-offsets-alist style style-name c-guess-make-style "" c-guess-style-name c-add-style t message "Style \"%s\" is installed" error "Not yet guessed"] 5 (#$ . 8520) "sNew style name (empty for default name): "])
#@29 Show `c-guess-accumulator'.
(defalias 'c-guess-dump-accumulator #[nil "r\306\307!q\210p\310 \210	\311\211\312\211\312\313 \210\314\315!\210+\211\316!\317!\210+\207" [default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks get-buffer-create "*Accumulated Examined Indent Information*" kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook pp internal-temp-output-buffer-show inhibit-read-only #2=#:buf standard-output c-guess-accumulator] 4 (#$ . 9292) nil])
#@30 Reset `c-guess-accumulator'.
(defalias 'c-guess-reset-accumulator #[nil "\301\211\207" [c-guess-accumulator nil] 2 (#$ . 9849) nil])
#@74 Show `c-guess-guessed-basic-offset' and `c-guess-guessed-offsets-alist'.
(defalias 'c-guess-dump-guessed-values #[nil "r\306\307!q\210p\310 \210	\311\211\312\211\312\313 \210\314\315!\210+\211\316\317!\210\320!\210\316\321!\210\316\322!\210\320!\323!\210+\207" [default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks get-buffer-create "*Guessed Values*" kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook princ "basic-offset: \n	" pp "\n\n" "offsets-alist: \n" internal-temp-output-buffer-show inhibit-read-only #2=#:buf standard-output c-guess-guessed-basic-offset c-guess-guessed-offsets-alist] 4 (#$ . 9989) nil])
#@181 Show the guessed style.
`pp' is used to print the style but if PRINTER is given,
PRINTER is used instead. If PRINTER is not nil, it
is called with one argument, the guessed style.
(defalias 'c-guess-dump-guessed-style #[(&optional printer) "\306	\"\211\203H�r\307\310!q\210p\311 \210\f\312\211\313\211\313\314 \210\315\316!\210+\211\203<�\202=�\317\n!\320!\210+\202K�\321\322!)\207" [c-guess-guessed-basic-offset c-guess-guessed-offsets-alist style default-directory #1=#:old-dir buffer-read-only c-guess-make-style get-buffer-create "*Guessed Style*" kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook pp internal-temp-output-buffer-show error "Not yet guessed" buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output printer] 4 (#$ . 10712) nil])
(defalias 'c-guess-guessed-syntactic-symbols #[nil "\305\211\203�@A\n@\f\236\204�\n@	B\202�	+\207" [c-guess-guessed-offsets-alist symbols elt alist c-guess-conversions nil] 3])
(defalias 'c-guess-view-reorder-offsets-alist-in-style #[(style guessed-syntactic-symbols) "\302!\303\236\211\304	A\305\"\241\210)\207" [style offsets-alist-cell copy-tree c-offsets-alist sort #[(a b) "@	>\n@	>\211\203�\204�\f\204\"�\204\"�@\n@\231\202/�\f\203*�\305\202/�\205/�\306*\207" [a guessed-syntactic-symbols b b-guessed\? a-guessed\? t nil] 4]] 5])
(defalias 'c-guess-view-mark-guessed-entries #[(guessed-syntactic-symbols) "\302B\211\205,�eb\210\303\304\305	@!\306Q\307\310#\203$�\311\312!\210\313\307!\210\314c\210	A\211\204�\307)\207" [guessed-syntactic-symbols needs-markers c-basic-offset search-forward "(" symbol-name " " nil t move-end-of-line 1 comment-dwim " Guessed value"] 5])
#@388 Emit emacs lisp code which defines the last guessed style.
So you can put the code into .emacs if you prefer the
guessed code.
"STYLE NAME HERE" is used as the name for the style in the
emitted code. If WITH-NAME is given, it is used instead.
WITH-NAME is expected as a string but if this function
called interactively with prefix argument, the value for
WITH-NAME is asked to the user.
(defalias 'c-guess-view #[(&optional with-name) ";\203	�\202�\203�\306\307!\202�\310\311 \n\f\230\203(�\312

\"\202)�\f\313\314!,\207" [with-name temporary-style-name guessed-style-name c-indentation-style current-style-name major-mode read-from-minibuffer "New style name: " "STYLE NAME HERE" c-guess-style-name cc-choose-style-for-mode c-guess-dump-guessed-style #[(style) "\305 \306\307	\310\n\311\"BDE!\210r\fq\210\312 \210\313!\210\314 *\207" [guessed-syntactic-symbols temporary-style-name parent-style-name style standard-output c-guess-guessed-syntactic-symbols pp c-add-style quote c-guess-view-reorder-offsets-alist-in-style lisp-interaction-mode c-guess-view-mark-guessed-entries buffer-enable-undo] 8] c-default-style parent-style-name] 3 (#$ . 12473) "P"])
(provide 'cc-guess)

${this.title}

Code Editor : cc-guess.elc