Function: inferior-tcl-mode

inferior-tcl-mode is an interactive and byte-compiled function defined in tcl.el.gz.

Signature

(inferior-tcl-mode)

Documentation

Major mode for interacting with Tcl interpreter.

You can start a Tcl process with M-x inferior-tcl (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:
C-M-x tcl-eval-defun
C-c C-f tcl-load-file
C-c C-s switch-to-tcl
C-c C-t inferior-tcl
C-c C-v tcl-eval-defun
C-c C-x tcl-eval-region
C-c TAB tcl-help-on-word
DEL backward-delete-char-untabify
M-? comint-dynamic-list-filename-completions
TAB completion-at-point

Key Bindings

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))