pdftex[941] branches/stable/source/src/texk/web2c/pdftexdir: rename

[commits+karl at tug.org]

Revision: 941
          https://tug.org/svn/pdftex?view=revision&revision=941
Author:   karl
Date:     2025-01-23 00:21:58 +0100 (Thu, 23 Jan 2025)
Log Message:
-----------
rename resolution_ratio to one_inch per thanh

Modified Paths:
--------------
    branches/stable/source/src/texk/web2c/pdftexdir/ChangeLog
    branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web

Modified: branches/stable/source/src/texk/web2c/pdftexdir/ChangeLog
===================================================================
--- branches/stable/source/src/texk/web2c/pdftexdir/ChangeLog	2025-01-18 22:50:27 UTC (rev 940)
+++ branches/stable/source/src/texk/web2c/pdftexdir/ChangeLog	2025-01-22 23:21:58 UTC (rev 941)
@@ -1,3 +1,7 @@
+2025-01-22  Thanh Han The  <hanthethanh at gmail.com>
+
+	* pdftex.web (scale_image): rename resolution_ratio to one_inch.
+
 2025-01-18  Andreas Scherer  <https://ascherer.github.io>
 
 	* pdftex.web: Purge backslash from |maxdimen|.

Modified: branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web
===================================================================
--- branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web	2025-01-18 22:50:27 UTC (rev 940)
+++ branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web	2025-01-22 23:21:58 UTC (rev 941)
@@ -15784,10 +15784,10 @@
 @!one_bp: scaled; {scaled value corresponds to 1bp}
 @!one_hundred_bp: scaled; {scaled value corresponds to 100bp}
 @!one_hundred_inch: scaled; {scaled value corresponds to 100in}
+@!one_inch: integer; {(1in in sp)/|maxdimen|}
 @!ten_pow: array[0..9] of integer; {$10^0..10^9$}
 @!scaled_out: integer; {amount of |scaled| that was taken out in
 |divide_scaled|}
-@!resolution_ratio: integer; {(1in in sp)/|maxdimen|}
 @!init_pdf_output: boolean;
 @!adv_char_width_s: integer; {to save result of calculation done in |adv_char_width| }
 @!adv_char_width_s_out: scaled;
@@ -15796,7 +15796,7 @@
 one_bp := 65782; {65781.76}
 one_hundred_bp := 6578176;
 one_hundred_inch := 473628672;
-resolution_ratio := 226;
+one_inch := 226;
 ten_pow[0] := 1;
 for i := 1 to 9 do
     ten_pow[i] := 10*ten_pow[i - 1];
@@ -34431,7 +34431,7 @@
     end;
     if (x <= 0) or (y <= 0) or (xr < 0) or (yr < 0) then
         pdf_error("ext1", "invalid image dimensions");
-    if (x / resolution_ratio >= xr) or (y / resolution_ratio >= yr) then begin
+    if (x / one_inch >= xr) or (y / one_inch >= yr) then begin
         {It's better to warn and ignore too-small resolutions given in
          the image file, usually 1dpi x 1dpi, to avoid arithmetic overflow.}
         xr := 0;