X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Ftests%2Fcheck-model.q;h=2ef5e7bfd293a3eabbe219c0e186600bdbb021ea;hb=95b074ff3;hp=fbacce2d8e63fdeaabc742676b32d4d5fb8e1ba0;hpb=f5c108becd49d78f4898cab11352291f5689d24e;p=pspp-builds.git diff --git a/src/language/tests/check-model.q b/src/language/tests/check-model.q index fbacce2d..2ef5e7bf 100644 --- a/src/language/tests/check-model.q +++ b/src/language/tests/check-model.q @@ -1,28 +1,27 @@ -/* PSPP - computes sample statistics. +/* PSPP - a program for statistical analysis. Copyright (C) 2007 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 2 of the - License, or (at your option) any later version. + 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. + 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, write to the Free Software - Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA - 02110-1301, USA. */ + along with this program. If not, see . */ #include +#include #include #include -#include +#include "model-checker.h" #include #include "error.h" @@ -157,9 +156,9 @@ parse_options (struct lexer *lexer) msg (SW, _("At least one value must be specified on PATH.")); } } - if (cmd.max_depth != NOT_LONG) + if (cmd.max_depth != LONG_MIN) mc_options_set_max_depth (options, cmd.max_depth); - if (cmd.hash_bits != NOT_LONG) + if (cmd.hash_bits != LONG_MIN) { int hash_bits; mc_options_set_hash_bits (options, cmd.hash_bits); @@ -167,7 +166,7 @@ parse_options (struct lexer *lexer) if (hash_bits != cmd.hash_bits) msg (SW, _("Hash bits adjusted to %d."), hash_bits); } - if (cmd.queue_limit != NOT_LONG) + if (cmd.queue_limit != LONG_MIN) mc_options_set_queue_limit (options, cmd.queue_limit); if (cmd.drop != -1) { @@ -180,15 +179,15 @@ parse_options (struct lexer *lexer) } if (cmd.sbc_search > 0) mc_options_set_seed (options, cmd.n_seed[0]); - if (cmd.max_unique_states != NOT_LONG) + if (cmd.max_unique_states != LONG_MIN) mc_options_set_max_unique_states (options, cmd.max_unique_states); - if (cmd.max_errors != NOT_LONG) + if (cmd.max_errors != LONG_MIN) mc_options_set_max_errors (options, cmd.max_errors); if (cmd.time_limit != SYSMIS) mc_options_set_time_limit (options, cmd.time_limit); - if (cmd.verbosity != NOT_LONG) + if (cmd.verbosity != LONG_MIN) mc_options_set_verbosity (options, cmd.verbosity); - if (cmd.err_verbosity != NOT_LONG) + if (cmd.err_verbosity != LONG_MIN) mc_options_set_failure_verbosity (options, cmd.err_verbosity); if (cmd.progress != -1) { @@ -215,6 +214,9 @@ parse_options (struct lexer *lexer) mc_options_set_output_file (options, output_file); } + + free_check_model (&cmd); + return options; }