From 3d3e494e4c586428ffe396ef58b6c5a4789edc3c Mon Sep 17 00:00:00 2001
From: Per Bothner <per@bothner.com>
Date: Tue, 6 Oct 1992 00:57:18 +0000
Subject: 	* gen-c-prog.awk:  New awk script, lightly changed from 
 previously deleted make-c-prog.awk.  Converts a text file 	to a c
 function that prints that text. 	* flat_bl.m, fsf_callg_bl.m,
 bsd_callg_bl.m:  New files. 	Inputs to gen-c-prog.awk, containing text
 describing 	gprof output. 	* blurbs.c:  Removed.  Use *_bl.c instead. 
 * Makefile.in: Use gen-cprog.awk to generate *_bl.c files 	from *_bl.m
 files.  Also, improve *clean rules. 	* printgprof.c (printgprof):  Usw new
 function names from *_bl.c.

---
 gprof/gen-c-prog.awk | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 gprof/gen-c-prog.awk

(limited to 'gprof/gen-c-prog.awk')

diff --git a/gprof/gen-c-prog.awk b/gprof/gen-c-prog.awk
new file mode 100644
index 0000000..cccf428
--- /dev/null
+++ b/gprof/gen-c-prog.awk
@@ -0,0 +1,26 @@
+NR == 1	{
+    FS="\"";
+    print "/* ==> Do not modify this file!!  It is created automatically"
+    printf "   from %s using the make-c-prog.awk script.  <== */\n\n", FILE
+    print "#include <stdio.h>"
+}
+
+	{
+	  if (curfun != FUNCTION)
+	    {
+	      if (curfun)
+		print "}"
+	      curfun = FUNCTION
+	      print ""
+	      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 "}" }
-- 
cgit v1.1