/macosx-10.10/emacs-93/emacs/lisp/play/ |
H A D | studly.el | 25 (setq begin (point)) 26 (while (and (<= (point) end) 30 (setq begin (max (point) begin)) 33 (word-end (min (point) end)) 36 (while (< (point) word-end) 41 (while (< (point) word-end) 51 (setq begin (point)))))) 57 (let ((begin (point)) end rb re) 59 (setq end (point)) [all...] |
/macosx-10.10/emacs-93/emacs/lisp/ |
H A D | misc.el | 31 "Copy characters from previous nonblank line, starting just above point. 34 The characters copied are inserted in the buffer before point." 45 (setq n (if arg (prefix-numeric-value arg) (point-max))) 51 (setq string (make-string (min n (- (current-column) cc)) ?\s)) 52 (setq n (- n (min n (- (current-column) cc))))) 57 (point) 58 (min (save-excursion (end-of-line) (point)) 59 (+ n (point))))))) 68 Ignores CHAR at point [all...] |
H A D | scroll-lock.el | 28 ;; By activating Scroll Lock mode, keys for moving point by line or 54 Keys which normally move point by line or paragraph will scroll 55 the buffer by the respective amount of lines instead and point 80 (not (zerop (mod (- (point) (line-beginning-position)) 83 (forward-char (min column (- (line-end-position) (point)))))) 86 "Scroll up ARG lines keeping point fixed." 90 (if (pos-visible-in-window-p (point-max)) 96 "Scroll up ARG lines keeping point fixed." 106 "Scroll down ARG paragraphs keeping point fixe [all...] |
H A D | reposition.el | 51 definition (or as much as will fit) onscreen, unless point is in a comment 57 If ARG is non-nil, point may move in order to make the whole defun 59 visible (if point is in code and it could not be made so, or if only 61 first comment line visible (if point is in a comment)." 63 (let* (;; (here (save-excursion (beginning-of-line) (point))) 64 (here (point)) 68 (line (repos-count-screen-lines (window-start) (point))) 80 (point)) 87 (point)) 93 (point)))) [all...] |
H A D | compare-w.el | 28 ;; This package provides one entry point, compare-windows. It compares 29 ;; text starting from point in two adjacent windows, advancing point 46 whitespace around (including before) point; it should also advance 48 point at the current scanning point. It gets one argument, the point 50 any text before that point. 142 (defvar compare-windows-sync-point nil) 147 Compares the text starting at point i [all...] |
H A D | sort.el | 59 The next four arguments are functions to be called to move point 62 NEXTRECFUN is called with point at the end of the previous record. 63 It moves point to the start of the next record. 64 It should move point to the end of the buffer if there are no more records. 65 The first record is assumed to start at the position of point when sort-subr 68 ENDRECFUN is called with point within the record. 69 It should move point to the end of the record. 73 else the key is the substring between the values of point after 84 (let ((messages (> (- (point-max) (point [all...] |
H A D | newcomment.el | 135 This function is called with no args with point at the beginning of 286 (goto-char (point-min)) 341 (goto-char (point-min)) 353 (when (and (< (point-min) (match-beginning 0)) 368 point is within a string or not. Major modes whose syntax is faithfully 373 "Find a comment start between point and LIMIT. 374 Moves point t [all...] |
H A D | indent.el | 52 If nil, hitting TAB indents the current line if point is at the left margin 83 If initial point was within line's indentation, position after 84 the indentation. Else stay at same point in text. 119 (setq end (point-marker)) 122 (while (< (point) end) 130 (delete-region (point) (progn (skip-chars-forward " \t") (point)))) 137 only if necessary. It leaves point at end of indentation." 142 (delete-region (point) 143 (progn (skip-chars-backward " ") (point)))) [all...] |
H A D | informat.el | 39 ;; Save and restore point and restrictions. 47 (let ((omin (point-min)) 48 (omax (point-max)) 49 (nomax (= (point-max) (1+ (buffer-size)))) 50 (opoint (point))) 54 (goto-char (point-min)) 125 (goto-char (point-max)) 129 (let ((end (point))) [all...] |
/macosx-10.10/tcl-105/tcl_ext/tclx/tclx/tests/ |
H A D | math.test | 4 # Tests for the random, min, and commands. 80 } 1 {expected floating-point number but got "foo"} 82 Test math-3.1 {min tests} { 83 min 1 2 4 3 86 Test math-3.2 {min tests} { 87 min -68.8 64000 2 5 90 Test math-3.3 {min tests} { 91 min -2000000000 2000000000 2 5 94 Test math-3.3 {min tests} { 95 min [all...] |
/macosx-10.10/emacs-93/emacs/lisp/textmodes/ |
H A D | underline.el | 30 ;; point `underline-region' performs such underlining on a region. 31 ;; The entry point `ununderline-region' removes it. 45 (goto-char (min start end)) 46 (while (< (point) end1) 60 (goto-char (min start end))
|
H A D | fill.el | 70 "Set the fill prefix to the current line up to point. 74 (let ((left-margin-pos (save-excursion (move-to-left-margin) (point)))) 75 (if (> (point) left-margin-pos) 77 (setq fill-prefix (buffer-substring left-margin-pos (point))) 138 (let* ((here (progn (beginning-of-line) (point))) 140 (eol (progn (end-of-line) (point))) 175 (while (and (< (point) end) 187 (min (match-end 0) 191 (point))))) 250 (if (< (point) t [all...] |
H A D | two-column.el | 131 ;; Pli bone ankora^u, vi povas pozici- Better yet, you can put the point 250 "*The width of the first column. (Must be at least `window-min-width') 323 \\[2C-associated-buffer] Switch to associated buffer at same point 324 \\[2C-newline] Insert newline(s) in both buffers at same point 356 (max window-min-width (min 2C-window-width 357 (- (frame-width) window-min-width)))) 366 (2C-mode (prog1 (point-marker) 374 (2C-mode (prog1 (point-marker) 407 "Split a two-column text at point, int [all...] |
H A D | texnfo-upd.el | 87 ;; point is located (i.e., for the node preceding point). 111 ;; point. With an argument, it makes or updates menus for the nodes 135 ;; description in the menu following point, to the specified column. 262 Make the menu for the section enclosing the node found following point. 278 (list (point) (mark)))) 286 (goto-char (min beginning end)) 287 ;; find section type following point 299 (while (and (< (point) (marker-position region-end-marker)) 322 (point))) [all...] |
H A D | makeinfo.el | 122 (goto-char (point-min)) 123 (let ((search-end (save-excursion (forward-line 100) (point)))) 135 (goto-char (point-min)) 141 (setq filename-or-header-beginning (point))) 146 (setq filename-or-header-end (point)))) 150 (min filename-or-header-beginning region-beginning) 155 (goto-char (point-min)) [all...] |
/macosx-10.10/WebCore-7600.1.25/platform/graphics/ |
H A D | LayoutPoint.h | 43 LayoutPoint(const IntPoint& point) : m_x(point.x()), m_y(point.y()) { } argument 71 return LayoutPoint(std::min(m_x, other.m_x), std::min(m_y, other.m_y)); 127 inline LayoutPoint operator-(const LayoutPoint& point) argument 129 return LayoutPoint(-point.x(), -point.y()); 147 inline LayoutSize toLayoutSize(const LayoutPoint& point) argument 149 return LayoutSize(point 152 flooredIntPoint(const LayoutPoint& point) argument 157 roundedIntPoint(const LayoutPoint& point) argument 167 ceiledIntPoint(const LayoutPoint& point) argument 187 roundedForPainting(const LayoutPoint& point, float pixelSnappingFactor, bool directionalRoundingToRight = true, bool directionalRoundingToBottom = true) argument 199 flooredForPainting(const LayoutPoint& point, float pixelSnappingFactor) argument 209 ceiledForPainting(const LayoutPoint& point, float pixelSnappingFactor) argument [all...] |
H A D | FloatPolygon.cpp | 52 static inline bool isPointOnLineSegment(const FloatPoint& vertex1, const FloatPoint& vertex2, const FloatPoint& point) argument 54 return point.x() >= std::min(vertex1.x(), vertex2.x()) 55 && point.x() <= std::max(vertex1.x(), vertex2.x()) 56 && areCollinearPoints(vertex1, vertex2, point); 154 static inline float leftSide(const FloatPoint& vertex1, const FloatPoint& vertex2, const FloatPoint& point) 156 return ((point.x() - vertex1.x()) * (vertex2.y() - vertex1.y())) - ((vertex2.x() - vertex1.x()) * (point.y() - vertex1.y())); 159 bool FloatPolygon::containsEvenOdd(const FloatPoint& point) const 165 if (isPointOnLineSegment(vertex1, vertex2, point)) [all...] |
H A D | FloatRect.cpp | 71 bool FloatRect::contains(const FloatPoint& point, ContainsMode containsMode) const argument 74 return contains(point.x(), point.y()); 75 return x() < point.x() && maxX() > point.x() && y() < point.y() && maxY() > point.y(); 82 float r = std::min(maxX(), other.maxX()); 83 float b = std::min(maxY(), other.maxY()); 111 float minX = std::min( [all...] |
H A D | IntRect.cpp | 66 int r = std::min(maxX(), other.maxX()); 67 int b = std::min(maxY(), other.maxY()); 93 int l = std::min(x(), other.x()); 94 int t = std::min(y(), other.y()); 114 int left = std::min(x(), other.x()); 115 int top = std::min(y(), other.y()); 142 IntSize IntRect::differenceToPoint(const IntPoint& point) const 144 int xdistance = distanceToInterval(point.x(), x(), maxX()); 145 int ydistance = distanceToInterval(point.y(), y(), maxY());
|
/macosx-10.10/emacs-93/emacs/lisp/progmodes/ |
H A D | cc-engine.el | 207 ;; works as long as point doesn't cross a macro boundary. 215 (point))))) 223 (point)))) 228 Leave point at the beginning of the directive and return t if in one, 229 otherwise return nil and leave point unchanged. 234 (let ((here (point))) 236 (if lim (narrow-to-region lim (point-max))) 238 (while (eq (char-before (1- (point))) ?\\) 241 (if (and (<= (point) here) 249 More accurately, move the point t [all...] |
H A D | cc-cmds.el | 61 (defun c-indent-line (&optional syntax quiet ignore-point-pos) 67 point is used to decide where the old indentation is on a lines that 78 (when (and (not ignore-point-pos) 86 (<= (point) (match-end 1))) 87 ;; Delete all whitespace after point if there's only whitespace 98 (delete-region (point) (match-end 0)) 137 (c-backslash-region (point) (point) nil t)))) 159 (setq start (point)) 167 (setq has-backslash (eq (char-before (c-point 'eo [all...] |
H A D | cperl-mode.el | 261 (defcustom cperl-min-label-indent 1 308 regardless of where in the line point is when the TAB command is used." 624 "*Non-nil means that CPerl syntaxifies up to the point before showing menu. 761 `fill-paragraph' on a comment may leave the point behind the 1060 (put-text-property (max (point-min) (1- from)) 1071 (parse-partial-sexp (point) (point)))) 9)) 1087 (let ((prop (get-text-property (point) 'syntax-type))) 1096 (or (get-text-property (point) 'synta [all...] |
/macosx-10.10/emacs-93/emacs/lisp/obsolete/ |
H A D | scribe.el | 165 (let ((spos (point)) (epos (point)) (ccoun 0) noparens) 168 (forward-sexp (min -1 count))) 169 (setq spos (point)) 176 (setq epos (point)))) 201 "Underline COUNT words around point by means of Scribe constructs." 206 "Boldface COUNT words around point by means of Scribe constructs." 211 "Italicize COUNT words around point by means of Scribe constructs." 250 (defun scribe-bracket-region-be (env min max) 255 (goto-char min) [all...] |
/macosx-10.10/emacs-93/emacs/lisp/emulation/ |
H A D | tpu-extras.el | 229 (let ((beg (point))) 232 (if (<= (point) beg) (progn (forward-line) (picture-end-of-line))))) 250 "Move point to end of current line." 252 (let ((beg (point))) 254 (if (= beg (point)) (message "You are already at the end of a line.")))) 292 (top (save-excursion (move-to-window-line top-margin) (point))) 293 (bottom (save-excursion (move-to-window-line bottom-margin) (point))) 295 (goto-char bottom) (forward-line (- height 2)) (point)))) 298 (cond((> (point) far) 303 (and (> (point) botto [all...] |
H A D | edt.el | 188 (defvar edt-rect-start-point) 190 (defvar rect-start-point) 677 (goto-char (point-min)) 687 (goto-char (point-max)) 710 (top (save-excursion (move-to-window-line top-margin) (point))) 711 (bottom (save-excursion (move-to-window-line bottom-margin) (point))) 713 (goto-char bottom) (forward-line (- height 2)) (point)))) 718 (cond((> (point) far) 723 (and (> (point) botto [all...] |