pkgsrc/print/advi/patches/patch-ai
tonio 5f7659977a let advi compile and run happily with ocaml-3.09
Use the teTeX/module.mk and honor PKG_LOCALTEXMFPREFIX
make sure advi's makefile do not run texhash by itself (rely on module.mk for that)

Many patches removing warnings (from advi's cvs)
bump PKGREVISION, and remove broken-in
2006-04-19 13:13:05 +00:00

31 lines
1.1 KiB
Text

$NetBSD: patch-ai,v 1.1 2006/04/19 13:13:05 tonio Exp $
--- driver.ml.orig 2004-10-01 13:13:35.000000000 +0200
+++ driver.ml
@@ -437,7 +437,7 @@ let color_special st s =
| "color" :: "pop" :: [] ->
color_pop st
| "color" :: args ->
- let c = Dvicolor.parse_color_args args in
+ let _c = Dvicolor.parse_color_args args in
Misc.warning "global color special is not supported"
| _ -> ill_formed_special s;;
@@ -557,8 +557,6 @@ let psfile_special st s =
let y = st.y_origin + Misc.round (st.conv *. float st.v) in
if !visible then
if drawbygs then
- let dx = st.x_origin in
- let dy = st.y_origin in
Dev.draw_ps_by_gs file bbox (rwi, rhi)
(x - st.x_origin) (y - st.y_origin)
else
@@ -1685,8 +1683,6 @@ let unfreeze_glyphs cdvi dpi =
let sdpi = Misc.round (mag *. ldexp dpi 16)
and mtable = ref dummy_mtable
and gtable = ref dummy_gtable in
- let headers = ref []
- and xrefs = cdvi.base_dvi.Cdvi.xrefs in
let otherwise = function
| Dvicommands.C_fnt n ->
let (mt, gt) =