plan9port/troff/font/devutf/charlib/_b_x

12 lines
180 B
Text

/build_bx {
pop
size 2 div /side exch def
currentpoint
newpath
moveto
0 side rlineto
side 0 rlineto
0 side neg rlineto
closepath
fill
} def