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

Lines Matching defs:insert

343 If nil, the menu just includes a command to insert options.  Otherwise,
344 it includes four submenus to insert file/grammar/rule/subrule options."
352 version correct option values when using \\[antlr-insert-option].
363 option is inserted with \\[antlr-insert-option], if there was no rule or
383 \\[antlr-insert-option]. If t, always set mark via `push-mark'. If a
385 the number of lines between point and the insert position is greater
396 This string is only used if the option to insert did not exist before
544 submenus, see `antlr-options-use-submenus', and to allow to insert the
545 option name with completion when using \\[antlr-insert-option].
551 occurs before the user is asked to insert a value. The phase
562 area to guide the user what to insert at point. Otherwise, READ-FN is
675 They are stored in the kill-ring, i.e., you can insert them with C-y
677 from within a Makefile to insert them directly.\n\n\n"
708 (define-key map "\C-c\C-o" 'antlr-insert-option)
740 '(["Insert Option" antlr-insert-option
1535 (defun antlr-insert-option (level option &optional location)
1537 LEVEL determines option kind to insert: 1=file, 2=grammar, 3=rule,
1538 4=subrule. OPTION is a string with the name of the option to insert.
1552 valid option to insert into the current file.
1553 5. Find a correct position to insert the option.
1554 6. Depending on the option, insert it the following way \(inserting an
1556 - Insert the option and let user insert the value at point.
1558 previous value as initial contents, and insert option with value.
1577 * If an options section already exists, insert the options at the end.
1578 If only the beginning of the area is visible, insert at the
1581 inserted and insert a new section before any comments. If the
1582 position before the comments is not visible, insert the new section
1590 (interactive (antlr-insert-option-interactive current-prefix-arg))
1594 (error "Cannot deduce what kind of option to insert"))
1596 (error "Cannot insert any %s options around here"
1607 (antlr-insert-option-do level option nil
1618 (antlr-insert-option-do level option
1627 (antlr-insert-option-do level option t
1631 (defun antlr-insert-option-interactive (arg)
1632 "Interactive specification for `antlr-insert-option'.
1658 (list 'antlr-insert-option level option)
1669 "Return level and location for option to insert near point.
1711 "Return level for option to insert near point.
1713 option to insert near point, i.e., 1, 2, 3, 4, or nil if no such option
1826 (defun antlr-insert-option-do (level option old area pos)
1857 (error "Didn't insert unknown %s option %s"
1873 ;; insert value ----------------------------------------------------------
1875 (antlr-insert-option-existing old value)
1879 (antlr-insert-option-space area old)
1880 (or old (antlr-insert-option-area level))
1881 (insert option " = ;")
1883 (if value (insert value)))
1905 (error "Didn't insert v%s %s option %s in v%s"
1919 ;;; Insert options: the details (used by `antlr-insert-option-do')
1922 (defun antlr-insert-option-existing (old value)
1924 For OLD, see `antlr-insert-option-do'."
1925 ;; no = => insert =
1926 (unless (car old) (insert antlr-options-assign-string))
1927 ;; with user input => insert if necessary
1933 (insert value))
1934 (insert value)))
1937 (insert ";")
1940 (defun antlr-insert-option-space (area old)
1941 "Find appropriate place to insert option, insert newlines/spaces.
1942 For AREA and OLD, see `antlr-insert-option-do'."
1965 (or (bolp) (insert "\n"))
1971 (or (bolp) (insert "\n")))))
1974 (progn (insert "\n") (antlr-indent-line))
1976 (insert " "))
1978 (insert " ")
1983 (insert "\n")
1987 (defun antlr-insert-option-area (level)
1989 Used by `antlr-insert-option-do'."
1990 (insert "options {\n\n}")
1997 (insert "\n:")
2013 If INITIAL-CONTENTS is non-nil, insert it in the minibuffer initially.
2039 If INITIAL-CONTENTS is non-nil, insert it in the minibuffer initially.
2078 (error "Didn't insert C++ %s option with language %s"
2176 (insert-file-contents file t nil nil t)
2272 (defun antlr-makefile-insert-variable (number pre post)
2274 Also insert strings PRE and POST before and after the variable."
2277 (insert pre
2281 (defun antlr-insert-makefile-rules (&optional in-makefile)
2297 (antlr-makefile-insert-variable n "" " =")
2299 (insert " "
2305 (insert sep (format class-file (car class-def)))
2311 (insert sep (format vocab-file evocab))
2313 (antlr-makefile-insert-variable n "\n$(" ")")
2314 (insert ": " (car dep))
2316 (insert " " (format (car antlr-special-file-formats) ivocab)))
2320 (insert " " (car super))
2322 (insert " " (format (car antlr-special-file-formats)
2324 (insert "\n\t"
2331 (antlr-makefile-insert-variable nil "" " =")
2333 (antlr-makefile-insert-variable i " $(" ")"))
2334 (insert "\n" (car antlr-makefile-specification))))
2339 (insert antlr-help-unknown-file-text))
2343 (insert (format antlr-help-rules-intro dirname)))))
2364 (antlr-with-displaying-help-buffer 'antlr-insert-makefile-rules)
2366 (antlr-insert-makefile-rules t)))
2476 "Indent the current line or insert tabs/spaces.
2478 command, insert ARG tabs or spaces according to `indent-tabs-mode'.
2482 (insert-tab arg)
2488 Insert the character like `self-insert-command' and indent the current
2509 (self-insert-command (prefix-numeric-value arg))
2510 (self-insert-command (prefix-numeric-value arg))