X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Foptimize.inc.pl;h=c44177456cb353e3dd59de8ff3aa81f6781d8612;hb=a9acce47d67e0ab35ce1690e4f1b1ac0121c2d78;hp=798c5001fdc5530661ed7cc2fa8cc4ff3ed7b1c4;hpb=dcf9b154cbcaa35c3d8459a201b77eec8bcb30bd;p=pspp

diff --git a/src/language/expressions/optimize.inc.pl b/src/language/expressions/optimize.inc.pl
index 798c5001fd..c44177456c 100644
--- a/src/language/expressions/optimize.inc.pl
+++ b/src/language/expressions/optimize.inc.pl
@@ -1,4 +1,8 @@
+use strict;
+use warnings 'all';
+
 do 'generate.pl';
+our (@order, %ops);
 
 sub generate_output {
     for my $opname (@order) {
@@ -6,7 +10,7 @@ sub generate_output {
 
 	if (!$op->{OPTIMIZABLE} || $op->{UNIMPLEMENTED}) {
 	    print "case $opname:\n";
-	    print "  abort ();\n\n";
+	    print "  NOT_REACHED ();\n\n";
 	    next;
 	}