--- parser3/src/classes/Attic/classes.awk	2001/09/26 10:32:25	1.3
+++ parser3/src/classes/Attic/classes.awk	2003/08/18 08:27:39	1.8
@@ -3,10 +3,10 @@
 #	Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
 #	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
 #
-#	$Id: classes.awk,v 1.3 2001/09/26 10:32:25 parser Exp $
+#	$Id: classes.awk,v 1.8 2003/08/18 08:27:39 paf Exp $
 
-/\.C/ && !/(op|classes|ident)\.C/ {
-	$s=$0
-	$c=sprintf("M%s%s", toupper(substr($s,0,1)),substr($s,2,length($s)-3))
-	printf "extern Methoded *%s_create(Pool& pool);  *this+=%s_create(pool());\n", $c,$c
+/\.C$/ && !/(op|classes)/ {
+	s=$0
+	c=substr(s,1,length(s)-2)
+	printf "extern Methoded* %s_class;  extern Methoded* %s_base_class;  if(%s_class) *this+=%s_class; if(%s_base_class) *this+=%s_base_class;\n", c,c,c,c,c,c
 }