Lines Matching refs:pos
606 (defmacro c-up-list-forward (&optional pos limit)
612 `(c-safe-scan-lists ,(or pos `(point)) 1 1 ,limit))
614 (defmacro c-up-list-backward (&optional pos limit)
620 `(c-safe-scan-lists ,(or pos `(point)) -1 1 ,limit))
622 (defmacro c-down-list-forward (&optional pos limit)
628 `(c-safe-scan-lists ,(or pos `(point)) 1 -1 ,limit))
630 (defmacro c-down-list-backward (&optional pos limit)
636 `(c-safe-scan-lists ,(or pos `(point)) -1 -1 ,limit))
638 (defmacro c-go-up-list-forward (&optional pos limit)
645 (let ((res `(c-safe (goto-char (scan-lists ,(or pos `(point)) 1 1)) t)))
652 (defmacro c-go-up-list-backward (&optional pos limit)
659 (let ((res `(c-safe (goto-char (scan-lists ,(or pos `(point)) -1 1)) t)))
666 (defmacro c-go-down-list-forward (&optional pos limit)
673 (let ((res `(c-safe (goto-char (scan-lists ,(or pos `(point)) 1 -1)) t)))
680 (defmacro c-go-down-list-backward (&optional pos limit)
687 (let ((res `(c-safe (goto-char (scan-lists ,(or pos `(point)) -1 -1)) t)))
718 pos)
719 (while (not pos)
722 (setq pos (c-safe-scan-lists
725 ((bobp) (setq pos (point-min)))
726 ((not pos)
733 (setq pos (point)))))
734 ((= pos 0))
735 ((not (eq (char-after pos) ?{))
736 (goto-char pos)
737 (setq pos nil))
739 (goto-char pos)))
799 (defmacro c-at-vsemi-p (&optional pos)
805 (funcall c-at-vsemi-p-fn ,@(if pos `(,pos)))))
925 (lambda (pos property value)
926 (let ((ext (extent-at pos nil property)))
929 (set-extent-properties (make-extent pos (1+ pos))
938 (lambda (pos property value)
939 (put-text-property pos (1+ pos) property value)
940 (let ((prop (get-text-property pos 'rear-nonsticky)))
942 (put-text-property pos (1+ pos)
947 (defmacro c-put-char-property (pos property value)
963 `(c-put-char-property-fun ,pos ',property ,value)
966 `(let ((-pos- ,pos))
967 (put-text-property -pos- (1+ -pos-) ',property ,value))))
969 (defmacro c-get-char-property (pos property)
976 `(let ((ext (extent-at ,pos nil ',property)))
979 `(get-text-property ,pos ',property)))
988 (lambda (pos property)
989 (when (get-text-property pos property)
990 (remove-text-properties pos (1+ pos) (list property nil))
991 (put-text-property pos (1+ pos)
994 pos 'rear-nonsticky)))))))))
997 (defmacro c-clear-char-property (pos property)
1006 `(let ((ext (extent-at ,pos nil ',property)))
1011 `(let ((pos ,pos))
1012 (remove-text-properties pos (1+ pos)
1016 `(c-clear-char-property-fun ,pos ',property))))
1125 (defsubst c-mark-<-as-paren (pos)
1130 (c-put-char-property pos 'syntax-table c-<-as-paren-syntax))
1134 (defsubst c-mark->-as-paren (pos)
1139 (c-put-char-property pos 'syntax-table c->-as-paren-syntax))
1163 (defsubst c-langelem-pos (langelem)
1180 (let ((pos (c-langelem-pos langelem))
1182 (if pos
1184 (goto-char pos)
1190 (defsubst c-langelem-2nd-pos (langelem)
1229 (defsubst c-got-face-at (pos faces)
1232 (let ((pos-faces (get-text-property pos 'face)))
1233 (if (consp pos-faces)
1235 (while (and pos-faces
1236 (not (memq (car pos-faces) faces)))
1237 (setq pos-faces (cdr pos-faces)))
1238 pos-faces)
1239 (memq pos-faces faces))))
1288 (let ((unique "") pos)
1291 pos list)
1292 (while (and pos
1293 (if (string-match unique (car pos))
1297 (setq pos (cdr pos)))
1299 (setq pos list)
1300 (while pos
1301 (if (string-match "\\w\\'" (car pos))
1302 (setcar pos (concat (car pos) unique)))
1303 (setq pos (cdr pos)))
1305 (setq pos 0)
1306 (while (string-match unique re pos)
1307 (setq pos (+ (match-beginning 0) 2)
1945 (source-pos
1952 (cons source-pos c-lang-constants-under-evaluation))
1961 (let ((backup-source-pos (copy-sequence (cdr source-pos))))
1967 (cdr source-pos) mode nil name))
1974 (setcdr source-pos backup-source-pos)
1979 (cdr source-pos) mode t name))
1999 (defun c-find-assignment-for-mode (source-pos mode match-any-lang name)
2016 (let ((file-entry (elt source-pos 0))
2017 (assignment-entry (elt source-pos 1))
2027 (unless (aset source-pos 1
2049 (aset source-pos 0 (setq file-entry (cdr file-entry)))
2053 (aset source-pos 1