Artifact 394c633a6e7c83ef520cc3b969c280d6ca451fc3901cd22725bb61fadeb226ff:

• Executable file r38/util/tstpckge.bat — 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: 791) [annotate] [blame] [check-ins using] [more...]

rem test --- Run a REDUCE test file.

rem Author: Anthony C. Hearn.

set package=%1

if %lisp% == psl goto psl

if not %MACHINE% == cygwin32 goto l2
if not "%Cygroot%" == "" goto l1
set Cygroot=c:\cygwin
echo *** Using %Cygroot% as Cygroot value
:l1
set opath=%path%
set path=%Cygroot%\bin;%PATH%
:l2
start /wait /min %reduce%\lisp\csl\%MACHINE%\csl -i %reduce%\lisp\csl\reduce.img %reduce%\util\tstpckge.dat -- %reduce%\log\%1.rlg

goto ret

:psl

if not "%pslsize%" == "" goto cont

set pslsize=12000000

:cont

start /wait /min %reduce%\lisp\psl\%MACHINE%\psl\bpsl -td %pslsize% -f %reduce%\lisp\psl\%MACHINE%\red\reduce.img -i %reduce%\util\tstpckge.dat -o %reduce%\log\%1.rlg

:ret

set package=

if not "%opath%" == "" set path=%opath%
set opath=