Platon Technologies
not logged in Login Registration
EnglishSlovak
open source software development celebrating 10 years of open source development! Friday, April 19, 2024

File: [Platon] / yaadfat / doxy-filter (download)

Revision 1.2, Sun Mar 9 10:34:38 2003 UTC (21 years, 1 month ago) by yenar


Changes since 1.1: +1 -0 lines

remove #if 0 ... #endif /* 0 */ blocks from doxygen-formatted code (doxy-filter)

#!/usr/bin/perl
# copyright 2002 yenar@host.sk
# covered by GNU LGPL

$f = shift;
open (IN, $f);
for (<IN>) {
    $in .= $_;
}
close IN;
$_ = $in;
s!/\* {{{ \*/[ \t]*(.*?)[ \t]*/\* }}} \*/!$1!gsm;
s!\#if 0.*?\#endif /* 0 */!!gsm;
#s!/\* {{{ \*/!!gsm;
#s!/\* }}} \*/!!gsm;
#s![ \t]*/\* {{1}{{ \*/[ \t]*!!g;
#s![ \t]*/\* }}{1}} \*/[ \t]*!!g;
print "$_";

Platon Group <platon@platon.org> http://platon.org/
Copyright © 2002-2006 Platon Group
Site powered by Metafox CMS
Go to Top