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

Lines Matching +defs:insert +defs:char

384     insert-file insert-buffer insert-file-literally)
588 (byte-defop 98 0 byte-goto-char)
589 (byte-defop 99 0 byte-insert)
592 (byte-defop 102 0 byte-char-after)
593 (byte-defop 103 1 byte-following-char)
594 (byte-defop 104 1 byte-preceding-char)
610 (byte-defop 117 0 byte-forward-char)
615 (byte-defop 122 0 byte-char-syntax)
905 (goto-char (point-max))
910 (insert (format "%s\n" string)))))))
981 (goto-char byte-compile-last-position)
984 (goto-char byte-compile-last-position)
995 (insert (format "\nIn %s:\n" form)))
997 (insert (format "%s%s" file pos))))
1016 (goto-char (point-max))
1024 (insert (format "Leaving directory `%s'\n" default-directory))))
1026 (insert "\n"))
1029 (insert "\f\nCompiling "
1034 (insert "\f\nCompiling no file at " (current-time-string) "\n"))
1038 (insert (format "Entering directory `%s'\n" default-directory))))
1269 (insert (nth 1 form))
1270 (goto-char 1)
1273 (unless (eq ?% (char-after (1+ (match-beginning 0))))
1676 (insert-file-contents filename)
1677 ;; Mimic the way after-insert-file-set-coding can make the
1726 (goto-char (point-max))
1727 (insert "\n") ; aaah, unix.
1786 With argument, insert value in current buffer after the form."
1804 (insert "\n"))
1855 (and filename (byte-compile-insert-header filename inbuffer outbuffer))
1858 (goto-char 1)
1891 (goto-char (point-min))
1903 (goto-char (point-min))
1907 (insert ";;; This file contains multibyte non-ASCII characters\n"
1917 (goto-char (point-max))
1919 (delete-char delta)))))
1921 (defun byte-compile-insert-header (filename inbuffer outbuffer)
1926 (goto-char 1)
1938 (insert
1943 (insert ";;; Compiled by "
1948 (insert ";;; in Emacs version " emacs-version "\n")
1949 (insert ";;; "
1959 (insert ";;; Function definitions are lazy-loaded.\n"))
1974 ;; Now insert the comment and the error check.
1975 (insert
2002 (insert "(or (boundp 'current-load-list) (setq current-load-list nil))\n"
2057 (insert "\n")
2071 (insert preface)
2073 (insert (car info))
2090 (insert " ")
2117 (goto-char (prog1 (1+ (point))
2119 (insert "\\\n")
2120 (goto-char (point-max)))))
2123 (insert (nth 2 info))))))
2415 (insert " ")
2419 (goto-char position)
2424 (goto-char position)
2427 (goto-char position)
2430 (goto-char (point-max))
2431 (insert "\037")
2432 (goto-char position)
2433 (insert "#@" (format "%d" (- (position-bytes (point-max))
2442 (goto-char (point-max))))
2990 (put 'byte-insertN 'byte-opcode-invert 'insert)
2996 (byte-defop-compiler following-char 0)
2997 (byte-defop-compiler preceding-char 0)
3004 ;;(byte-defop-compiler read-char 0) ;; obsolete
3008 (byte-defop-compiler19 forward-char 0-1)
3023 (byte-defop-compiler goto-char 1)
3024 (byte-defop-compiler char-after 0-1)
3028 (byte-defop-compiler19 char-syntax 1)
3165 (byte-defop-compiler char-before)
3166 (byte-defop-compiler backward-char)
3173 (byte-defop-compiler insert)
3179 (defun byte-compile-char-before (form)
3181 (byte-compile-form (list 'char-after (if (numberp (nth 1 form))
3185 (byte-compile-form '(char-after (1- (point)))))
3189 (defun byte-compile-backward-char (form)
3191 (byte-compile-form (list 'forward-char (if (numberp (nth 1 form))
3195 (byte-compile-form '(forward-char -1)))
3341 (defun byte-compile-insert (form)
3350 (byte-compile-out 'byte-insert 0)))
3357 (byte-compile-out 'byte-insert 0)
3431 (byte-defop-compiler-1 map-char-table byte-compile-funarg)
4014 (insert "Call tree for "
4050 (insert "\t"
4053 " <top level>";; shouldn't insert nil then, actually -sk
4081 (insert " called by:\n")
4083 (insert " " (if (car callers)
4089 (insert "\n"))))
4092 (insert " calls:\n")
4094 (insert " " (mapconcat 'symbol-name calls ", "))
4098 (insert "\n"))))
4113 (insert "Noninteractive functions not known to be called:\n ")
4115 (insert (mapconcat 'symbol-name (nreverse uncalled) ", "))
4243 (insert (format "%-4d" i))
4244 (insert (symbol-name op))
4245 (if off (insert " [" (int-to-string off) "]"))
4247 (insert (int-to-string n) "\n")))