mirror of
https://review.haiku-os.org/buildtools
synced 2025-01-19 12:51:22 +01:00
0aa3a3d9db
except one: the binaries produced by this version of binutils crashes the loader of BeOS versions BONE, Dano (and probably Zeta, too). That's a pity, but I currently do not know how to fix this (as the fix available for older versions of binutils does not work anymore). git-svn-id: file:///srv/svn/repos/haiku/buildtools/trunk@20192 a95241bf-73f2-0310-859d-f6bbb57e9c96
29 lines
648 B
Awk
29 lines
648 B
Awk
NR == 1 {
|
|
FS="\"";
|
|
print "/* ==> Do not modify this file!! It is created automatically"
|
|
printf " from %s using the gen-c-prog.awk script. <== */\n\n", FILE
|
|
print "#include <stdio.h>"
|
|
print "#include \"ansidecl.h\""
|
|
}
|
|
|
|
{
|
|
if (curfun != FUNCTION)
|
|
{
|
|
if (curfun)
|
|
print "}"
|
|
curfun = FUNCTION
|
|
print ""
|
|
print "void ", FUNCTION, "(FILE *);"
|
|
print "void";
|
|
printf "%s (file)\n", FUNCTION
|
|
print " FILE *file;";
|
|
print "{";
|
|
}
|
|
printf " fputs (\"";
|
|
for (i = 1; i < NF; i++)
|
|
printf "%s\\\"", $i;
|
|
printf "%s\\n\", file);\n", $NF;
|
|
}
|
|
|
|
END { print "}" }
|