--- parser3/src/main/compile.y	2001/05/17 19:33:32	1.134
+++ parser3/src/main/compile.y	2001/05/21 12:29:51	1.134.2.1
@@ -5,7 +5,7 @@
 
 	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
 
-	$Id: compile.y,v 1.134 2001/05/17 19:33:32 parser Exp $
+	$Id: compile.y,v 1.134.2.1 2001/05/21 12:29:51 parser Exp $
 */
 
 /**
@@ -158,7 +158,7 @@ control_method: '@' STRING '\n'
 			PC.request->use_file(
 			PC.request->absolute(*LA2S(strings_code, i)));
 	} else if(command==BASE_NAME) {
-		if(PC.cclass->base()) { // already changed from default?
+		if(PC.cclass->base()!=&PC.request->OP) { // already changed from default?
 			strcpy(PC.error, "class already have a base '");
 			strncat(PC.error, PC.cclass->base()->name().cstr(), 100);
 			strcat(PC.error, "'");