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 : octave-inf.elc

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

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

(byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310%\207" [require octave-mod comint custom-declare-group octave-inferior nil "Running Octave as an inferior Emacs process." :group octave] 6)
#@39 Program invoked by `inferior-octave'.
(custom-declare-variable 'inferior-octave-program '"octave" '(#$ . 823) :type 'string :group 'octave-inferior)
#@58 Regexp to match prompts for the inferior Octave process.
(custom-declare-variable 'inferior-octave-prompt '"\$^octave\\(\\|.bin\\|.exe\$\$-[.0-9]+\$?\$:[0-9]+\$?\\|^debug\\|^\\)>+ " '(#$ . 978) :type 'regexp :group 'octave-inferior)
#@121 Name of the inferior Octave startup file.
The contents of this file are sent to the inferior Octave process on
startup.
(custom-declare-variable 'inferior-octave-startup-file 'nil '(#$ . 1224) :type '(choice (const :tag "None" nil) file) :group 'octave-inferior)
#@180 List of command line arguments for the inferior Octave process.
For example, for suppressing the startup message and using `traditional'
mode, set this to ("-q" "--traditional").
(custom-declare-variable 'inferior-octave-startup-args 'nil '(#$ . 1494) :type '(repeat string) :group 'octave-inferior)
#@38 Keymap used in Inferior Octave mode.
(defvar inferior-octave-mode-map (byte-code "\302 \303	\"\210\304\305\306#\210\304\307\310#\210\304\311\312#\210\304\313\314#\210\304\315\316#\210)\207" [map comint-mode-map make-sparse-keymap set-keymap-parent define-key "	" comint-dynamic-complete "\277" comint-dynamic-list-filename-completions "\f" inferior-octave-dynamic-list-input-ring [menu-bar inout list-history] ("List Input History" . inferior-octave-dynamic-list-input-ring) "" octave-help] 4) (#$ . 1800))
#@54 Syntax table in use in inferior-octave-mode buffers.
(defvar inferior-octave-mode-syntax-table (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\310#\210)\207" [table make-syntax-table modify-syntax-entry 96 "w" 35 "<" 10 ">"] 4) (#$ . 2324))
#@55 *Hook to be run when Inferior Octave mode is started.
(custom-declare-variable 'inferior-octave-mode-hook 'nil '(#$ . -2588) :type 'hook :group 'octave-inferior)
#@62 Additional expressions to highlight in Inferior Octave mode.
(defvar inferior-octave-font-lock-keywords (byte-code "\301BC\207" [inferior-octave-prompt font-lock-type-face] 2) (#$ . 2756))
(byte-code "\301\302!\204�\303\302\304\"\210\305B\306\305!\204�\307\305\310\"\210\311B\306\311!\204)�\307\311\310\"\210\312B\306\312!\2048�\307\312\310\"\210\313B\306\313!\204G�\307\313\310\"\210\310\207" [current-load-list fboundp comint-line-beginning-position defalias #[nil "\212\300\301!\210`)\207" [comint-bol nil] 2 "Returns the buffer position of the beginning of the line, after any prompt.\nThe prompt is assumed to be any text at the beginning of the line matching\nthe regular expression `comint-prompt-regexp', a buffer local variable."] inferior-octave-output-list default-boundp set-default nil inferior-octave-output-string inferior-octave-receive-in-progress inferior-octave-startup-hook] 3)
#@62 Non-nil means that `inferior-octave-complete' is impossible.
(defvar inferior-octave-complete-impossible nil (#$ . 3671))
#@51 Non-nil means that Octave has built-in variables.
(defvar inferior-octave-has-built-in-variables nil (#$ . 3799))
#@172 List of functions called to perform completion for inferior Octave.
This variable is used to initialize `comint-dynamic-complete-functions'
in the Inferior Octave buffer.
(defvar inferior-octave-dynamic-complete-functions '(inferior-octave-complete comint-dynamic-complete-filename) (#$ . 3920))
#@240 Major mode for interacting with an inferior Octave process.
Runs Octave as a subprocess of Emacs, with Octave I/O through an Emacs
buffer.

Entry to this mode successively runs the hooks `comint-mode-hook' and
`inferior-octave-mode-hook'.
(defalias 'inferior-octave-mode #[nil "\306\300!\210\307\310 \210)	\311\312\313#$\314%!\210\315&!\210\306\316!\210'\306\317!\210\320\306\321!\210\322\306\323!\210(\306\324!\210\325\326\327!\206L�\330)\326\331!\206U�\332*\306\333!\210+\334\335\336\337\307$\210\340\307!\210\341\342!\207" [delay-mode-hooks inferior-octave-prompt comint-prompt-regexp major-mode mode-name mode-line-process make-local-variable t comint-mode inferior-octave-mode "Inferior Octave" (":%s") use-local-map set-syntax-table comment-start comment-end "" comment-column 32 comment-start-skip font-lock-defaults (inferior-octave-font-lock-keywords nil nil) getenv "OCTAVE_HISTFILE" "~/.octave_hist" "OCTAVE_HISTSIZE" 1024 comint-dynamic-complete-functions add-hook comint-input-filter-functions inferior-octave-directory-tracker nil comint-read-input-ring run-mode-hooks inferior-octave-mode-hook octave-abbrev-table local-abbrev-table inferior-octave-mode-map inferior-octave-mode-syntax-table octave-comment-start octave-comment-start-skip comint-input-ring-file-name comint-input-ring-size inferior-octave-dynamic-complete-functions] 5 (#$ . 4223) nil])
#@501 Run an inferior Octave process, I/O via `inferior-octave-buffer'.
This buffer is put in Inferior Octave mode.  See `inferior-octave-mode'.

Unless ARG is non-nil, switches to this buffer.

The elements of the list `inferior-octave-startup-args' are sent as
command line arguments to the inferior Octave process on startup.

Additional commands to be executed on startup can be provided either in
the file specified by `inferior-octave-startup-file' or by the default
startup file, `~/.emacs-octave'.
(defalias 'inferior-octave #[(&optional arg) "\303	!\210\304	!\204�\212	q\210\305 \210\306 \210\307 \210)\n?\205\"�\310	!)\207" [inferior-octave-buffer buffer arg get-buffer-create comint-check-proc comint-mode inferior-octave-startup inferior-octave-mode pop-to-buffer] 2 (#$ . 5625) "P"])
(defalias 'run-octave 'inferior-octave)
#@35 Start an inferior Octave process.
(defalias 'inferior-octave-startup #[nil "\306\307\310O	\311\312\313D\n\"$\314\315\"\210\f.\316\211/0\31711\203/�\320.!\210\202\"�db\210\321!`\316\223\210\322o?\205@�\323/\205M�\324\325/\326#\326PP!\210\327\330C!\210\331\332/@\"2\327\333C!\210\331\334/@\"\203y�\3272\203u�\335\202v�\336C!\210\3163\337	!45\206\212�\3404P6\3410\342\230?\205\237�2\203\236�\343\202\237�\344\3456!\205\253�\346\3476\"E3\3273!\210+\322/\205\302�\324\325/\326#\326P0P!\210\327\350C!\210\331\351/@\"?7\314\352\"\210\353\354!\210\353\354!\210\355 )\207" [inferior-octave-buffer inferior-octave-program inferior-octave-startup-args proc process-connection-type comint-ptyp comint-exec-1 1 -1 append "-i" "--no-line-editing" set-process-filter inferior-octave-output-digest nil t accept-process-output process-mark insert-before-markers "\f\n" mapconcat identity "\n" inferior-octave-send-list-and-digest "exist \"LOADPATH\"\n" string-match "101$" "PS2\n" "\$PS2\\|ans\$ = *$" "PS2 = \"> \"\n" "PS2 (\"> \");\n" file-name-nondirectory "~/.emacs-" "more off;\n" ">> " "PS1=\"\\\\s> \";\n" "PS1 (\"\\\\s> \");\n" file-exists-p format "source (\"%s\");\n" "exist \"completion_matches\"\n" "5$" inferior-octave-output-filter run-hooks inferior-octave-startup-hook inferior-octave-resync-dirs inferior-octave-process inferior-octave-output-list inferior-octave-output-string inferior-octave-receive-in-progress inferior-octave-has-built-in-variables commands program inferior-octave-startup-file file inferior-octave-complete-impossible] 8 (#$ . 6465)])
#@185 Perform completion on the Octave symbol preceding point.
This is implemented using the Octave command `completion_matches' which
is NOT available with versions of Octave prior to 2.0.
(defalias 'inferior-octave-complete #[nil "`\212\306\307\310 \"\210\311`\")\312\n!\f\203�\313\314!\202k�	\315\230\203)�\316\317!\202k�\320\321	\322QC!\210\323
\324\"\211\211A\203f�@@\230\203Y�A\211\241\210\202=�A\211\204B�*\325	
\"+\207" [end command inferior-octave-buffer proc inferior-octave-complete-impossible inferior-octave-output-list skip-syntax-backward "w_" comint-line-beginning-position buffer-substring-no-properties get-buffer-process error "Your Octave does not have `completion_matches'.  Please upgrade to version 2.X." "" message "Cannot complete an empty string" inferior-octave-send-list-and-digest "completion_matches (\"" "\");\n" sort string-lessp comint-dynamic-simple-complete x y] 5 (#$ . 8067) nil])
#@51 List the buffer's input history in a help buffer.
(defalias 'inferior-octave-dynamic-list-input-ring #[nil "\306!\203\f�\307!\203�\310\311!\207\312\313\314!S\315 \n\316Y\2030�\317\n\"\fB\nS\211\202�\220\320\f!\210q\221\210\310\321!\210\322 \211\323=\203M�\324	!\202R�
C\211-\207" [comint-input-ring conf index history-buffer history ch ring-p ring-empty-p message "No history" nil " *Input History*" ring-length current-window-configuration 0 ring-ref display-completion-list "Hit space to flush" read-event 32 set-window-configuration unread-command-events] 5 (#$ . 9015) nil])
#@89 Strip leading `^G' character.
If STRING starts with a `^G', ring the bell and strip it.
(defalias 'inferior-octave-strip-ctrl-g #[(string) "\301\302\"\203�\303 \210\304\305O\207" [string string-match "^" ding 1 nil] 3 (#$ . 9617)])
#@163 Standard output filter for the inferior Octave process.
Ring Emacs bell if process output starts with an ASCII bell, and pass
the rest to `comint-output-filter'.
(defalias 'inferior-octave-output-filter #[(proc string) "\302\303	!\"\207" [proc string comint-output-filter inferior-octave-strip-ctrl-g] 4 (#$ . 9862)])
#@174 Special output filter for the inferior Octave process.
Save all output between newlines into `inferior-octave-output-list', and
the rest to `inferior-octave-output-string'.
(defalias 'inferior-octave-output-digest #[(proc string) "	P\305\306	\"\203�\307\n	\310\211\224OC\"	\310\225\311O\202�\305	\"\203'�\311	\211\207" [inferior-octave-output-string string inferior-octave-output-list inferior-octave-prompt inferior-octave-receive-in-progress string-match "\n" append 0 nil] 5 (#$ . 10188)])
#@199 Send LIST to the inferior Octave process and digest the output.
The elements of LIST have to be strings and are sent one by one.  All
output is passed to the filter `inferior-octave-output-digest'.
(defalias 'inferior-octave-send-list-and-digest #[(list) "\306	!\307\310	\311\"\210\307\312\216
@\211\2056�\307\313\314	\"\210\203/�\315	!\210\202#�
A\211\202�,\207" [inferior-octave-process proc filter string inferior-octave-output-list list process-filter nil set-process-filter inferior-octave-output-digest ((set-process-filter proc filter)) t comint-send-string accept-process-output inferior-octave-output-string inferior-octave-receive-in-progress] 4 (#$ . 10697)])
#@130 Tracks `cd' commands issued to the inferior Octave process.
Use \[inferior-octave-resync-dirs] to resync if Emacs gets confused.
(defalias 'inferior-octave-directory-tracker #[(string) "\301\302\"\203�\303\304!\207\301\305\"\205�\303\306\224\306\225O!\207" [string string-match "^[ 	]*cd[ 	;]*$" cd "~" "^[ 	]*cd[ 	]+\$[^ 	\n;]*\$[ 	\n;]*" 1] 4 (#$ . 11390)])
#@184 Resync the buffer's idea of the current directory.
This command queries the inferior Octave process about its current
directory and makes this the current buffer's default directory.
(defalias 'inferior-octave-resync-dirs #[nil "\301\302!\210\303@!\207" [inferior-octave-output-list inferior-octave-send-list-and-digest ("disp (pwd ())\n") cd] 2 (#$ . 11764) nil])
(provide 'octave-inf)

${this.title}

Code Editor : octave-inf.elc