• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10/emacs-93/emacs/lisp/progmodes/

Lines Matching defs:table

754 The actions that can be performed are listed in `idlwave-indent-action-table'."
774 See help for `idlwave-indent-action-table' for symbols using `idlwave-surround'.
847 ;; The action table is used by `idlwave-indent-line' whereas both the
849 ;; general, the expand table is only used when a line is explicitly
850 ;; indented. Whereas, in addition to being used when the expand table
851 ;; is used, the action table is used when a line is indirectly
870 (defvar idlwave-indent-action-table nil
872 and function as a cdr. This table is used by `idlwave-indent-line'.
876 Additions to the table are made with `idlwave-action-and-binding' when a
880 (defvar idlwave-indent-expand-table nil
882 and function as a cdr. The table is used by the
886 Additions to the table are made with `idlwave-action-and-binding' when a
1424 (defvar idlwave-mode-syntax-table (make-syntax-table)
1425 "Syntax table in use in `idlwave-mode' buffers.")
1427 (modify-syntax-entry ?+ "." idlwave-mode-syntax-table)
1428 (modify-syntax-entry ?- "." idlwave-mode-syntax-table)
1429 (modify-syntax-entry ?* "." idlwave-mode-syntax-table)
1430 (modify-syntax-entry ?/ "." idlwave-mode-syntax-table)
1431 (modify-syntax-entry ?^ "." idlwave-mode-syntax-table)
1432 (modify-syntax-entry ?# "." idlwave-mode-syntax-table)
1433 (modify-syntax-entry ?= "." idlwave-mode-syntax-table)
1434 (modify-syntax-entry ?% "." idlwave-mode-syntax-table)
1435 (modify-syntax-entry ?< "." idlwave-mode-syntax-table)
1436 (modify-syntax-entry ?> "." idlwave-mode-syntax-table)
1437 (modify-syntax-entry ?\' "\"" idlwave-mode-syntax-table)
1438 (modify-syntax-entry ?\" "\"" idlwave-mode-syntax-table)
1439 (modify-syntax-entry ?\\ "." idlwave-mode-syntax-table)
1440 (modify-syntax-entry ?_ "_" idlwave-mode-syntax-table)
1441 (modify-syntax-entry ?{ "(}" idlwave-mode-syntax-table)
1442 (modify-syntax-entry ?} "){" idlwave-mode-syntax-table)
1443 (modify-syntax-entry ?$ "_" idlwave-mode-syntax-table)
1444 (modify-syntax-entry ?. "." idlwave-mode-syntax-table)
1445 (modify-syntax-entry ?\; "<" idlwave-mode-syntax-table)
1446 (modify-syntax-entry ?\n ">" idlwave-mode-syntax-table)
1447 (modify-syntax-entry ?\f ">" idlwave-mode-syntax-table)
1449 (defvar idlwave-find-symbol-syntax-table
1450 (copy-syntax-table idlwave-mode-syntax-table)
1451 "Syntax table that treats symbol characters as word characters.")
1453 (modify-syntax-entry ?$ "w" idlwave-find-symbol-syntax-table)
1454 (modify-syntax-entry ?_ "w" idlwave-find-symbol-syntax-table)
1455 (modify-syntax-entry ?! "w" idlwave-find-symbol-syntax-table)
1456 (modify-syntax-entry ?. "w" idlwave-find-symbol-syntax-table)
1459 "Execute BODY with a different syntax table."
1460 `(let ((saved-syntax (syntax-table)))
1463 (set-syntax-table idlwave-find-symbol-syntax-table)
1465 (set-syntax-table saved-syntax))))
1468 ; "Execute BODY with a different syntax table."
1469 ; `(let ((saved-syntax (syntax-table)))
1472 ; (set-syntax-table idlwave-find-symbol-syntax-table)
1474 ; (set-syntax-table saved-syntax))))
1484 \(KEY . CMD\) is also placed in the `idlwave-indent-expand-table',
1486 will instead be placed in `idlwave-indent-action-table'.
1503 (let* ((table (if select 'idlwave-indent-action-table
1504 'idlwave-indent-expand-table))
1505 (table-key (regexp-quote key))
1506 (cell (assoc table-key (eval table))))
1511 (set table (append (eval table) (list (cons table-key cmd)))))))
1637 (defvar idlwave-mode-abbrev-table nil
1638 "Abbreviation table used for IDLWAVE mode")
1639 (define-abbrev-table 'idlwave-mode-abbrev-table ())
1641 (defun idlwave-define-abbrev (name expansion hook &optional noprefix table)
1645 idlwave-mode-abbrev-table unless TABLE is non-nil."
1647 (args (list (or table idlwave-mode-abbrev-table)
1657 "w" idlwave-mode-syntax-table)
1911 (setq local-abbrev-table idlwave-mode-abbrev-table)
1912 (set-syntax-table idlwave-mode-syntax-table)
1950 ;; Set tag table list to use IDLTAGS as file name.
1951 (if (boundp 'tag-table-alist)
1952 (add-to-list 'tag-table-alist '("\\.pro$" . "IDLTAGS")))
2808 The actions in `idlwave-indent-action-table' are performed.
2810 `idlwave-indent-expand-table' are performed."
2831 (mapcar 'idlwave-do-action idlwave-indent-expand-table))
2834 (mapcar 'idlwave-do-action idlwave-indent-action-table))
3132 Searches are case-insensitive and use a special syntax table which
4177 (make-hash-table ':size size ':test 'equal)))
4187 (make-hash-table ':size size ':test 'equal))))))
4240 (table (if (eq set 'sys) (cdr tables) (car tables))))
4241 (puthash (downcase name) iname table)
7859 (let ((ht (make-hash-table :size (length list) :test 'equal)))
9328 (let ((table (symbol-value 'idlwave-mode-abbrev-table))
9349 table)