gnu1987/emacs18.41/lisp/texinfo.elc

(defvar texinfo-mode-syntax-table nil)

(if texinfo-mode-syntax-table nil (setq texinfo-mode-syntax-table (make-syntax-table)) (modify-syntax-entry 34 " " texinfo-mode-syntax-table) (modify-syntax-entry 92 " " texinfo-mode-syntax-table) (modify-syntax-entry 64 "\\" texinfo-mode-syntax-table) (modify-syntax-entry 17 "\\" texinfo-mode-syntax-table) (modify-syntax-entry 91 "(]" texinfo-mode-syntax-table) (modify-syntax-entry 93 ")[" texinfo-mode-syntax-table) (modify-syntax-entry 123 "(}" texinfo-mode-syntax-table) (modify-syntax-entry 125 "){" texinfo-mode-syntax-table) (modify-syntax-entry 39 "w" texinfo-mode-syntax-table))

(defun texinfo-mode nil "\
Major mode for editing texinfo files.
These are files that are input for TEX and also to be turned
into Info files by \\[texinfo-format-buffer].
These files must be written in a very restricted and
modified version of TEX input format.

As for editing commands, like text-mode except for syntax table,
which is set up so expression commands skip texinfo bracket groups." (interactive) (byte-code "ÈˆÉ ˆÊ‰ˆË‰ˆÌ
!ˆÍÃ!ˆÄ‰ˆÍÅ!ˆÎ
P‰ˆÍÆ!ˆÎP‰ˆÍÇ!ˆÏ‰ˆÐÑÒ\"‡" [mode-name major-mode texinfo-mode-syntax-table require-final-newline t paragraph-separate paragraph-start fill-column nil text-mode "Texinfo" texinfo-mode set-syntax-table make-local-variable "^\\|^@[a-z]*[ 
]\\|" 75 run-hooks text-mode-hook texinfo-mode-hook] 9))