Lines Matching +defs:point +defs:marker
285 floating point arithmetic is inexact. For instance, depending on
786 (list (selected-window) (point) '(0 . 0) 0)))
797 (list (selected-window) (point) '(0 . 0) 0)))
822 (defsubst posn-point (position)
831 (defun posn-set-point (position)
832 "Move point to POSITION.
837 (if (numberp (posn-point position))
838 (goto-char (posn-point position))))
927 (define-obsolete-function-alias 'window-dot 'window-point "22.1")
928 (define-obsolete-function-alias 'set-window-dot 'set-window-point "22.1")
994 (defalias 'move-marker 'set-marker)
1006 (defalias 'point-at-eol 'line-end-position)
1007 (defalias 'point-at-bol 'line-beginning-position)
1771 SECONDS may be a floating-point value.
1773 second, floating-point values are rounded down to the nearest integer.)
1784 floating point support.
1932 If POS is a marker, only its position is used; its buffer is ignored.
1951 (setq pos (point))
1955 (setq insert-end (point))
1962 (if (> (point) pos)
2011 (unless beg (setq beg (point-min)))
2012 (unless end (setq end (point-max)))
2073 "Determine default tag to search for, based on text at point.
2079 (save-excursion (beginning-of-line) (point))
2082 (save-excursion (end-of-line) (point))
2088 (point)
2092 (point)))
2176 (while (< (point) end)
2177 (let ((cat (get-text-property (point) 'category))
2180 (next-single-property-change (point) 'category nil end))
2183 (remove-list-of-text-properties (point) run-end '(category))
2184 (while (< (point) run-end)
2185 (setq run-end2 (next-property-change (point) nil run-end))
2186 (setq original (text-properties-at (point)))
2187 (set-text-properties (point) run-end2 (symbol-plist cat))
2188 (add-text-properties (point) run-end2 original)
2208 "Insert STRING at point, stripping some text properties.
2226 if FUNCTION adjusts point before or after inserting the object.
2234 (opoint (point))
2242 (setq end (point))
2255 (while (< (point) end)
2256 (let ((face (get-text-property (point) 'font-lock-face))
2259 (next-single-property-change (point) 'font-lock-face nil end))
2261 (remove-text-properties (point) run-end '(font-lock-face nil))
2262 (put-text-property (point) run-end 'face face))
2266 (remove-yank-excluded-properties opoint (point)))
2279 "Insert before point a substring of BUFFER, without text properties.
2282 They default to the values of (point-min) and (point-max) in BUFFER."
2283 (let ((opoint (point)))
2286 (set-text-properties opoint (point) nil))))
2289 "Insert before point a part of BUFFER, stripping some text properties.
2292 They default to the values of (point-min) and (point-max) in BUFFER.
2297 (let ((opoint (point)))
2299 (remove-yank-excluded-properties opoint (point))))
2334 Insert output in BUFFER before point; t means current buffer;
2425 (write-region (point-min) (point-max) ,temp-file nil 0)))
2663 "Return non-nil if text before point matches regular expression REGEXP.
2664 Like `looking-at' except matches before point, and is slower.
2672 (let ((start (point))
2676 (point)))))
2679 (narrow-to-region (point-min) start)
2680 (while (and (> pos (point-min))
2916 (unless (or (< pos (point-min)) (>= pos (point-max)))
2972 (unless (> mod-beg (point))
2974 (delete-region mod-beg (point)))
2980 "Create a text clone of START...END at point.
2984 The buffer's content at point is assumed to be already identical to
2999 (let* ((pt-end (+ (point) (- end start)))
3000 (start-margin (if (or (not spreadp) (bobp) (<= start (point-min)))
3003 (>= pt-end (point-max))
3004 (>= start (point-max)))
3007 (ol2 (make-overlay (- (point) start-margin) (+ pt-end end-margin) nil t))