From a92f30c54059f7a9fe81252cd5309b5a737c00db Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Tue, 9 Nov 1999 00:58:47 +0100
Subject: [PATCH] Cosmetic fix.
Rev: bin/mktreeopt.pike:1.10
---
bin/mktreeopt.pike | 14 ++++++++++++--
1 file changed, 12 insertions(+), 2 deletions(-)
diff --git a/bin/mktreeopt.pike b/bin/mktreeopt.pike
index f6264ee37a..e97b2cb8a2 100644
--- a/bin/mktreeopt.pike
+++ b/bin/mktreeopt.pike
@@ -1,5 +1,5 @@
/*
- * $Id: mktreeopt.pike,v 1.9 1999/11/08 23:51:51 grubba Exp $
+ * $Id: mktreeopt.pike,v 1.10 1999/11/08 23:58:47 grubba Exp $
*
* Generates tree-transformation code from a specification.
*
@@ -85,6 +85,16 @@
* // Code for ANY-ANY
*/
+constant header =
+"/* Tree transformation code.\n"
+" *\n"
+" * This file was generated from %O by\n"
+" * $Id: mktreeopt.pike,v 1.10 1999/11/08 23:58:47 grubba Exp $\n"
+" *\n"
+" * Do NOT edit!\n"
+" */\n"
+"\n";
+
mapping(string: mixed) rules = ([]);
void fail(string msg, mixed ... args)
@@ -903,7 +913,7 @@ int main(int argc, array(string) argv)
}
}
- string result = generate_code();
+ string result = sprintf(header, fname) + generate_code();
object dest = Stdio.File();
--
GitLab