diff options
Diffstat (limited to 'lisp/vc/ediff-init.el')
| -rw-r--r-- | lisp/vc/ediff-init.el | 46 |
1 files changed, 20 insertions, 26 deletions
diff --git a/lisp/vc/ediff-init.el b/lisp/vc/ediff-init.el index 95568b29c7c..0235926fbe4 100644 --- a/lisp/vc/ediff-init.el +++ b/lisp/vc/ediff-init.el | |||
| @@ -150,6 +150,26 @@ It needs to be killed when we quit the session.") | |||
| 150 | (defsubst ediff-get-symbol-from-alist (buf-type alist) | 150 | (defsubst ediff-get-symbol-from-alist (buf-type alist) |
| 151 | (cdr (assoc buf-type alist))) | 151 | (cdr (assoc buf-type alist))) |
| 152 | 152 | ||
| 153 | ;; Vector of differences between the variants. Each difference is | ||
| 154 | ;; represented by a vector of two overlays plus a vector of fine diffs, | ||
| 155 | ;; plus a no-fine-diffs flag. The first overlay spans the | ||
| 156 | ;; difference region in the A buffer and the second overlays the diff in | ||
| 157 | ;; the B buffer. If a difference section is empty, the corresponding | ||
| 158 | ;; overlay's endpoints coincide. | ||
| 159 | ;; | ||
| 160 | ;; The precise form of a Difference Vector for one buffer is: | ||
| 161 | ;; [diff diff diff ...] | ||
| 162 | ;; where each diff has the form: | ||
| 163 | ;; [diff-overlay fine-diff-vector no-fine-diffs-flag state-of-diff] | ||
| 164 | ;; fine-diff-vector is a vector [fine-diff-overlay fine-diff-overlay ...] | ||
| 165 | ;; no-fine-diffs-flag says if there are fine differences. | ||
| 166 | ;; state-of-difference is A, B, C, or nil, indicating which buffer is | ||
| 167 | ;; different from the other two (used only in 3-way jobs. | ||
| 168 | (ediff-defvar-local ediff-difference-vector-A nil "") | ||
| 169 | (ediff-defvar-local ediff-difference-vector-B nil "") | ||
| 170 | (ediff-defvar-local ediff-difference-vector-C nil "") | ||
| 171 | (ediff-defvar-local ediff-difference-vector-Ancestor nil "") | ||
| 172 | ;; A-list of diff vector types associated with buffer types | ||
| 153 | (defconst ediff-difference-vector-alist | 173 | (defconst ediff-difference-vector-alist |
| 154 | '((A . ediff-difference-vector-A) | 174 | '((A . ediff-difference-vector-A) |
| 155 | (B . ediff-difference-vector-B) | 175 | (B . ediff-difference-vector-B) |
| @@ -642,32 +662,6 @@ shown in brighter colors." | |||
| 642 | ;;buffer-read-only | 662 | ;;buffer-read-only |
| 643 | mode-line-format)) | 663 | mode-line-format)) |
| 644 | 664 | ||
| 645 | ;; Vector of differences between the variants. Each difference is | ||
| 646 | ;; represented by a vector of two overlays plus a vector of fine diffs, | ||
| 647 | ;; plus a no-fine-diffs flag. The first overlay spans the | ||
| 648 | ;; difference region in the A buffer and the second overlays the diff in | ||
| 649 | ;; the B buffer. If a difference section is empty, the corresponding | ||
| 650 | ;; overlay's endpoints coincide. | ||
| 651 | ;; | ||
| 652 | ;; The precise form of a Difference Vector for one buffer is: | ||
| 653 | ;; [diff diff diff ...] | ||
| 654 | ;; where each diff has the form: | ||
| 655 | ;; [diff-overlay fine-diff-vector no-fine-diffs-flag state-of-diff] | ||
| 656 | ;; fine-diff-vector is a vector [fine-diff-overlay fine-diff-overlay ...] | ||
| 657 | ;; no-fine-diffs-flag says if there are fine differences. | ||
| 658 | ;; state-of-difference is A, B, C, or nil, indicating which buffer is | ||
| 659 | ;; different from the other two (used only in 3-way jobs. | ||
| 660 | (ediff-defvar-local ediff-difference-vector-A nil "") | ||
| 661 | (ediff-defvar-local ediff-difference-vector-B nil "") | ||
| 662 | (ediff-defvar-local ediff-difference-vector-C nil "") | ||
| 663 | (ediff-defvar-local ediff-difference-vector-Ancestor nil "") | ||
| 664 | ;; A-list of diff vector types associated with buffer types | ||
| 665 | (defconst ediff-difference-vector-alist | ||
| 666 | '((A . ediff-difference-vector-A) | ||
| 667 | (B . ediff-difference-vector-B) | ||
| 668 | (C . ediff-difference-vector-C) | ||
| 669 | (Ancestor . ediff-difference-vector-Ancestor))) | ||
| 670 | |||
| 671 | ;; [ status status status ...] | 665 | ;; [ status status status ...] |
| 672 | ;; Each status: [state-of-merge state-of-ancestor] | 666 | ;; Each status: [state-of-merge state-of-ancestor] |
| 673 | ;; state-of-merge is default-A, default-B, prefer-A, or prefer-B. It | 667 | ;; state-of-merge is default-A, default-B, prefer-A, or prefer-B. It |