Return to sq CVS log

Up to [Research Unix] / researchv10no / cmd / postscript / devopost / charlib

Annotation of researchv10no/cmd/postscript/devopost/charlib/sq, revision 1.1.1.1

1.1       root        1: /build_sq {
                      2:     pop
                      3:     size 2 div /side exch def
                      4:     currentpoint
                      5:     newpath
                      6:     moveto
                      7:     0 side rlineto
                      8:     side 0 rlineto
                      9:     0 side neg rlineto
                     10:     closepath
                     11:     font B eq {fill} {stroke} ifelse
                     12: } def

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.