From ec18c303a57eed1d5e9b1cca837ad57c2b7faff0 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Christian=20W=C3=BCrdig?= Date: Mon, 15 May 2006 12:38:41 +0000 Subject: [PATCH] fixed arity and node attribute init when reg_req missing --- ir/be/scripts/generate_new_opcodes.pl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/ir/be/scripts/generate_new_opcodes.pl b/ir/be/scripts/generate_new_opcodes.pl index c54f4fa29..cfc566987 100755 --- a/ir/be/scripts/generate_new_opcodes.pl +++ b/ir/be/scripts/generate_new_opcodes.pl @@ -66,7 +66,7 @@ foreach my $op (keys(%nodes)) { my $n_res = 0; # determine arity from in requirements - $arity = 0; + $arity = exists($n{"arity"}) ? $n{"arity"} : 0; if (exists($n{"reg_req"}) && exists($n{"reg_req"}{"in"})) { $arity = scalar(@{ $n{"reg_req"}{"in"} }); } @@ -251,6 +251,10 @@ foreach my $op (keys(%nodes)) { $out_param = "NULL, 0"; } } + else { + $in_param = "NULL"; + $out_param = "NULL, 0"; + } $temp .= "\n /* create node */\n"; my $mode = "mode"; if ($tuple == 1) { -- 2.20.1