From: Matthias Braun <matze@braunis.de>
Date: Mon, 10 Sep 2007 20:26:06 +0000 (+0000)
Subject: allow user defined functions for outputting node init code
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=59c4584c19df7a6c39ae2515305da5c3d0d646ce;p=libfirm

allow user defined functions for outputting node init code

[r15736]
---

diff --git a/ir/be/scripts/generate_new_opcodes.pl b/ir/be/scripts/generate_new_opcodes.pl
index a9b6a75c8..663c82f18 100755
--- a/ir/be/scripts/generate_new_opcodes.pl
+++ b/ir/be/scripts/generate_new_opcodes.pl
@@ -43,6 +43,7 @@ our $default_attr_type;
 our $default_cmp_attr;
 our $default_copy_attr;
 our %init_attr;
+our $custom_init_attr_func;
 our %compare_attr;
 our %copy_attr;
 our %reg_classes;
@@ -506,6 +507,9 @@ foreach my $op (keys(%nodes)) {
 				die "Fatal error: Couldn't find attribute initialisation code for type '${attr_type}'";
 			}
 			$temp .= "${attr_init_code}\n";
+			if(defined($custom_init_attr_func)) {
+				$temp .= &$custom_init_attr_func(\%n);
+			}
 			$temp .= "\n";
 
 			# set flags for outs