X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fevaluate.inc.pl;h=e2fccab8d558d491055295574fe77520b66db995;hb=e55bfe0add20f87445b6f2fa6b6e3b0db2a8a0b4;hp=7b6b1a3e683bae87511bcc36cef811d95aeba5a3;hpb=97d4f38945476834fd7fce612b663f19f2b291f8;p=pspp-builds.git

diff --git a/src/language/expressions/evaluate.inc.pl b/src/language/expressions/evaluate.inc.pl
index 7b6b1a3e..e2fccab8 100644
--- a/src/language/expressions/evaluate.inc.pl
+++ b/src/language/expressions/evaluate.inc.pl
@@ -1,5 +1,11 @@
+use strict;
+use warnings 'all';
+
 do 'generate.pl';
 
+our (@order);
+our (%ops);
+
 sub generate_output {
     for my $opname (@order) {
 	my ($op) = $ops{$opname};