Showing the changes to examples (4 of 21 files). Show all
Unified · Split
| @@ -0,0 +1,23 @@ | ||
| 1 | +@x In my work (mainly TAOCP) I use \: (not \.) for the dot accent | |
| 2 | +'&`&\relax\^&"&\relax\~&=&.&u&v\cr | |
| 3 | +@y | |
| 4 | +'&`&\relax\^&"&\relax\~&=&:&u&v\cr | |
| 5 | +@z | |
| 6 | +@x | |
| 7 | + 1,1,1,1,1,0,0,1, /* \.{\\-} and \.{\\.} */ | |
| 8 | + 1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1, /* \.{\\=} */ | |
| 9 | +@y | |
| 10 | + 1,1,1,1,1,0,1,1, /* \.{\\-} */ | |
| 11 | + 1,1,1,1,1,1,1,1,1,1,0,1,1,0,1,1, /* \.{:} and \.{\\=} */ | |
| 12 | +@z | |
| 13 | +@x and I use |...xref-tag...| for cross-references | |
| 14 | +case '|': if (web>1) { | |
| 15 | + save_skipping=skipping; | |
| 16 | + goto skip_C_prime; | |
| 17 | + } | |
| 18 | +@y | |
| 19 | +case '|': if (web>1) { | |
| 20 | + save_skipping=skipping; | |
| 21 | + goto skip_C_prime; | |
| 22 | + } else discard_to('|'); | |
| 23 | +@z | |
| @@ -26,6 +26,7 @@ along too. If any of these control sequences is followed by \.\{, everything · 25 unmodified lines | ||
| 26 | 26 | up to the next \.\} will also be retained. Thus, for example, the |
| 27 | 27 | construction `\.{m\\=\{\\i\}n\\u\ us}' will be considered a single word, |
| 28 | 28 | in spite of the control sequences and the space between the two u's. |
| 29 | +Discretionary hyphens `\.{\char`\\-}' are treated in the same way as accents. | |
| 29 | 30 | |
| 30 | 31 | The \.{CWEB} conventions are essentially the same as the \TEX/ conventions, |
| 31 | 32 | in the \TEX/ parts of a \.{CWEB} file. The \CEE/ parts of the file |
| @@ -229,7 +230,7 @@ special, otherwise~1; the conventions for letters are reversed. · 197 unmodified lines | ||
| 229 | 230 | |
| 230 | 231 | @<Global...@>= |
| 231 | 232 | char ptab[]={0,1,1,1,1,0, /* \.{\\"} and \.{\\'} */ |
| 232 | − 1,1,1,1,1,1,0,1, /* \.{\\.} */ | |
| 233 | + 1,1,1,1,1,0,0,1, /* \.{\\-} and \.{\\.} */ | |
| 233 | 234 | 1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1, /* \.{\\=} */ |
| 234 | 235 | 1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,1, /* \.{\\H}, \.{\\L}, \.{\\O} */ |
| 235 | 236 | 0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1, /* \.{\\\^} */ |
| @@ -18,6 +18,11 @@ · 17 unmodified lines | ||
| 18 | 18 | ;; and nothing else, the probable cause is that the wordtest program |
| 19 | 19 | ;; could not open /usr/local/lib/dict/words or ~/.words for reading. |
| 20 | 20 | |
| 21 | +;; Note (10 Feb 1998): The spell-check logic failed to catch "obso1ete" | |
| 22 | +;; as a scanner-typo for "obsolete". The reason is that, although "obso" | |
| 23 | +;; and "ete" are non-words, they couldn't be found in query-replace | |
| 24 | +;; for the regexps "\bobso\b" and "\bete\b". | |
| 25 | + | |
| 21 | 26 | (provide 'kspell) |
| 22 | 27 | |
| 23 | 28 | (defvar wordtest-command "wordtest" ;; maybe "/usr/local/bin/wordtest" better? |
| @@ -46,7 +46,6 @@ · 45 unmodified lines | ||
| 46 | 46 | (define-key suntool-map "jt" 'narrow-to-region) ; F10 |
| 47 | 47 | (define-key suntool-map "j\M-t" 'narrow-to-page) ; M-F10 |
| 48 | 48 | (define-key suntool-map "kt" 'revert-buffer) ; F11 |
| 49 | − (define-key suntool-map "k\M-T" 'quick-revert-buffer) ; Shift-M-F11 | |
| 50 | 49 | (define-key suntool-map "k\M-t" 'quick-revert-other-buffer) ; M-F11 |
| 51 | 50 | (define-key suntool-map "lt" 'goto-line) ; F12 |
| 52 | 51 | (define-key suntool-map "l\M-t" 'goto-line) ; M-F12 |