--- parser3/src/classes/classes.C	2001/05/21 16:01:10	1.6
+++ parser3/src/classes/classes.C	2002/08/01 11:41:11	1.17
@@ -1,13 +1,12 @@
 /** @file
 	Parser: @b Methoded and Methoded_array classes.
 
-	Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
-
-	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
-
-	$Id: classes.C,v 1.6 2001/05/21 16:01:10 parser Exp $
+	Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
+	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
+static const char* IDENT_CLASSES_C="$Date: 2002/08/01 11:41:11 $";
+
 #include "classes.h"
 #include "pa_request.h"
 
@@ -32,8 +31,8 @@ Methoded_array::Methoded_array(Pool& apo
 
 static void configure_admin_one(Array::Item *value, void *info) {
 	Request& r=*static_cast<Request *>(info);
-	Methoded *methoded=static_cast<Methoded *>(value);
-	methoded->configure_admin(r);
+	if(Methoded *methoded=static_cast<Methoded *>(value))
+		methoded->configure_admin(r);
 }
 
 void Methoded_array::configure_admin(Request& r) {
@@ -42,8 +41,8 @@ void Methoded_array::configure_admin(Req
 
 static void configure_user_one(Array::Item *value, void *info) {
 	Request& r=*static_cast<Request *>(info);
-	Methoded *methoded=static_cast<Methoded *>(value);
-	methoded->configure_user(r);
+	if(Methoded *methoded=static_cast<Methoded *>(value))
+		methoded->configure_user(r);
 }
 
 void Methoded_array::configure_user(Request& r) {
@@ -52,10 +51,8 @@ void Methoded_array::configure_user(Requ
 
 static void register_one(Array::Item *value, void *info) {
 	Request& r=*static_cast<Request *>(info);
-	Methoded *methoded=static_cast<Methoded *>(value);
-	// register "operators" as a superclass of all system classes
-	methoded->set_base(r.OP);
-	methoded->register_directly_used(r);
+	if(Methoded *methoded=static_cast<Methoded *>(value))
+		methoded->register_directly_used(r);
 }
 
 void Methoded_array::register_directly_used(Request& r) {