Standard runtime enabled type and range checks long ago.
* "runtime" contains the bulk of the run-time library, including
almost everything documented in the reference manual.
-* "runtime-check" is a build directory used to make alternate run-time
- library binaries that are safer than the standard binaries. The
- standard binaries are compiled with type-checking disabled for many
- common operations; the alternate binaries have type-checking
- enabled.
-
* "sos" contains the SOS object-oriented programming extension.
* "star-parser" contains the pattern-matching parser language
+++ /dev/null
-#!/bin/sh
-#
-# Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
-# 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-# 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
-# 2015, 2016 Massachusetts Institute of Technology
-#
-# This file is part of MIT/GNU Scheme.
-#
-# MIT/GNU Scheme 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.
-#
-# MIT/GNU Scheme 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 MIT/GNU Scheme; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
-# 02110-1301, USA.
-
-# Utility for cleaning up the MIT/GNU Scheme runtime-check directory.
-# The working directory must be the runtime-check directory.
-
-if [ $# -ne 1 ]; then
- echo "usage: $0 <command>"
- exit 1
-fi
-
-../etc/Clean.sh "${1}" rm-com
-
-if [ "${1}" = "maintainer-clean" ]; then
- echo "rm -f *.bin *.pkd"
- rm -f *.bin *.pkd
-fi
-
-exit 0
+++ /dev/null
-#!/bin/sh
-#
-# Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
-# 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-# 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
-# 2015, 2016 Massachusetts Institute of Technology
-#
-# This file is part of MIT/GNU Scheme.
-#
-# MIT/GNU Scheme 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.
-#
-# MIT/GNU Scheme 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 MIT/GNU Scheme; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
-# 02110-1301, USA.
-
-# Utility to set up an MIT/GNU Scheme build directory.
-# The working directory must be the build directory.
-
-. ../etc/functions.sh
-
-../etc/Setup.sh "$@"
-
-for FNS in `cd ../runtime; ls *.scm`; do
- FN="`basename ${FNS} .scm`.bin"
- maybe_link ${FN} ../runtime/${FN}
-done
-
-maybe_link runtime-unx.pkd ../runtime/runtime-unx.pkd
-
-exit 0
+++ /dev/null
-#| -*-Scheme-*-
-
-Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
- 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
- 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016
- Massachusetts Institute of Technology
-
-This file is part of MIT/GNU Scheme.
-
-MIT/GNU Scheme 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.
-
-MIT/GNU Scheme 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 MIT/GNU Scheme; if not, write to the Free Software
-Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,
-USA.
-
-|#
-
-(fluid-let ((compiler:generate-type-checks? #t)
- (compiler:generate-range-checks? #t))
- (load "../runtime/runtime.cbf"))
\ No newline at end of file