[Commit] rrserver dispatch.5c,1.21,1.22

[Keith Packard]

Committed by: keithp

Update of /local/src/CVS/rrserver
In directory home.keithp.com:/tmp/cvs-serv21580

Modified Files:
	dispatch.5c 
Log Message:
Catch array bounds errors and report as syntax errors

Index: dispatch.5c
===================================================================
RCS file: /local/src/CVS/rrserver/dispatch.5c,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -d -r1.21 -r1.22
--- dispatch.5c	5 Jun 2003 23:49:56 -0000	1.21
+++ dispatch.5c	7 Jun 2003 17:08:31 -0000	1.22
@@ -579,7 +579,12 @@
 		    for (i = 0; i < dim(commands); i++)
 			if (command == commands[i].command)
 			{
-			    commands[i].f (args);
+			    try {
+				commands[i].f (args);
+			    } catch invalid_array_bounds (string s,
+							  poly a, poly i) {
+				raise rr_error (Error.SYNTAX);
+			    }
 			    break;
 			}
 		    if (i == dim(commands))