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}";