diff options
author | Denis Bitouzé <dbitouze@wanadoo.fr> | 2021-02-25 18:23:07 +0000 |
---|---|---|
committer | Denis Bitouzé <dbitouze@wanadoo.fr> | 2021-02-25 18:23:07 +0000 |
commit | c6101f91d071883b48b1b4b51e5eba0f36d9a78d (patch) | |
tree | 1bf7f5a881d7a4f5c5bf59d0b2821943dd822372 /Build/source/texk/dvipsk/scalewidth.c | |
parent | 07ee7222e389b0777456b427a55c22d0e6ffd267 (diff) |
French translation for tlmgr updated
git-svn-id: svn://tug.org/texlive/trunk@57912 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/dvipsk/scalewidth.c')
-rw-r--r-- | Build/source/texk/dvipsk/scalewidth.c | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/Build/source/texk/dvipsk/scalewidth.c b/Build/source/texk/dvipsk/scalewidth.c deleted file mode 100644 index dab197a9290..00000000000 --- a/Build/source/texk/dvipsk/scalewidth.c +++ /dev/null @@ -1,36 +0,0 @@ -/* - * Code to scale dimensions. Takes two thirty-two bit integers, multiplies - * them, divides them by 2^20, and returns the thirty-two bit result. - * The first integer, the width in FIXes, can lie between -2^24 and 2^24-1. - * The second integer, the scale factor, can lie between 0 and 2^27-1. - * - * Here, unlike in TeX, we do the arithmetic exactly. Since the error - * in the TeX arithmetic is parts per million, and since dvips makes no - * layout decisions, this has no effect. (TeX stipulates that any - * implementation of *TeX* needs to do the arithmetic exactly as - * specified in TeX, but drivers need not.) - * - * Since this math is special, we put it in its own file. It is the only - * place in the program where such accuracy is required. - */ -#include "dvips.h" /* The copyright notice in that file is included too! */ -/* - * The external declarations: - */ -#include "protos.h" - -integer -scalewidth(register integer a, register integer b) -{ - register integer al, bl; - - if (a < 0) - return -scalewidth(-a, b); - if (b < 0) - return -scalewidth(a, -b); - al = a & 32767; - bl = b & 32767; - a >>= 15; - b >>= 15; - return ( ((al*bl/32768) + a*bl+al*b)/32 + a*b*1024); -} |