Sign in
plan9port
/
plan9
/
c99867c9e05dd31fce28ae16aad083e893514f5a
/
.
/
troff
/
font
/
devutf
/
charlib
/
_s_q
blob: 32486e8866303ab09d318f57be7b8578669edf88 [
file
] [
log
] [
blame
]
/
build_sq
{
pop
size
2
div
/
side exch
def
currentpoint
newpath
moveto
0
side rlineto
side
0
rlineto
0
side neg rlineto
closepath
font B eq
{
fill
}
{
stroke
}
ifelse
}
def