diff options
Diffstat (limited to 'Build/source/texk/web2c/pdftexdir/vfpacket.c')
-rw-r--r-- | Build/source/texk/web2c/pdftexdir/vfpacket.c | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/vfpacket.c b/Build/source/texk/web2c/pdftexdir/vfpacket.c index 76152b986cf..7bc551bfc65 100644 --- a/Build/source/texk/web2c/pdftexdir/vfpacket.c +++ b/Build/source/texk/web2c/pdftexdir/vfpacket.c @@ -106,42 +106,3 @@ void vf_free(void) } xfree(packet_array); } - -/* this function was copied/borrowed/stolen from dvipdfm code */ -#define SIGNED_QUAD scaled -#define fixword integer -SIGNED_QUAD sqxfw(SIGNED_QUAD sq, fixword fw) -{ - int sign = 1; - unsigned long a, b, c, d, ad, bd, bc, ac; - unsigned long e, f, g, h, i, j, k; - unsigned long result; - /* Make positive. */ - if (sq < 0) { - sign = -sign; - sq = -sq; - } - if (fw < 0) { - sign = -sign; - fw = -fw; - } - a = ((unsigned long) sq) >> 16u; - b = ((unsigned long) sq) & 0xffffu; - c = ((unsigned long) fw) >> 16u; - d = ((unsigned long) fw) & 0xffffu; - ad = a * d; - bd = b * d; - bc = b * c; - ac = a * c; - e = bd >> 16u; - f = ad >> 16u; - g = ad & 0xffffu; - h = bc >> 16u; - i = bc & 0xffffu; - j = ac >> 16u; - k = ac & 0xffffu; - result = (e + g + i + (1 << 3)) >> 4u; /* 1<<3 is for rounding */ - result += (f + h + k) << 12u; - result += j << 28u; - return (sign > 0) ? result : -result; -} |