Gecko [ 122.154.134.11 ]

Name	Size	Permission
ada-mode.elc	107.46 KB	-rw-r--r--
ada-prj.elc	17.96 KB	-rw-r--r--
ada-stmt.elc	36.03 KB	-rw-r--r--
ada-xref.elc	54.99 KB	-rw-r--r--
antlr-mode.elc	77.63 KB	-rw-r--r--
asm-mode.elc	6.08 KB	-rw-r--r--
autoconf.elc	3.37 KB	-rw-r--r--
bug-reference.elc	5.83 KB	-rw-r--r--
cap-words.elc	3.54 KB	-rw-r--r--
cc-align.elc	35.43 KB	-rw-r--r--
cc-awk.elc	20.23 KB	-rw-r--r--
cc-bytecomp.elc	10.45 KB	-rw-r--r--
cc-cmds.elc	92.26 KB	-rw-r--r--
cc-compat.elc	2.97 KB	-rw-r--r--
cc-defs.elc	46.7 KB	-rw-r--r--
cc-engine.elc	143.05 KB	-rw-r--r--
cc-fonts.elc	140.72 KB	-rw-r--r--
cc-langs.elc	70.29 KB	-rw-r--r--
cc-menus.elc	7.32 KB	-rw-r--r--
cc-mode.elc	144.75 KB	-rw-r--r--
cc-styles.elc	16.11 KB	-rw-r--r--
cc-subword.elc	6.99 KB	-rw-r--r--
cc-vars.elc	71.07 KB	-rw-r--r--
cfengine.elc	8.09 KB	-rw-r--r--
cmacexp.elc	6.58 KB	-rw-r--r--
compile.elc	69.45 KB	-rw-r--r--
cperl-mode.elc	215.39 KB	-rw-r--r--
cpp.elc	21.52 KB	-rw-r--r--
cwarn.elc	12.8 KB	-rw-r--r--
dcl-mode.elc	49.31 KB	-rw-r--r--
delphi.elc	50.03 KB	-rw-r--r--
ebnf-abn.elc	7.39 KB	-rw-r--r--
ebnf-bnf.elc	7.99 KB	-rw-r--r--
ebnf-dtd.elc	13.82 KB	-rw-r--r--
ebnf-ebx.elc	8.77 KB	-rw-r--r--
ebnf-iso.elc	8.14 KB	-rw-r--r--
ebnf-otz.elc	8.51 KB	-rw-r--r--
ebnf-yac.elc	7.53 KB	-rw-r--r--
ebnf2ps.elc	121.25 KB	-rw-r--r--
ebrowse.elc	202.93 KB	-rw-r--r--
etags.elc	54.14 KB	-rw-r--r--
executable.elc	7.6 KB	-rw-r--r--
f90.elc	82.59 KB	-rw-r--r--
flymake.elc	61.25 KB	-rw-r--r--
fortran.elc	60.13 KB	-rw-r--r--
gdb-ui.elc	138.61 KB	-rw-r--r--
glasses.elc	10.15 KB	-rw-r--r--
grep.elc	27.75 KB	-rw-r--r--
gud.elc	93.94 KB	-rw-r--r--
hideif.elc	26.67 KB	-rw-r--r--
hideshow.elc	24.54 KB	-rw-r--r--
icon.elc	16.23 KB	-rw-r--r--
idlw-complete-structtag.elc	4.75 KB	-rw-r--r--
idlw-help.elc	35.31 KB	-rw-r--r--
idlw-shell.elc	134.39 KB	-rw-r--r--
idlw-toolbar.elc	28.34 KB	-rw-r--r--
idlwave.elc	254.7 KB	-rw-r--r--
inf-lisp.elc	18.43 KB	-rw-r--r--
ld-script.elc	4.91 KB	-rw-r--r--
m4-mode.elc	4.91 KB	-rw-r--r--
make-mode.elc	58.79 KB	-rw-r--r--
mantemp.elc	3.77 KB	-rw-r--r--
meta-mode.elc	27.42 KB	-rw-r--r--
mixal-mode.elc	35.32 KB	-rw-r--r--
modula2.elc	14.23 KB	-rw-r--r--
octave-inf.elc	11.87 KB	-rw-r--r--
octave-mod.elc	44.6 KB	-rw-r--r--
pascal.elc	40.31 KB	-rw-r--r--
perl-mode.elc	22.42 KB	-rw-r--r--
prolog.elc	12.7 KB	-rw-r--r--
ps-mode.elc	33.38 KB	-rw-r--r--
python.elc	86.23 KB	-rw-r--r--
ruby-mode.elc	34.59 KB	-rw-r--r--
scheme.elc	15.94 KB	-rw-r--r--
sh-script.elc	94.73 KB	-rw-r--r--
simula.elc	44.81 KB	-rw-r--r--
sql.elc	101.34 KB	-rw-r--r--
sym-comp.elc	7.15 KB	-rw-r--r--
tcl.elc	38.58 KB	-rw-r--r--
vera-mode.elc	44.5 KB	-rw-r--r--
verilog-mode.elc	331.76 KB	-rw-r--r--
vhdl-mode.elc	510.47 KB	-rw-r--r--
which-func.elc	9.72 KB	-rw-r--r--
xscheme.elc	37.76 KB	-rw-r--r--

Code Editor : sym-comp.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:05:12 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/progmodes/sym-comp.el
;;; in Emacs version 23.1.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 "`sym-comp.el' was compiled for Emacs 19.29 or later"))

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

#@117 Default `symbol-completion-symbol-function'.
Uses `current-word' with the buffer narrowed to the part before
point.
(defalias 'symbol-completion-symbol #[nil "\214e`}\210\300 )\207" [current-word] 2 (#$ . 618)])
#@183 Function to return a partial symbol before point for completion.
The value it returns should be a string (or nil).
Major modes may set this locally if the default isn't appropriate.
(defvar symbol-completion-symbol-function 'symbol-completion-symbol (#$ . 837))
#@513 Function to return possible symbol completions.
It takes an argument which is the string to be completed and
returns a value suitable for the second argument of
`try-completion'.  This value need not use the argument, i.e. it
may be all possible completions, such as `obarray' in the case of
Emacs Lisp.

Major modes may set this locally to allow them to support
`symbol-complete'.  See also `symbol-completion-symbol-function',
`symbol-completion-predicate-function' and
`symbol-completion-transform-function'.
(defvar symbol-completion-completions-function nil (#$ . 1106))
#@474 If non-nil, function to return a predicate for selecting symbol completions.
The function gets two args, the positions of the beginning and
end of the symbol to be completed.

Major modes may set this locally if the default isn't
appropriate.  This is a function returning a predicate so that
the predicate can be context-dependent, e.g. to select only
function names if point is at a function call position.  The
function's args may be useful for determining the context.
(defvar symbol-completion-predicate-function nil (#$ . 1689))
#@527 If non-nil, function to transform symbols in the symbol-completion buffer.
E.g., for Lisp, it may annotate the symbol as being a function,
not a variable.

The function takes the symbol name as argument.  If it needs to
annotate this, it should return a value suitable as an element of
the list passed to `display-completion-list'.

The predicate being used for selecting completions (from
`symbol-completion-predicate-function') is available
dynamically-bound as `symbol-completion-predicate' in case the
transform needs it.
(defvar symbol-completion-transform-function nil (#$ . 2231))
#@669 Perform completion of the symbol preceding point.
This is done in a way appropriate to the current major mode,
perhaps by interrogating an inferior interpreter.  Compare
`complete-symbol'.
If no characters can be completed, display a list of possible completions.
Repeating the command at that point scrolls the list.

When called from a program, optional arg PREDICATE is a predicate
determining which symbols are considered.

This function requires `symbol-completion-completions-function'
to be set buffer-locally.  Variables `symbol-completion-symbol-function',
`symbol-completion-predicate-function' and
`symbol-completion-transform-function' are also consulted.
(defalias 'symbol-complete #[(&optional predicate) "\306!\204\n�\307\310!\210\311\312!\n \206�\307\313!\f\206&�
\205&�
`GZ`\"!)\314)\f#*+,=\205\215�	\205\215�\315	!\205\215�\316	!\205\215�\317\316	!!\205\215�r\316	!q\210&\320)\f#\232\205\214�\321d	\"\203u�\322	e\"\210\202\213�\323 \324\325\326 \"-.r\327\216\330	!\210\331 \210,\332)?\205�*\332=\206�*\204\247�\333\334\"\210\335 \202�*\230\204\273�`GZ`|\210*c\202�\333\336!\210\320)\f#/\f0\337/!1\340/\341\"/\3062!\203\347�\3242 /\"/\312\220\342\343\344\217\221\210r\312q\210\345\346!\2101&,\333\347\350\"-\207" [symbol-completion-completions-function window symbol-completion-symbol-function pattern predicate symbol-completion-predicate-function functionp error "symbol-completion-completions-function not defined" get-buffer-window "*Completions*" "No preceding symbol to complete" try-completion window-live-p window-buffer buffer-name all-completions pos-visible-in-window-p set-window-start selected-window mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203(�\n@\305	@!\203!�\306	A!\203!�\307	@	A\310#\210\nA\211\204�*\306!\2034�\311\310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window scroll-up t message "Can't find completion for \"%s\"" ding "Making completion list..." copy-sequence sort string< nil (display-completion-list list pattern) ((error (display-completion-list list))) make-local-variable displayed-completions "Making completion list...%s" "done" completions completion last-command this-command save-selected-window-alist save-selected-window-window list symbol-completion-predicate copy symbol-completion-transform-function] 5 (#$ . 2826) nil])
#@427 Completion function for use with `hippie-expand'.
Uses `symbol-completion-symbol-function' and
`symbol-completion-completions-function'.  It is intended to be
used something like this in a major mode which provides symbol
completion:

(if (featurep 'hippie-exp)
      (set (make-local-variable 'hippie-expand-try-functions-list)
	   (cons 'symbol-completion-try-complete
                 hippie-expand-try-functions-list)))
(defalias 'symbol-completion-try-complete #[(old) "\205^�	\205^�\n\204,� \306`GZ`\"\210\307\f
\"\204\"�\f
B\205)�	!\f)\f\203E�\307\f@
\"\203E�\f\211A\f@\210\202,�\f\203V�\310\f\211A\f@!\210\311\207\n\203]�\312 \210\313\207" [symbol-completion-symbol-function symbol-completion-completions-function old symbol he-search-string he-tried-table he-init-string he-string-member he-substitute-string t he-reset-string nil he-expand-list] 3 (#$ . 5366)])
#@47 `symbol-completion-symbol-function' for Lisp.
(defalias 'lisp-completion-symbol #[nil "`\305 p\306\216\307\n!\210\212\310\311!\210gz\312U\203�\311u\210\202�`,\313\f\"*\207" [#1=#:buffer #2=#:table emacs-lisp-mode-syntax-table beg end syntax-table ((byte-code "rq\210\302	!\210)\302\207" [#1# #2# set-syntax-table] 2)) set-syntax-table backward-sexp 1 39 buffer-substring-no-properties] 3 (#$ . 6261)])
#@50 `symbol-completion-predicate-function' for Lisp.
(defalias 'lisp-completion-predicate #[(beg end) "\212b\210`Sf\301=\204�\302\202�\303\304\305\217?\205�\306)\207" [beg 40 #[(sym) "\301!\206�\302!\206�\303!\207" [sym boundp fboundp symbol-plist] 2] nil (byte-code "\300\301!\210\302u\210\303f\304=\207" [up-list -2 1 nil 40] 2) ((error)) fboundp] 3 (#$ . 6677)])
#@50 `symbol-completion-transform-function' for Lisp.
(defalias 'lisp-symbol-completion-transform #[nil "\300\207" [#[(elt) "\302=\204�\302\303	!!\203�	\304D\207	\207" [symbol-completion-predicate elt fboundp intern " <f>"] 3]] 1 (#$ . 7054)])
(provide 'sym-comp)

${this.title}

Code Editor : sym-comp.elc