Avoid internal rowmult clashing with the user option of the same name

Author: terryburton

CHANGES

@@ -2,6 +2,7 @@ XXXX-XX-XX
 
 * The QR Code, Aztec Code, Ultracode, PDF417, MicroPDF417, MaxiCode, Data Matrix, Han Xin Code, Code One and Codablock F encoders were amended to bound their parsed message length.
 * The DotCode encoder was amedned to cap the rows and columns options at 200.
+* The renmatrix intermediate dictionary key for per-row module heights was renamed from rowmult (a per-row array) to rowheights, eliminating a collision with the public scalar rowmult option of the PDF417 and MicroPDF417 encoders.
 
 
 2026-05-06

src/codablockf.ps.src

@@ -655,40 +655,40 @@ begin
         1 1 0 0 0 1 1 1 0 1 0 1 1
     ] def
 
-    /rowmult numcomprows array def
+    /rowheights numcomprows array def
     /pos 0 def  /ri 0 def
 
     % Top separator
     pixs pos allone putinterval
     /pos pos symwid add def
-    rowmult ri sepheight put  /ri ri 1 add def
+    rowheights ri sepheight put  /ri ri 1 add def
 
     % Data rows with separators
     0 1 r 2 sub {
         /i exch def
         pixs pos rowbits i get putinterval
         /pos pos symwid add def
-        rowmult ri rowheight put  /ri ri 1 add def
+        rowheights ri rowheight put  /ri ri 1 add def
         pixs pos seprow putinterval
         /pos pos symwid add def
-        rowmult ri sepheight put  /ri ri 1 add def
+        rowheights ri sepheight put  /ri ri 1 add def
     } for
 
     % Last data row
     pixs pos rowbits r 1 sub get putinterval
     /pos pos symwid add def
-    rowmult ri rowheight put  /ri ri 1 add def
+    rowheights ri rowheight put  /ri ri 1 add def
 
     % Bottom separator
     pixs pos allone putinterval
-    rowmult ri sepheight put
+    rowheights ri sepheight put
 
     <<
     /ren /renmatrix
     /pixs pixs
     /pixx symwid
     /pixy symhgt
-    /rowmult rowmult
+    /rowheights rowheights
     /height symhgt 72 div
     /width symwid 72 div
     /strictspec strictspec

src/code16k.ps.src

@@ -852,40 +852,40 @@ begin
     /allone [ 81 {1} repeat ] def
     /seprow [ 10 {0} repeat 70 {1} repeat 0 ] def
 
-    /rowmult numcomprows array def
+    /rowheights numcomprows array def
     /pos 0 def  /ri 0 def
 
     % Top separator
     pixs pos allone putinterval
     /pos pos 81 add def
-    rowmult ri sepheight put  /ri ri 1 add def
+    rowheights ri sepheight put  /ri ri 1 add def
 
     % Data rows with separators
     0 1 r 2 sub {
         /i exch def
         pixs pos rowbits i get putinterval
         /pos pos 81 add def
-        rowmult ri rowheight put  /ri ri 1 add def
+        rowheights ri rowheight put  /ri ri 1 add def
         pixs pos seprow putinterval
         /pos pos 81 add def
-        rowmult ri sepheight put  /ri ri 1 add def
+        rowheights ri sepheight put  /ri ri 1 add def
     } for
 
     % Last data row
     pixs pos rowbits r 1 sub get putinterval
     /pos pos 81 add def
-    rowmult ri rowheight put  /ri ri 1 add def
+    rowheights ri rowheight put  /ri ri 1 add def
 
     % Bottom separator
     pixs pos allone putinterval
-    rowmult ri sepheight put
+    rowheights ri sepheight put
 
     <<
     /ren /renmatrix
     /pixs pixs
     /pixx 81
     /pixy symhgt
-    /rowmult rowmult
+    /rowheights rowheights
     /height symhgt 72 div
     /width 81 72 div
     /strictspec strictspec

src/code49.ps.src

@@ -1202,7 +1202,7 @@ dup [ exch 16 exch 1 32 getinterval aload pop ] /code49.weighty exch readonly de
     ] def
     /symhgt sepheight r 1 add mul r rowheight mul add def
 
-    /rowmult [
+    /rowheights [
         sepheight
         0 1 r 2 sub { pop rowheight sepheight } for
         rowheight
@@ -1214,7 +1214,7 @@ dup [ exch 16 exch 1 32 getinterval aload pop ] /code49.weighty exch readonly de
     /pixs pixs
     /pixx 81
     /pixy symhgt
-    /rowmult rowmult
+    /rowheights rowheights
     /height symhgt 72 div
     /width 81 72 div
     /strictspec strictspec

src/databarexpanded.ps.src

@@ -972,22 +972,22 @@ begin
                 } if
             } for
         ] def
-        /rowmult [
+        /rowheights [
             0 1 numrows 1 sub {
                 /r exch def
                 r 0 ne { 1 } if
                 barxmult
                 r numrows 1 sub ne { 1 1 } if
             } for
         ] def
-        /pixy 0 rowmult {add} forall def
+        /pixy 0 rowheights {add} forall def
 
         <<
         /ren /renmatrix
         /pixs pixs
         /pixx pixx
         /pixy pixy
-        /rowmult rowmult
+        /rowheights rowheights
         /height pixy 72 div
         /width pixx 72 div
         /borderleft 0.0

src/databarexpandedcomposite.ps.src

@@ -173,7 +173,7 @@ begin
     options (propspec) undef
     comp options //gs1-cc exec /compsym exch def
     /ccpixs compsym /pixs get def
-    /ccrowmult compsym /rowmult get def
+    /ccrowheights compsym /rowheights get def
     /ccpixx compsym /pixx get def
 
     /linpixs [
@@ -184,7 +184,7 @@ begin
     ] def
 
     /linheight linheight cvi def
-    /ccrows ccrowmult length def
+    /ccrows ccrowheights length def
     /diff linpixs length ccpixx sub def  % Minimum linpixs length is 102, ccpixx is 99
     /ccrpad [ diff 2 sub {0} repeat ] def
     /pixs [
@@ -194,7 +194,7 @@ begin
         } for
         sep aload pop linpixs aload pop
     ] def
-    /rowmult [ ccrowmult aload pop 1 linheight ] def
+    /rowheights [ ccrowheights aload pop 1 linheight ] def
 
     /pixx linpixs length def
 
@@ -206,7 +206,7 @@ begin
     /text1xalign linsym /text1xalign 2 copy known { get } { pop pop (unset) } ifelse def
     /text1yalign linsym /text1yalign 2 copy known { get } { pop pop (unset) } ifelse def
 
-    /pixy 0 rowmult {add} forall def
+    /pixy 0 rowheights {add} forall def
 
     /borderleft
         linsym /borderleft 2 copy known { get } { pop pop 10 } ifelse pixx linpixs length sub 1 add sub
@@ -229,7 +229,7 @@ begin
     /pixs pixs
     /pixx pixx
     /pixy pixy
-    /rowmult rowmult
+    /rowheights rowheights
     /height pixy 72 div
     /width pixx 72 div
     /borderleft borderleft

src/databarexpandedstackedcomposite.ps.src

@@ -135,7 +135,7 @@ begin
     dup (pixy) get /linheight exch def
     /linsym exch def
     /linpixs linsym /pixs get def
-    /linrowmult linsym /rowmult get def
+    /linrowheights linsym /rowheights get def
 
     %
     % Plot the separator
@@ -172,21 +172,21 @@ begin
     options (propspec) undef
     comp options //gs1-cc exec /compsym exch def
     /ccpixs compsym /pixs get def
-    /ccrowmult compsym /rowmult get def
+    /ccrowheights compsym /rowheights get def
     /ccpixx compsym /pixx get def
 
     /pixx sep length def
     /cclpad [ pixx ccpixx sub 1 add 2 idiv {0} repeat ] def  % Add 1 to allow for odd difference
     /ccrpad [ pixx ccpixx sub 2 idiv {0} repeat ] def
-    /ccrows ccrowmult length def
+    /ccrows ccrowheights length def
     /pixs [
         0 ccpixx ccpixs length 1 sub {  % Centre align composite
             /i exch def
             cclpad aload pop ccpixs i ccpixx getinterval aload pop ccrpad aload pop
         } for
         sep aload pop linpixs aload pop
     ] def
-    /rowmult [ ccrowmult aload pop 1 linrowmult aload pop ] def
+    /rowheights [ ccrowheights aload pop 1 linrowheights aload pop ] def
 
     /txt [
         linsym /txt 2 copy known { get {
@@ -196,7 +196,7 @@ begin
     /text1xalign linsym /text1xalign 2 copy known { get } { pop pop (unset) } ifelse def
     /text1yalign linsym /text1yalign 2 copy known { get } { pop pop (unset) } ifelse def
 
-    /pixy 0 rowmult {add} forall def
+    /pixy 0 rowheights {add} forall def
 
     % Quiet zone borders: T=2D, L/R=max(1D,2D), B=1D
     /borderleft
@@ -220,7 +220,7 @@ begin
     /pixs pixs
     /pixx pixx
     /pixy pixy
-    /rowmult rowmult
+    /rowheights rowheights
     /height pixy 72 div
     /width pixx 72 div
     /borderleft borderleft

src/databarlimitedcomposite.ps.src

@@ -157,11 +157,11 @@ begin
     options (propspec) undef
     comp options //gs1-cc exec /compsym exch def
     /ccpixs compsym /pixs get def
-    /ccrowmult compsym /rowmult get def
+    /ccrowheights compsym /rowheights get def
     /ccpixx compsym /pixx get def
 
     /linheight linheight cvi def
-    /ccrows ccrowmult length def
+    /ccrows ccrowheights length def
     % ccpixx is 72 for CC-A and 82 for CC-B; linpixs length is 79
     ccpixx 72 eq {  % 3-col CC-A
         /pixs [
@@ -182,7 +182,7 @@ begin
         ] def
         /pixx ccpixx 6 add def  % 88
     } ifelse
-    /rowmult [ ccrowmult aload pop 1 linheight ] def
+    /rowheights [ ccrowheights aload pop 1 linheight ] def
 
     /txt [
         linsym /txt 2 copy known { get {
@@ -192,7 +192,7 @@ begin
     /text1xalign linsym /text1xalign 2 copy known { get } { pop pop (unset) } ifelse def
     /text1yalign linsym /text1yalign 2 copy known { get } { pop pop (unset) } ifelse def
 
-    /pixy 0 rowmult {add} forall def
+    /pixy 0 rowheights {add} forall def
 
     /borderleft
         linsym /borderleft 2 copy known { get } { pop pop 10 } ifelse pixx linpixs length sub 1 add sub
@@ -215,7 +215,7 @@ begin
     /pixs pixs
     /pixx pixx
     /pixy pixy
-    /rowmult rowmult
+    /rowheights rowheights
     /height pixy 72 div
     /width pixx 72 div
     /borderleft borderleft

src/databaromni.ps.src

@@ -452,7 +452,7 @@ begin
                 sep aload pop
                 bot aload pop
             ] def
-            /rowmult [5 1 7] def
+            /rowheights [5 1 7] def
             /pixy 13 def
         } if
 
@@ -504,7 +504,7 @@ begin
                 sep3 aload pop
                 bot aload pop
             ] def
-            /rowmult [barxmult 1 1 1 barxmult] def
+            /rowheights [barxmult 1 1 1 barxmult] def
             /pixy barxmult 2 mul 3 add def
         } if
 
@@ -513,7 +513,7 @@ begin
         /pixs pixs
         /pixx 50
         /pixy pixy
-        /rowmult rowmult
+        /rowheights rowheights
         /height pixy 72 div
         /width 50 72 div
         /borderleft 0.0

src/databaromnicomposite.ps.src

@@ -179,7 +179,7 @@ begin
     options (propspec) undef
     comp options //gs1-cc exec /compsym exch def
     /ccpixs compsym /pixs get def
-    /ccrowmult compsym /rowmult get def
+    /ccrowheights compsym /rowheights get def
     /ccpixx compsym /pixx get def
 
     /linpixs [
@@ -190,7 +190,7 @@ begin
     ] def
 
     /linheight linheight cvi def
-    /ccrows ccrowmult length def
+    /ccrows ccrowheights length def
     % ccpixx is 99 for both 4-col CC-A and 4-col CC-B; linpixs length is 96
     /pixs [
         0 ccpixx ccpixs length 1 sub {  % Right pad composite with 1 space
@@ -199,7 +199,7 @@ begin
         } for
         0 0 0 0 sep aload pop 0 0 0 0 linpixs aload pop  % Left pad with 4 spaces
     ] def
-    /rowmult [ ccrowmult aload pop 1 linheight ] def
+    /rowheights [ ccrowheights aload pop 1 linheight ] def
     /pixx ccpixx 1 add def  % 100
 
     /txt [
@@ -210,7 +210,7 @@ begin
     /text1xalign linsym /text1xalign 2 copy known { get } { pop pop (unset) } ifelse def
     /text1yalign linsym /text1yalign 2 copy known { get } { pop pop (unset) } ifelse def
 
-    /pixy 0 rowmult {add} forall def
+    /pixy 0 rowheights {add} forall def
 
     /borderleft
         linsym /borderleft 2 copy known { get } { pop pop 10 } ifelse pixx linpixs length sub 1 add sub
@@ -233,7 +233,7 @@ begin
     /pixs pixs
     /pixx pixx
     /pixy pixy
-    /rowmult rowmult
+    /rowheights rowheights
     /height pixy 72 div
     /width pixx 72 div
     /borderleft borderleft