From 9daa3ca74ebd673d00ba52667c50fe4a0046d100 Mon Sep 17 00:00:00 2001
From: Russ Cox <rsc@swtch.com>
Date: Thu, 31 Jan 2008 16:58:38 -0500
Subject: tr2post: rename charlib files to not be case-dependent (OS X)

---
 troff/font/devutf/charlib/_l_f | 36 ++++++++++++++++++++++++++++++++++++
 1 file changed, 36 insertions(+)
 create mode 100644 troff/font/devutf/charlib/_l_f

(limited to 'troff/font/devutf/charlib/_l_f')

diff --git a/troff/font/devutf/charlib/_l_f b/troff/font/devutf/charlib/_l_f
new file mode 100644
index 00000000..37452549
--- /dev/null
+++ b/troff/font/devutf/charlib/_l_f
@@ -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_lf {
+    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 0 get bvbbox 1 get moveto
+	bvbbox 0 get bvbbox 3 get lineto
+	bvbbox 5 get bvbbox 4 get 8 mul add dup bvbbox 3 get lineto
+	bvbbox 1 get lineto closepath clip newpath
+	0 0 moveto (\357) show
+	bvbbox 5 get bvbbox 1 get moveto
+	bvbbox 4 get dup dup
+	8 mul 0 rlineto
+	0 exch rlineto
+	8 mul neg 0 rlineto
+	closepath clip eofill
+    grestore
+} def
-- 
cgit v1.2.3