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

Lines Matching +refs:point +refs:min

142 ;; at point.
152 ;; Matches a sequence of (at least one) \"harmless-line\" at point.
163 ;; Matches an AWK string at point up to, but not including, any terminator.
325 (let ((par-pos (c-safe (scan-lists (point) -1 0))))
340 (let ((par-pos (c-safe (scan-lists (point) -1 0))))
369 (let ((par-pos (c-safe (scan-lists (point) -1 1))))
398 (not (setq nl-prop (c-get-char-property (1- (point)) 'c-awk-NL-prop)))
399 (progn (setq bol-pos (c-point 'bopl))
400 (setq bsws-pos (point))
406 (or (/= (point) bsws-pos)
408 (c-put-char-property (1- (point)) 'c-awk-NL-prop nl-prop)
443 (let* ((pos (point))
465 (c-put-char-property (point) 'c-awk-NL-prop nl-prop)
470 (while (< (point) pos) ; one content-free line each iteration.
478 (c-put-char-property (1- (point)) 'c-awk-NL-prop nl-prop))
489 (or (c-get-char-property (c-point 'eopl) 'c-awk-NL-prop)
527 ;;;; or } to do the job. Like point, it is considered to lie _between_ two
537 (pos-or-point (progn (if pos (goto-char pos)) (point))))
540 (and (eq (point) pos-or-point)
551 ;; prevent an infinite recursion in c-beginning-of-statement-1 when point
553 (not (c-get-char-property (c-point 'eol) 'c-awk-NL-prop)))
564 (c-clear-char-properties beg (point-max) 'c-awk-NL-prop)))
582 ;; (if (setq pl-prop (c-get-char-property (c-point 'eopl) 'c-awk-NL-prop))
585 ;; (if (setq cl-prop (c-get-char-property (c-point 'eol) 'c-awk-NL-prop))
615 ;; line containing POS), returning the buffer position of that point. I.e.,
625 (while (and (> (point) (point-min))
626 (eq (char-before (1- (point))) ?\\))
628 (point))
632 ;; the line containing POS), returning the buffer position of that point. I.e.,
642 (while (and (< (point) (point-max))
645 (point))
670 (cond ((eq end (point-max)) ; string/regexp terminated by EOB
684 (c-put-char-property (1- (point)) 'syntax-table '(1))))))
688 ;; properties on this string, leaving point just after the string.
713 ;; we analyse the line from ANCHOR up till point to determine what the / at
714 ;; point is.
716 ;; The result is what ANCHOR-STATE-/DIV (see above) is where point is left.
719 (let ((/point (point)))
723 (not (search-forward-regexp c-awk-regexp-sign-re (1+ /point) t))
724 (search-forward-regexp c-awk-div-sign-re (1+ /point) t))
726 (progn (goto-char (1+ /point)) nil)
729 (goto-char /point)
742 ;; Scan the buffer text between point and LIM, setting (and clearing) the
769 (c-clear-char-properties (point) lim 'syntax-table)
775 (< (point) lim))
776 (setq anchor (point))
799 ;; and clears c-awk-NL-prop text properties from this point onwards.
806 (c-awk-clear-NL-props end (point-max))))))
812 ;; N.B. point is left undefined.
1002 (while (and found (> arg 0) (not (eq (point) (point-min))))
1006 "^[^#} \t\n\r]" (point-min) 'stop-at-limit))
1010 (if (not (eq (point) (point-max))) (forward-char 1))
1011 (while (and found (< arg 0) (not (eq (point) (point-max)))) ; The same for -ve arg.
1013 "^[^#} \t\n\r]" (point-max) 'stop-at-limit))
1043 ;; point is at the start of a "defun". Move to its end. Return end position.
1048 ((looking-at "{") (goto-char (scan-sexps (point) 1)))
1052 (point))
1077 (let ((start-point (point)) end-point)
1082 ;; We start counting ARG only when step (i) has passed the original point.
1086 (when (not (c-awk-beginning-of-defun 1)) ; No bo-defun before point.
1087 (goto-char start-point)
1092 (if (> (point) start-point) (setq arg (1- arg)) t)
1097 (setq end-point start-point)
1100 (if (< (setq end-point (if (bobp) (point)
1102 start-point)
1105 (goto-char (min start-point end-point)))))))