--- parser3/src/classes/Attic/classes.awk 2001/10/27 10:14:28 1.4 +++ parser3/src/classes/Attic/classes.awk 2003/02/17 07:18:56 1.6.6.2 @@ -3,10 +3,10 @@ # Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) # Author: Alexander Petrosyan (http://design.ru/paf) # -# $Id: classes.awk,v 1.4 2001/10/27 10:14:28 paf Exp $ +# $Id: classes.awk,v 1.6.6.2 2003/02/17 07:18:56 paf Exp $ -/\.C/ && !/(op|classes|ident)\.C/ { +/\.C$/ && !/(op|classes|ident)/ { 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=substr(s,1,length(s)-2) + printf "extern MethodedPtr %s_class; if(%s_class) *this+=%s_class;\n", c,c,c }