Annotation of parser3/src/classes/classes.awk, revision 1.2

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

E-mail: