From bd9733926076885e3417b74de76e4c9c7bc56254 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:28 -0800 Subject: Import Upstream version 2c7 --- t3.init | 31 +++++++++++-------------------- 1 file changed, 11 insertions(+), 20 deletions(-) (limited to 't3.init') diff --git a/t3.init b/t3.init index d719c81..4c0fb97 100644 --- a/t3.init +++ b/t3.init @@ -1,23 +1,7 @@ -;"t3.init" Initialization file for SLIB for T3.1. -*-scheme-*- -;Copyright (C) 1991, 1992 David Carlton & Stephen Bevan -;Copyright 1993 F. Javier Thayer. -;Copyright (C) 1991, 1992, 1993, 1994, 1997 Aubrey Jaffer. -; -;Permission to copy this software, to redistribute it, and to use it -;for any purpose is granted, subject to the following restrictions and -;understandings. -; -;1. Any copy made of this software must include this copyright notice -;in full. -; -;2. I have made no warrantee or representation that the operation of -;this software will be error-free, and I am under no obligation to -;provide any services, by way of maintenance, update, or otherwise. -; -;3. In conjunction with products arising from the use of this -;material, there shall be no use of my name in any advertising, -;promotional, or sales literature without prior written consent in -;each case. +;;; "t3.init" Initialization file for SLIB for T3.1. -*-scheme-*- +;;; Authors: David Carlton, Stephen Bevan, F. Javier Thayer, and Aubrey Jaffer. +;;; +;;; This code is in the public domain. ;;; File has T syntax, and should be compiled in standard-env. ;;; Compiled file has .so suffix. @@ -32,6 +16,13 @@ (define (scheme-implementation-version) "3.1") +;;; (scheme-implementation-home-page) should return a (string) URL +;;; (Uniform Resource Locator) for this scheme implementation's home +;;; page; or false if there isn't one. + +(define (scheme-implementation-home-page) + "ftp://ftp.cs.indiana.edu:21/pub/scheme-repository/imp/t/README") + ;;; (implementation-vicinity) should be defined to be the pathname of ;;; the directory where any auxillary files to your Scheme ;;; implementation reside. It is settable. -- cgit v1.2.3