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

[alexcher at ghostscript.com]

Author: alexcher
Date: 2007-02-24 07:32:48 -0800 (Sat, 24 Feb 2007)
New Revision: 7740

Modified:
   trunk/gs/doc/pscet_status.txt
   trunk/gs/lib/gs_init.ps
Log:
Set /errorinfo to null in the error handler when it undefined.
Fix missing 'null' in CET 09-47c and 09-47j.

DIFFERENCES:
null is also added to the error messages in 29-7c-02 and 29-07c-04
but these pages expect no errors at all.
There's no other CET or comparefiles fifferences.


Modified: trunk/gs/doc/pscet_status.txt
===================================================================
--- trunk/gs/doc/pscet_status.txt	2007-02-23 23:03:23 UTC (rev 7739)
+++ trunk/gs/doc/pscet_status.txt	2007-02-24 15:32:48 UTC (rev 7740)
@@ -969,8 +969,10 @@
 
 09-47C-1  OK  	Fixed by rev 7221.
 
-09-47C-2  DIFF	GS shows '--.type1execchar-- rangecheck'. Adobe shows:
-		'F --show-- rangecheck null' assign: Peter
+09-47C-2  DIFF  Rev. 7740 adds 'null' to the message.
+                Adobe shows: 'F --show-- rangecheck null'
+		At 144 dpi GS shows 'F --.type1execchar-- rangecheck null'.
+                At 72 dpi GS shows the same message as Adobe. assign: Peter
 
 09-47D-1  OK	Fixed by rev 7169.
 
@@ -1078,7 +1080,7 @@
 		000000 e70000
 		e60000 d1d1d1
 		It looks so with GS.
-		Don't know ehy CPSI misses green.
+		Don't know why CPSI misses green.
 		-
 		Test02 : Same as 09-47G-2 Test11.
 
@@ -1116,8 +1118,8 @@
 		-		- 
 		Test12: ok	Fixed by rev 7175.
 
-09-47J-1  DIFF	Test01 CPSI misses imagemask in shading. Test04 printout
-		differs (GS missing 'null'). Assign: Alex
+09-47J-1  DIFF	Graphic differences in Test01 (partly drawn) and Test12
+		(green line across the shading). Assign: Alex
                 
 09-47J-10 OK	
 

Modified: trunk/gs/lib/gs_init.ps
===================================================================
--- trunk/gs/lib/gs_init.ps	2007-02-23 23:03:23 UTC (rev 7739)
+++ trunk/gs/lib/gs_init.ps	2007-02-24 15:32:48 UTC (rev 7740)
@@ -887,6 +887,7 @@
     $error /newerror true put
     $error exch /errorname exch put
     $error exch /command exch put
+    $error /errorinfo known not { $error /errorinfo //null put } if
     $error /recordstacks get $error /errorname get /VMerror ne and
      {		% Attempt to store the stack contents atomically.
        count array astore dup $error /ostack 4 -1 roll
@@ -1070,6 +1071,7 @@
   /.inerror false def
   /.nosetlocal true def
   /position //null def
+  /errorinfo //null def
 end
 % Define errordict similarly.  It has one entry per error name,
 %   plus handleerror.  However, some astonishingly badly written PostScript