From: Chris Hanson Date: Tue, 1 Mar 2016 09:53:59 +0000 (-0800) Subject: Remove obsolete runtime-check directory. X-Git-Tag: mit-scheme-pucked-9.2.12~261^2~81 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=71bf72ac196f1ab866d3c926aa308ac111462e4d;p=mit-scheme.git Remove obsolete runtime-check directory. Standard runtime enabled type and range checks long ago. --- diff --git a/src/README.txt b/src/README.txt index 1ec888fbd..5b638de46 100644 --- a/src/README.txt +++ b/src/README.txt @@ -34,12 +34,6 @@ The core subsystem consists of these directories: * "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 diff --git a/src/runtime-check/Clean.sh b/src/runtime-check/Clean.sh deleted file mode 100755 index 7dbc03957..000000000 --- a/src/runtime-check/Clean.sh +++ /dev/null @@ -1,40 +0,0 @@ -#!/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 " - 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 diff --git a/src/runtime-check/Setup.sh b/src/runtime-check/Setup.sh deleted file mode 100755 index 52f9db857..000000000 --- a/src/runtime-check/Setup.sh +++ /dev/null @@ -1,39 +0,0 @@ -#!/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 diff --git a/src/runtime-check/runtime.cbf b/src/runtime-check/runtime.cbf deleted file mode 100644 index 53d9553ee..000000000 --- a/src/runtime-check/runtime.cbf +++ /dev/null @@ -1,29 +0,0 @@ -#| -*-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