Lines Matching defs:stack
722 (defvar po-marker-stack)
841 ;; "Position stack"
1185 (set (make-local-variable 'po-marker-stack) nil)
1530 "Tell how many entries in the entry location stack."
1531 (let ((depth (length po-marker-stack)))
1532 (cond ((= depth 0) (message (_"Empty location stack")))
1533 ((= depth 1) (message (_"One entry in location stack")))
1534 (t (message (_"%d entries in location stack") depth)))))
1542 (setq po-marker-stack (cons (point-marker) po-marker-stack)))
1548 (if po-marker-stack
1550 (goto-char (car po-marker-stack))
1551 (setq po-marker-stack (cdr po-marker-stack))
1554 (error (_"The entry location stack is empty"))))
1557 "Exchange the location of the current entry with the top of stack."
1559 (if po-marker-stack
1564 (goto-char (car po-marker-stack))
1565 (setq po-marker-stack (cons location (cdr po-marker-stack))))
1568 (error (_"The entry location stack is empty"))))