Artifact 277754e84f2fac51486f8fcc48b33b79cd3ea733bc6c4a2900705b05852c4563:

• Executable file r34.1/util/mkslfile — 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: 510) [annotate] [blame] [check-ins using] [more...]

• Executable file r34/util/mkslfile — 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: 510) [annotate] [blame] [check-ins using]

#!/bin/csh -f

# mkslfile --- Build Standard LISP form of REDUCE or RLISP file.

# Usage: $reduce/util/mkslfile infile_name [reduce-root_dir]
# Output file is infile_name.sl
# Input taken from src/infile_name.red
# Reduce_root_dir is optional, and will be prepended to the infile src
#    directory if supplied.

$reduce/reduce << EOF
linelength 71;
!*force := t;                  % To expand all macros
flag('(de df dm),'noexpand);   % except these
off msg;
on defn;
out "$1.sl";
in "$2src/$1.red"\$
bye;
EOF