X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fgenerate.pl;h=228095db9443c098f8929c9da6fcf97e002cbf1f;hb=3b54533821614d17afc61f1cd3b87d3a06fbf4da;hp=9d1e50245d64d6174c3c6c55bf2db9b515976f6d;hpb=312d3d2bd75e1589256d1115ff13363419ff4616;p=pspp
diff --git a/src/language/expressions/generate.pl b/src/language/expressions/generate.pl
index 9d1e50245d..228095db94 100644
--- a/src/language/expressions/generate.pl
+++ b/src/language/expressions/generate.pl
@@ -1,3 +1,19 @@
+# PSPP - a program for statistical analysis.
+# Copyright (C) 2017 Free Software Foundation, Inc.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see .
+#
use strict;
use warnings 'all';
@@ -567,7 +583,7 @@ sub parse_arg {
sub print_header {
print <{ABSORB_MISS}) {
for my $arg (@{$op->{ARGS}}) {
my ($arg_name) = "arg_$arg->{NAME}";