[gs-cvs] rev 7473 - in trunk/gs: doc lib

[alexcher at ghostscript.com]

Author: alexcher
Date: 2006-12-08 14:23:13 -0800 (Fri, 08 Dec 2006)
New Revision: 7473

Modified:
   trunk/gs/doc/pscet_status.txt
   trunk/gs/lib/gs_dps2.ps
Log:
Report /rangecheck instead of /limitcheck from defineuserobject when the index
exceeds 65535 to match CET 31-02.

DIFFERENCES:
None


Modified: trunk/gs/doc/pscet_status.txt
===================================================================
--- trunk/gs/doc/pscet_status.txt	2006-12-08 21:47:01 UTC (rev 7472)
+++ trunk/gs/doc/pscet_status.txt	2006-12-08 22:23:13 UTC (rev 7473)
@@ -5111,7 +5111,7 @@
 
 31-01-9  DIFF	same as 31-01-8 but in the global VM. assign Alex.
 
-31-02-1  DIFF	limitcheck vs. typecheck assign Ray
+31-02-1  OK  	Fixed in rev. 7473 - Alex
 
 31-02-2  OK	
 

Modified: trunk/gs/lib/gs_dps2.ps
===================================================================
--- trunk/gs/lib/gs_dps2.ps	2006-12-08 21:47:01 UTC (rev 7472)
+++ trunk/gs/lib/gs_dps2.ps	2006-12-08 22:23:13 UTC (rev 7473)
@@ -195,6 +195,10 @@
 % The code below faithfully duplicates the apparent array-growing
 % behavior of Adobe interpreters.
 /defineuserobject {		% <index> <value> defineuserobject -
+  1 index 65535 gt {
+    % .localvmarray throws limitcheck but CET 31-02 wants rangecheck
+    /defineuserobject .systemvar /rangecheck signalerror 
+  } if
   .UserObjects .knownget {
     length dup 3 .argindex le {
 		% Stack: index value len