annotate etc/ps-prin2.ps @ 28067:e09db52da018
Update copyright and leading comment.
(regexp-opt): Update comment and adapt the code the new meaning of the
`paren' argument of regex-opt-group for shy-groups.
(regexp-opt-depth): Handle shy groups as well as backslashed backslashes.
(regexp-opt-group): Turn the leading comment into a docstring.
Allow `paren' to be a string (the string to use to open a group).
Remove open-presuf and close-presuf.
Instead of checking for `all one-char' and then later on check for
`several one-char', handle both cases close together.
Also apply a more generic algorithm for suffixes (the mirror image
of the algorithm used for prefixes).
Use shy-groups.
\Use nreverse rather than reverse.
(regexp-opt-try-suffix): Removed.
| author |
Stefan Monnier <monnier@iro.umontreal.ca> |
| date |
Thu, 09 Mar 2000 00:41:22 +0000 |
| parents |
e0beb5cd0257 |
| children |
bb81eb902e0c |
| rev |
line source |
|
27165
|
1 % === BEGIN ps-print prologue 2
|
|
|
2
|
|
|
3 % ---- These lines must be kept together because...
|
|
|
4
|
|
|
5 /h0 F
|
|
|
6 /HeaderTitleLineHeight FontHeight def
|
|
|
7
|
|
|
8 /h1 F
|
|
|
9 /HeaderLineHeight FontHeight def
|
|
|
10 /HeaderDescent Descent def
|
|
|
11
|
|
|
12 % ---- ...because `F' has a side-effect on `FontHeight' and `Descent'
|
|
|
13
|
|
|
14 % === END ps-print prologue 2
|
