GopherProxy

	_l_c - 9base - revived minimalist port of Plan 9 userland to Unix
	git clone git://git.suckless.org/9base
	Log
	Files
	Refs
	README
	LICENSE
	---
	_l_c (974B)
	---
	1 %
	2 % This stuff has gotten terribly complicated - sorry.
	3 %
	4
	5 currentdict /bvbbox known not {/bvbbox [0 0 0 0 0 0 0] def} if
	6
	7 /build_lc {
	8 pop
	9 gsave
	10 currentpoint translate newpath
	11 bvbbox 6 get size ne {
	12 gsave
	13 initgraphics
	14 scaling scaling scale
	15 0 0 moveto
	16 (\357) false charpath flattenpath pathbbox 0 0 size bvbb…
	17 0 1 idtransform dup mul exch dup mul add sqrt dup
	18 bvbbox 1 get add bvbbox 1 3 -1 roll put
	19 bvbbox 3 get exch sub bvbbox 3 3 -1 roll put
	20 bvbbox 2 get bvbbox 0 get sub bvbbox 4 3 -1 roll put
	21 bvbbox 2 get bvbbox 0 get add 2 div bvbbox 5 3 -1 roll p…
	22 grestore
	23 } if
	24 bvbbox 0 get bvbbox 1 get moveto
	25 bvbbox 0 get bvbbox 3 get lineto
	26 bvbbox 5 get bvbbox 4 get 8 mul add dup bvbbox 3 get lineto
	27 bvbbox 1 get lineto closepath clip newpath
	28 0 0 moveto (\357) show
	29 bvbbox 5 get bvbbox 3 get moveto
	30 bvbbox 4 get dup dup
	31 8 mul 0 rlineto
	32 0 exch neg rlineto
	33 8 mul neg 0 rlineto
	34 closepath clip eofill
	35 grestore
	36 } def