tr2post: rename charlib files to not be case-dependent (OS X)
This commit is contained in:
parent
57a6108c76
commit
9daa3ca74e
21 changed files with 413 additions and 2 deletions
36
troff/font/devutf/charlib/_r_c
Normal file
36
troff/font/devutf/charlib/_r_c
Normal file
|
|
@ -0,0 +1,36 @@
|
|||
%
|
||||
% This stuff has gotten terribly complicated - sorry.
|
||||
%
|
||||
|
||||
currentdict /bvbbox known not {/bvbbox [0 0 0 0 0 0 0] def} if
|
||||
|
||||
/build_rc {
|
||||
pop
|
||||
gsave
|
||||
currentpoint translate newpath
|
||||
bvbbox 6 get size ne {
|
||||
gsave
|
||||
initgraphics
|
||||
scaling scaling scale
|
||||
0 0 moveto
|
||||
(\357) false charpath flattenpath pathbbox 0 0 size bvbbox astore pop
|
||||
0 1 idtransform dup mul exch dup mul add sqrt dup
|
||||
bvbbox 1 get add bvbbox 1 3 -1 roll put
|
||||
bvbbox 3 get exch sub bvbbox 3 3 -1 roll put
|
||||
bvbbox 2 get bvbbox 0 get sub bvbbox 4 3 -1 roll put
|
||||
bvbbox 2 get bvbbox 0 get add 2 div bvbbox 5 3 -1 roll put
|
||||
grestore
|
||||
} if
|
||||
bvbbox 2 get bvbbox 1 get moveto
|
||||
bvbbox 2 get bvbbox 3 get lineto
|
||||
bvbbox 5 get bvbbox 4 get 8 mul sub dup bvbbox 3 get lineto
|
||||
bvbbox 1 get lineto closepath clip newpath
|
||||
0 0 moveto (\357) show
|
||||
bvbbox 5 get bvbbox 3 get moveto
|
||||
bvbbox 4 get dup dup
|
||||
8 mul neg 0 rlineto
|
||||
0 exch neg rlineto
|
||||
8 mul 0 rlineto
|
||||
closepath clip eofill
|
||||
grestore
|
||||
} def
|
||||
Loading…
Add table
Add a link
Reference in a new issue