path: root/doc2h.pl

#/usr/bin/env perl

print '#define DOCSTRING "';
while(<>){
    s|\"|\\"|g;
    s|\n|\\n\\\n|g;
    print;
}
print '"'."\n";