Variable: inferior-tcl-mode-abbrev-table
inferior-tcl-mode-abbrev-table is a variable defined in tcl.el.gz.
Value
[## 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0]
Documentation
Abbrev table for inferior-tcl-mode.
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/tcl.el.gz
;;
;; Inferior Tcl mode itself.
;;
(define-derived-mode inferior-tcl-mode comint-mode "Inferior Tcl"
"Major mode for interacting with Tcl interpreter.
You can start a Tcl process with \\[inferior-tcl].
Entry to this mode runs the normal hooks `comint-mode-hook' and
`inferior-tcl-mode-hook', in that order.
You can send text to the inferior Tcl process from other buffers
containing Tcl source.
Variables controlling Inferior Tcl mode:
`tcl-application'
Name of program to run.
`tcl-command-switches'
Command line arguments to `tcl-application'.
`tcl-prompt-regexp'
Matches prompt.
`inferior-tcl-source-command'
Command to use to read Tcl file in running application.
`inferior-tcl-buffer'
The current inferior Tcl process buffer. See variable
documentation for details on multiple-process support.
The following commands are available:
\\{inferior-tcl-mode-map}"
(setq-local comint-prompt-regexp
(or tcl-prompt-regexp
(concat "^" (regexp-quote tcl-application) ">")))
(setq mode-line-process '(": %s"))
(setq local-abbrev-table tcl-mode-abbrev-table)
(set-syntax-table tcl-mode-syntax-table)
(setq-local defun-prompt-regexp tcl-omit-ws-regexp)
(setq-local inferior-tcl-delete-prompt-marker (make-marker))
(set-process-filter (get-buffer-process (current-buffer)) 'tcl-filter))