Artifact 914f8f99f767b144e4067cb99a68a6e771bd3ff9876eac6441aa86b503383264:

• Executable file r38/lisp/csl/util/testall-personal.red — part of check-in [f2fda60abd] at 2011-09-02 18:13:33 on branch master — Some historical releases purely for archival purposes

  git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/trunk/historical@1375 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 653) [annotate] [blame] [check-ins using] [more...]

%
% Used with the personal release of Reduce
%
% This script is normally run as
%     r38 util/testall.red -Dwhich_module=XXX
% where XXX is the name of a module that is to be tested. If XXX is left
% empty then the script will test all known modules.
%

symbolic;

load!-module 'remake;

get_configuration_data nil;

if boundp 'which_module and which_module and not (which_module = "") then <<
   mods := compress explodec which_module;
   if member(mods, r38_test_cases) then personal_test_a_package list mods
   else error(0, list("unknown module to test", which_module)) >>
else personal_test_a_package r38_test_cases;

end;