+use strict;
+use warnings 'all';
+
do 'generate.pl';
+our (@order);
+our (%ops);
+
sub generate_output {
for my $opname (@order) {
my ($op) = $ops{$opname};
if ($op->{UNIMPLEMENTED}) {
print "case $opname:\n";
- print " abort ();\n\n";
+ print " NOT_REACHED ();\n\n";
next;
}