--- parser3/src/main/pa_table.C	2001/05/17 15:57:35	1.31
+++ parser3/src/main/pa_table.C	2001/09/18 16:05:43	1.37
@@ -4,9 +4,8 @@
 	Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
 
 	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
-
-	$Id: pa_table.C,v 1.31 2001/05/17 15:57:35 parser Exp $
 */
+static const char *RCSId="$Id: pa_table.C,v 1.37 2001/09/18 16:05:43 parser Exp $"; 
 
 #include <stdlib.h>
 
@@ -16,7 +15,7 @@
 
 Table::Table(Pool& apool, 
 			 const String *aorigin_string,
-			 Array *acolumns, 
+			 const Array *acolumns, 
 			 int initial_rows) :
 	Array(apool, initial_rows),
 
@@ -41,9 +40,10 @@ int Table::column_name2index(const Strin
 				"column not found");
 		return result;
 	} else { // nameless
-		char *error_pos=0;
-		int result=(int)strtol(column_name.cstr(), &error_pos, 0);
-		if(error_pos && *error_pos) {
+		char *error_pos;
+		const char *cstr=column_name.cstr();
+		int result=(int)strtol(cstr, &error_pos, 0);
+		if(*error_pos/*not EOS*/) {
 			result=-1;
 			if(bark)
 				THROW(0, 0,