Annotation of parser3/src/classes/classes.awk, revision 1.5
1.1 paf 1: # Parser: classes.inc generator
2: #
3: # Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
4: # Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
5: #
1.5 ! paf 6: # $Id: classes.awk,v 1.4 2001/10/27 10:14:28 paf Exp $
1.1 paf 7:
1.3 parser 8: /\.C/ && !/(op|classes|ident)\.C/ {
1.4 paf 9: s=$0
1.5 ! paf 10: c=sprintf("M%s%s", toupper(substr(s,1,1)),substr(s,2,length(s)-3))
1.4 paf 11: printf "extern Methoded *%s_create(Pool& pool); *this+=%s_create(pool());\n", c,c
1.1 paf 12: }
E-mail: