--- scheme48-1.8.orig/c/scheme48.def +++ scheme48-1.8/c/scheme48.def @@ -0,0 +1,94 @@ +EXPORTS +s48_stob_has_type +s48_stob_length +s48_stob_byte_length +s48_stob_ref +s48_stob_set +s48_stob_byte_ref +s48_stob_byte_set +s48_register_gc_rootB +s48_unregister_gc_rootB +s48_push_gc_rootsB +s48_pop_gc_rootsB +s48_make_string +s48_string_set +s48_string_ref +s48_string_length +s48_enter_string_latin_1 +s48_enter_string_latin_1_n +s48_copy_latin_1_to_string +s48_copy_latin_1_to_string_n +s48_copy_string_to_latin_1 +s48_copy_string_to_latin_1_n +s48_enter_string_utf_8 +s48_enter_string_utf_8_n +s48_string_utf_8_length +s48_string_utf_8_length_n +s48_copy_string_to_utf_8 +s48_copy_string_to_utf_8_n +s48_enter_char +s48_extract_char +s48_enter_fixnum +s48_extract_fixnum +s48_enter_integer +s48_extract_integer +s48_enter_unsigned_integer +s48_extract_unsigned_integer +s48_enter_double +s48_extract_double +s48_cons +s48_enter_byte_vector +s48_extract_byte_vector +s48_make_vector +s48_make_byte_vector +s48_enter_byte_string +s48_enter_byte_substring +s48_make_record +s48_make_weak_pointer +s48_check_record_type +s48_length +s48_enter_pointer +s48_extract_pointer +s48_get_imported_binding +s48_define_exported_binding +s48_set_channel_os_index +s48_add_channel +s48_close_channel +s48_external_event_uid +s48_permanent_external_event_uid +s48_note_external_event +s48_unregister_external_event_uid +s48_check_enum_set_type +s48_enum_set2integer +s48_integer2enum_set +s48_call_scheme +s48_value_pointer +s48_raise_scheme_exception +s48_raise_argument_type_error +s48_raise_argument_number_error +s48_raise_range_error +s48_raise_closed_channel_error +s48_raise_os_error +s48_raise_string_os_error +s48_raise_out_of_memory_error +ps_open_fd +ps_close_fd +ps_check_fd +ps_read_fd +ps_write_fd +ps_abort_fd_op +ps_io_buffer_size +ps_io_crlf_p +ps_console_encoding +s48_add_pending_fd +s48_remove_fd +s48_schedule_alarm_interrupt +s48_start_alarm_interrupts +s48_stop_alarm_interrupts +s48_add_os_signal +s48_when_keyboard_interrupt +s48_when_alarm_interrupt +s48_when_external_event_interrupt +s48_Spending_interruptPS +s48_Spending_eventsPS +s48_Sstack_limitS --- scheme48-1.8.orig/debian/scheme48-doc.install +++ scheme48-1.8/debian/scheme48-doc.install @@ -0,0 +1 @@ +doc/html doc/manual.pdf usr/share/doc/scheme48/ --- scheme48-1.8.orig/debian/control +++ scheme48-1.8/debian/control @@ -0,0 +1,45 @@ +Source: scheme48 +Section: interpreters +Priority: optional +Maintainer: Ubuntu MOTU Developers +XSBC-Original-Maintainer: Trent W. Buck +Build-Depends: debhelper (>= 5), quilt, cdbs +Standards-Version: 3.7.3 + +Package: scheme48 +Architecture: any +Provides: scheme-r5rs, scheme-srfi-7 +Depends: ${shlibs:Depends} +Suggests: scheme48-doc, cmuscheme48-el +Description: A simple, modular, and lightweight Scheme implementation + Scheme48 is an implementation of Scheme written by Richard Kelsey + and Jonathan Rees. It is based on a byte-code interpreter and + incorporates such elements as a sophisticated module system, a + pre-emptive & user-level thread system, a well-integrated + interactive environment, Clinger's explicit renaming low-level + macros, and decent efficiency for its architecture. + +Package: scheme48-doc +Architecture: all +Section: doc +Recommends: scheme48 +Description: Documentation for the Scheme48 implementation of Scheme + Scheme48 is an implementation of Scheme written by Richard Kelsey + and Jonathan Rees. It is based on a byte-code interpreter and + incorporates such elements as a sophisticated module system, a + pre-emptive & user-level thread system, a well-integrated + interactive environment, Clinger's explicit renaming low-level + macros, and decent efficiency for its architecture. + . + This package provides "The Incomplete Scheme48 Reference Manual" in + html and pdf form. + +Package: cmuscheme48-el +Architecture: all +Depends: emacsen-common, emacs22 | emacsen, scheme48 +Description: Emacs mode specialized for Scheme48 + Scheme48 associates loaded code with specific files. This extension + to the normal scheme-mode of Emacs uses this facility to associated + data sent to a inferior Scheme process with the correct file. Scheme + 48 will automatically evaluate the code in the correct package for + the file. --- scheme48-1.8.orig/debian/scheme48.docs +++ scheme48-1.8/debian/scheme48.docs @@ -0,0 +1 @@ +doc/news.txt --- scheme48-1.8.orig/debian/scheme48.menu +++ scheme48-1.8/debian/scheme48.menu @@ -0,0 +1,2 @@ +?package(scheme48):needs="vc" section="Applications/Programming"\ + title="scheme48" command="/usr/bin/scheme48" --- scheme48-1.8.orig/debian/scheme48-doc.doc-base +++ scheme48-1.8/debian/scheme48-doc.doc-base @@ -0,0 +1,13 @@ +Document: scheme48 +Title: Scheme48 Reference Manual +Author: Richard Kelsey, Jonathan Rees, Mike Sperber +Abstract: This is the reference manual for the scheme48 Scheme + implementation. +Section: Applications/Programming + +Format: pdf +Files: /usr/share/doc/scheme48/manual.pdf.gz + +Format: HTML +Index: /usr/share/doc/scheme48/html/manual.html +Files: /usr/share/doc/scheme48/html/*.html --- scheme48-1.8.orig/debian/rules +++ scheme48-1.8/debian/rules @@ -0,0 +1,4 @@ +#!/usr/bin/make -f +include /usr/share/cdbs/1/rules/debhelper.mk +include /usr/share/cdbs/1/class/autotools.mk +include /usr/share/cdbs/1/rules/patchsys-quilt.mk --- scheme48-1.8.orig/debian/watch +++ scheme48-1.8/debian/watch @@ -0,0 +1,20 @@ +# See uscan(1) manual for info. +# This file is currently broken. When it works, move it to ./watch. +version=3 + +# Because http://s48.org/ has a link to 1.7/download.html instead of +# to 1.7/ -- this means that the naïve +# +# http://s48.org/(?:[[:digit:].]+)/scheme48-(?:[[:digit:].]+).tgz +# +# doesn't work, because uscan fetches http://s48.org/ and tries to +# find a link matching (?:[[:digit:].]+)/?$, which 1.7/download.html +# does not. +# +# Eric Coopr provided the following (working) replacement: +#opts=downloadurlmangle=s{s48.org/(.*)/download.html}{s48.org/$1/scheme48-$1.tgz} \ +# http://s48.org/index.html (.*)/download.html +# +# Daniel Leidert provided the following (working) replacement: +opts=downloadurlmangle=s{([^/]+)/download.html$}{$1/scheme48-$1.tgz},filenamemangle=s{([^/]+)/download.html}{scheme48-$1.tgz} \ + http://s48.org/index.html ([\d\.]+)/download.html --- scheme48-1.8.orig/debian/cmuscheme48-el.emacsen-install +++ scheme48-1.8/debian/cmuscheme48-el.emacsen-install @@ -0,0 +1,38 @@ +#! /bin/sh -e +# /usr/lib/emacsen-common/packages/install/prolog-el + +# Written by Jim Van Zandt , borrowing heavily +# from the install scripts for gettext by Santiago Vila +# and octave by Dirk Eddelbuettel . + +FLAVOR=$1 +PACKAGE=cmuscheme48-el + +if [ ${FLAVOR} = emacs ]; then exit 0; fi + +echo install/${PACKAGE}: Handling install for emacsen flavor ${FLAVOR} + +#FLAVORTEST=`echo $FLAVOR | cut -c-6` +#if [ ${FLAVORTEST} = xemacs ] ; then +# SITEFLAG="-no-site-file" +#else +# SITEFLAG="--no-site-file" +#fi +FLAGS="${SITEFLAG} -q -batch -l path.el -f batch-byte-compile" + +ELDIR=/usr/share/emacs/site-lisp/${PACKAGE} +ELCDIR=/usr/share/${FLAVOR}/site-lisp/${PACKAGE} + +install -m 755 -d ${ELCDIR} +cd ${ELDIR} +FILES=`echo *.el` +cp ${FILES} ${ELCDIR} +cd ${ELCDIR} + +cat << EOF > path.el +(setq load-path (cons "." load-path) byte-compile-warnings nil) +EOF +${FLAVOR} ${FLAGS} ${FILES} +rm -f *.el path.el + +exit 0 --- scheme48-1.8.orig/debian/scheme48-doc.links +++ scheme48-1.8/debian/scheme48-doc.links @@ -0,0 +1,2 @@ +../../scheme48/html usr/share/doc/scheme48-doc/html +../../scheme48/manual.pdf usr/share/doc/scheme48-doc/manual.pdf --- scheme48-1.8.orig/debian/changelog +++ scheme48-1.8/debian/changelog @@ -0,0 +1,107 @@ +scheme48 (1.8-1ubuntu1) intrepid; urgency=low + + * Resync with Debian unstable (LP: #145558). + * debian/patches/h_addr_list.diff: + - Use h_addr_list[0] instead of h_addr, fix FTBFS. + * debian/control: + - Update Maintainer field as per spec. + + -- Luca Falavigna Thu, 29 May 2008 22:31:04 +0200 + +scheme48 (1.8-1) unstable; urgency=low + + * New upstream release + * Native 64-bit support (without jumping through hoops). + * Upstream's tarball contains two copies of c/scheme48write-barrier.h, + which upsets dpkg-source -b. Therefore, ship a custom .orig.tar.gz. + * debian/control, debian/rules: drop biarch hack. + * debian/control: drop scheme48-scm (see README.Debian). + * debian/rules: use DESTDIR (supported upstream since 1.7). + * debian/watch: fix. + * debian/patches: refresh fuzzy patches. + Drop fix-mandir, fix-use-installed-vm, dont-conflict-with-scsh: they + seem to be obsolete. + * Install docs in /usr/share/doc/scheme48 rather than ...-doc. + * debian/control (Standards-Version): bump to 3.7.3. + + -- Trent W. Buck Fri, 16 May 2008 01:08:41 +1000 + +scheme48 (1.7-1) unstable; urgency=low + + * New upstream release (closes: #410401). + * New maintainer (closes: #411425, #451063). + * debian/control (cmuscheme48-el): update Emacs dependency. + * debian/patches: resolve merge conflicts (fuzz, offsets, &c). + * debian/copyright: since I can never tell how pedantic license + declaration must be, I have opted to be maximally pedantic. + * Riku Voipio: add armeb, armel and sh4 to architecture list, closes: #469873 + + -- Trent W. Buck Mon, 26 Nov 2007 21:39:41 +1100 + +scheme48 (1.6-1) UNRELEASED; urgency=low + + * New upstream release. + * Remove #318558 fix; problem seems to be fixed by new upstream. + * Remove gnuemacs-replace-in-string patch (fixed upstream). + * Use cdbs. + * Upgrade standards version to 3.7.2, debhelper 5. + * Support amd64 via -m32. + * Remove fuzz, offsets in patches. + * Discard empty file from doc/html to appease lintian. + * Trent Buck is an uploader. + + -- Trent Buck Fri, 22 Jun 2007 21:02:10 +1000 + +scheme48 (1.3-8ubuntu1) gutsy; urgency=low + + * Build scheme48-doc, scheme48-scm and cmuscheme48-el only on the + architectures supported by scheme48 to avoid unmetdeps (LP: #96393) + * Update Maintainer field in debian/control + + -- Luca Falavigna Fri, 20 Jul 2007 22:56:32 +0200 + +scheme48 (1.3-6) unstable; urgency=low + + * Fix permissions in the orig.tar.gz that got broken due to darcs + (Closes: #370416) + + -- Jorgen Schaefer Mon, 5 Jun 2006 16:56:35 +0200 + +scheme48 (1.3-5) unstable; urgency=low + + * Use quilt. + * Apply bugfix-wait-for-child-eats-100%-cpu (Closes: #348352) + + -- Jorgen Schaefer Sun, 4 Jun 2006 22:36:04 +0200 + +scheme48 (1.3-4) unstable; urgency=low + + * Don't build on 64 bit architectures (Closes: #324390) + + -- Jorgen Schaefer Mon, 22 Aug 2005 06:47:31 +0200 + +scheme48 (1.3-3) unstable; urgency=low + + * Don't regenerate files that don't need to be regenerated. + Really (Closes: #318558) + + -- Jorgen Schaefer Sun, 17 Jul 2005 00:29:33 +0200 + +scheme48 (1.3-2) unstable; urgency=low + + * Use the locally-built VM for creating filenames (Closes: #318558) + + -- Jorgen Schaefer Sat, 16 Jul 2005 19:42:10 +0200 + +scheme48 (1.3-1) unstable; urgency=low + + * New upstream release. + + -- Jorgen Schaefer Thu, 14 Jul 2005 13:46:05 +0200 + +scheme48 (1.2-1) unstable; urgency=low + + * Initial Release. (Closes: #265266) + + -- Jorgen Schaefer Sun, 26 Jun 2005 16:27:35 +0200 + --- scheme48-1.8.orig/debian/cmuscheme48-el.README.Debian +++ scheme48-1.8/debian/cmuscheme48-el.README.Debian @@ -0,0 +1,11 @@ +cmuscheme48 for Debian +---------------------- + +Since cmuscheme48 incompatibly modifies the `scheme-mode-map', it is +not loaded by default. To activate it, add the following to your +.emacs: + + (eval-after-load "cmuscheme" + '(require 'cmuscheme48)))) + + -- Jorgen Schaefer , Mon Apr 18 02:11:10 2005 --- scheme48-1.8.orig/debian/manpages/scheme-r5rs.scheme48.1 +++ scheme48-1.8/debian/manpages/scheme-r5rs.scheme48.1 @@ -0,0 +1,44 @@ +.\" Hey, EMACS: -*- nroff -*- +.\" First parameter, NAME, should be all caps +.\" Second parameter, SECTION, should be 1-8, maybe w/ subsection +.\" other parameters are allowed: see man(7), man(1) +.TH SCHEME-R5RS 1 "April 16, 2005" +.\" Please adjust this date whenever revising the manpage. +.\" +.\" Some roff macros, for reference: +.\" .nh disable hyphenation +.\" .hy enable hyphenation +.\" .ad l left justify +.\" .ad b justify to both left and right margins +.\" .nf disable filling +.\" .fi enable filling +.\" .br insert line break +.\" .sp insert n+1 empty lines +.\" for manpage-specific macros, see man(7) +.SH NAME +scheme-r5rs \- Run a Scheme script in an R5RS environment +.SH SYNOPSIS +.B scheme-r5rs +.RI program-file " arguments" ... +.SH DESCRIPTION + +This command runs a Scheme script from the command line. It will load +the Scheme script given in +.B program-file +into an R5RS environment and call the +.B main +procedure with the +.B arguments +as a single list of strings. + +.SH SEE ALSO +.BR scheme-srfi-7.scheme48 (1), +.br +.BR SRFI 22 " (http://srfi.schemers.org/srfi-22/srfi-22.html)" + +.SH AUTHORS +.B scheme-r5rs +for Scheme48 was written by Richard Kelsey and Jonathan Rees. +.BR +This manual page was written by Jorgen Schaefer , +for the Debian project (but may be used by others). --- scheme48-1.8.orig/debian/manpages/scheme-srfi-7.scheme48.1 +++ scheme48-1.8/debian/manpages/scheme-srfi-7.scheme48.1 @@ -0,0 +1,46 @@ +.\" Hey, EMACS: -*- nroff -*- +.\" First parameter, NAME, should be all caps +.\" Second parameter, SECTION, should be 1-8, maybe w/ subsection +.\" other parameters are allowed: see man(7), man(1) +.TH SCHEME-SRFI-7 1 "April 16, 2005" +.\" Please adjust this date whenever revising the manpage. +.\" +.\" Some roff macros, for reference: +.\" .nh disable hyphenation +.\" .hy enable hyphenation +.\" .ad l left justify +.\" .ad b justify to both left and right margins +.\" .nf disable filling +.\" .fi enable filling +.\" .br insert line break +.\" .sp insert n+1 empty lines +.\" for manpage-specific macros, see man(7) +.SH NAME +scheme-srfi-7 \- Run a Scheme script in an SRFI 7 environment +.SH SYNOPSIS +.B scheme-srfi-7 +.RI program-file " arguments" ... +.SH DESCRIPTION + +This command runs a Scheme script from the command line. It will load +the Scheme script given in +.B program-file +into an SRFI 7 environment and call the +.B main +procedure with the +.B arguments +as a single list of strings. + +.SH SEE ALSO +.BR scheme-r5rs.scheme48 (1), +.br +.BR SRFI 22 " (http://srfi.schemers.org/srfi-22/srfi-22.html)" +.br +.BR SRFI 7 " "(http://srfi.schemers.org/srfi-7/srfi-7.html) + +.SH AUTHORS +.B scheme-srfi-7 +for Scheme48 was written by Richard Kelsey and Jonathan Rees. +.PP +This manual page was written by Jorgen Schaefer , +for the Debian project (but may be used by others). --- scheme48-1.8.orig/debian/manpages/scheme48.1 +++ scheme48-1.8/debian/manpages/scheme48.1 @@ -0,0 +1,67 @@ +.\" -*- nroff -*- +.TH SCHEME48 1 "2004-08-12" +.\" Please adjust this date whenever revising the manpage. +.\" +.\" Some roff macros, for reference: +.\" .nh disable hyphenation +.\" .hy enable hyphenation +.\" .ad l left justify +.\" .ad b justify to both left and right margins +.\" .nf disable filling +.\" .fi enable filling +.\" .br insert line break +.\" .sp insert n+1 empty lines +.\" for manpage-specific macros, see man(7) +.SH NAME +scheme48 \- A Scheme implementation +.SH SYNOPSIS +.B scheme48 +[ +.I -i image +] +[ +.I -h heapsize +] +[ +.I -a argument ... +] + +.SH DESCRIPTION +This manual page documents briefly the command line arguments to the +.B scheme48 +Scheme implementation. +This manual page was written for the Debian distribution +because the original program does only have a very outdated manual page. +Instead, it has documentation in HTML format; see below. +.PP +.\" TeX users may be more comfortable with the \fB\fP and +.\" \fI\fP escape sequences to invode bold face and italics, +.\" respectively. +.SH OPTIONS +.TP +.B \-i image +specifies a heap image file to resume. This defaults to a heap image +that runs a Scheme command processor. +.TP +.B \-h heapsize +specifies how much space should be reserved for allocation. Heapsize +is in words (where one word = 4 bytes), and covers both semispaces, +only one of which is in use at any given time (except during garbage +collection). Cons cells are currently 3 words, so if you want to make +sure you can allocate a million cons cells, you should specify -h +6000000 (actually somewhat more than this, to account for the initial +heap image and breathing room). The default heap size is 3000000 +words. The system will use a larger heap if the specified (or default) +size is less than the size of the image being resumed. +.TP +.B \-a argument ... +is only useful with images built using ,build. The arguments are +passed as a list of strings to the procedure specified in the ,build +command. +.br +The programs are documented fully by +.IR "The Scheme48 Reference Manual" , +available in HTML in the scheme48-doc package. +.SH AUTHOR +This manual page was written by Jorgen Schäfer , +for the Debian project (but may be used by others). --- scheme48-1.8.orig/debian/compat +++ scheme48-1.8/debian/compat @@ -0,0 +1 @@ +5 --- scheme48-1.8.orig/debian/README.Debian +++ scheme48-1.8/debian/README.Debian @@ -0,0 +1,93 @@ +scheme48 for Debian +------------------- + +Source Code +=========== + +Up to version 1.7, the scheme48 package contained the set of scheme +files used at run-time (i.e. not built into scheme48.image) and the +scheme48-scm package contained all these files *again*, plus those +scheme files only used to create scheme48.image (or for reference). + +Forcer (the previous co-maintainer) agreed that the uses of "apt-get +install scheme48-scm" could be replaced with "apt-get source +scheme48", so I'm dropping the scheme48-scm package and adding this +note. + + +Policies +======== + +This package is provided by the Debian Scheme48 Maintainers Task +Force. We try to provide packages useful for Scheme48 users, and +appreciate all help; like suggestions for new packages. + +There is a policy for the work of this group: + + http://pkg-scheme48.alioth.debian.org/policy.txt + +There's also a policy for Scheme implementations which support +SRFI-22: + + http://people.debian.org/~forcer/debian-scheme-policy/ + + +Library Packages +================ + +Debian packages which provide library functionality for Scheme48 +should put their package definition files into + + /usr/share/scheme48// + +These can be loaded as usual with + + ,config ,load /usr/share/scheme48//packages.scm + + +Include Files +============= + +In the Debian version of Scheme48, the include file scheme48.h can be +found in /usr/include/scheme48/scheme48.h. This was necessary to allow +a parallel installation with scsh. You can compile programs by adding +the following option to CFLAGS: + + -I/usr/include/scheme48 + + +Why not multiple versions in parallel? +====================================== + +It would be useful to provide a scheme48 dependency package that just +depends on the version-specific scheme48-X.Y* packages, so that +multiple versions of scheme48 can coexist. Upstream is now set up +this way, but I (twb) can't be bothered setting it up yet. + + +Acknowledgments +=============== + +I want to thank Riastradh of #scheme on freenode for his patience and +the endless amount of help he provided. Without him, this package +wouldn't be here. + + +Slime48 +======= + +Slime48 is an IDE for Scheme48 built on top of the Common Lisp IDE for +Emacs, SLIME. The Slime48 author writes: + + SLIME48 works only with Scheme48 1.3 because of gratuitous, + incompatible changes in Scheme48, and, more prominently, support + for Unicode in in 1.5 and later in a way that I strongly disagree + with. + + -- http://mumble.net/~campbell/slime48.html + +Thus, Slime48 WILL NOT WORK with this Scheme48 package. The less +powerful comint mechanism provided by cmuscheme.el or cmuscheme48.el +still work. + + -- Trent W. Buck , Fri, 16 May 2008 01:02:10 +1000 --- scheme48-1.8.orig/debian/scheme48.postinst +++ scheme48-1.8/debian/scheme48.postinst @@ -0,0 +1,55 @@ +#! /bin/sh +# postinst script for foo +# +# see: dh_installdeb(1) + +set -e + +# summary of how this script can be called: +# * `configure' +# * `abort-upgrade' +# * `abort-remove' `in-favour' +# +# * `abort-deconfigure' `in-favour' +# `removing' +# +# for details, see http://www.debian.org/doc/debian-policy/ or +# the debian-policy package +# + +case "$1" in + configure) + update-alternatives --install /usr/bin/scheme-r5rs \ + scheme-r5rs \ + /usr/bin/scheme-r5rs.scheme48 \ + 20 \ + --slave /usr/share/man/man1/scheme-r5rs.1 \ + scheme-r5rs.1 \ + /usr/share/man/man1/scheme-r5rs.scheme48.1.gz + update-alternatives --install /usr/bin/scheme-srfi-7 \ + scheme-srfi-7 \ + /usr/bin/scheme-srfi-7.scheme48 \ + 20 \ + --slave /usr/share/man/man1/scheme-srfi-7.1 \ + scheme-srfi-7.1 \ + /usr/share/man/man1/scheme-srfi-7.scheme48.1.gz + ;; + + abort-upgrade|abort-remove|abort-deconfigure) + + ;; + + *) + echo "postinst called with unknown argument \`$1'" >&2 + exit 1 + ;; +esac + +# dh_installdeb will replace this with shell code automatically +# generated by other debhelper scripts. + +#DEBHELPER# + +exit 0 + + --- scheme48-1.8.orig/debian/scheme48.manpages +++ scheme48-1.8/debian/scheme48.manpages @@ -0,0 +1,3 @@ +debian/manpages/scheme-r5rs.scheme48.1 +debian/manpages/scheme-srfi-7.scheme48.1 +debian/manpages/scheme48.1 --- scheme48-1.8.orig/debian/cmuscheme48-el.emacsen-remove +++ scheme48-1.8/debian/cmuscheme48-el.emacsen-remove @@ -0,0 +1,10 @@ +#!/bin/sh -e +# /usr/lib/emacsen-common/packages/remove/prolog-el + +FLAVOR=$1 +PACKAGE=cmuscheme48-el + +if [ ${FLAVOR} != emacs ]; then + echo remove/${PACKAGE}: purging byte-compiled files for ${FLAVOR} + rm -rf /usr/share/${FLAVOR}/site-lisp/${PACKAGE} +fi --- scheme48-1.8.orig/debian/cmuscheme48-el.emacsen-startup +++ scheme48-1.8/debian/cmuscheme48-el.emacsen-startup @@ -0,0 +1,22 @@ +;; -*-emacs-lisp-*- +;; +;; Emacs startup file for the Debian cmuscheme48-el package +;; +;; Originally contributed by Nils Naumann +;; Modified by Dirk Eddelbuettel +;; Adapted for dh-make by Jim Van Zandt + +;; The cmuscheme48-el package follows the Debian/GNU Linux 'emacsen' +;; policy and byte-compiles its elisp files for each 'emacs flavor' +;; (emacs19, xemacs19, emacs20, xemacs20...). The compiled code is +;; then installed in a subdirectory of the respective site-lisp +;; directory. We have to add this to the load-path. We also add the +;; source directory so that C-h f can find it. +(let* ((package-dir (concat "/usr/share/" + (symbol-name flavor) + "/site-lisp/cmuscheme48-el")) + (source-dir "/usr/share/emacs/site-lisp/cmuscheme48-el") + (file (concat package-dir "/cmuscheme48.elc"))) + (when (file-directory-p package-dir) + (add-to-list 'load-path source-dir) + (add-to-list 'load-path package-dir))) --- scheme48-1.8.orig/debian/scheme48.install +++ scheme48-1.8/debian/scheme48.install @@ -0,0 +1 @@ +debian/tmp/* --- scheme48-1.8.orig/debian/patches/bugfix-wait-for-child-eats-100%-cpu.diff +++ scheme48-1.8/debian/patches/bugfix-wait-for-child-eats-100%-cpu.diff @@ -0,0 +1,108 @@ +This patch existed when I took over maintenance; I don't know what it +does. --twb, 2008-05-16. +Index: scheme48-1.8/c/posix/proc.c +=================================================================== +--- scheme48-1.8.orig/c/posix/proc.c 2008-01-16 23:50:48.000000000 +1100 ++++ scheme48-1.8/c/posix/proc.c 2008-05-15 20:12:51.000000000 +1000 +@@ -256,37 +256,35 @@ + static s48_value + posix_waitpid(void) + { +- while(1==1) { +- int stat; +- pid_t c_pid = waitpid(-1, &stat, WNOHANG); +- if (c_pid == -1) { +- if (errno == ECHILD) /* no one left to wait for */ +- return S48_FALSE; +- else if (errno != EINTR) +- s48_raise_os_error(errno); +- } +- else { +- s48_value sch_pid = lookup_pid(c_pid); +- s48_value temp = S48_UNSPECIFIC; +- S48_DECLARE_GC_PROTECT(2); ++ int stat; ++ pid_t c_pid = waitpid(-1, &stat, WNOHANG); ++ if (c_pid == -1) { ++ if (errno == ECHILD) /* no one left to wait for */ ++ return S48_FALSE; ++ else if (errno != EINTR) ++ s48_raise_os_error(errno); ++ } ++ else { ++ s48_value sch_pid = lookup_pid(c_pid); ++ s48_value temp = S48_UNSPECIFIC; ++ S48_DECLARE_GC_PROTECT(2); + +- S48_GC_PROTECT_2(sch_pid, temp); +- +- if (sch_pid != S48_FALSE) { +- if (WIFEXITED(stat)) +- S48_UNSAFE_RECORD_SET(sch_pid, 1, s48_enter_fixnum(WEXITSTATUS(stat))); +- else { +- temp = enter_signal(WTERMSIG(stat)); +- S48_UNSAFE_RECORD_SET(sch_pid, 2, temp); +- } ++ S48_GC_PROTECT_2(sch_pid, temp); + +- S48_GC_UNPROTECT(); +- return sch_pid; ++ if (sch_pid != S48_FALSE) { ++ if (WIFEXITED(stat)) ++ S48_UNSAFE_RECORD_SET(sch_pid, 1, s48_enter_fixnum(WEXITSTATUS(stat))); ++ else { ++ temp = enter_signal(WTERMSIG(stat)); ++ S48_UNSAFE_RECORD_SET(sch_pid, 2, temp); + } +- else +- S48_GC_UNPROTECT(); ++ S48_GC_UNPROTECT(); ++ return sch_pid; + } ++ else ++ S48_GC_UNPROTECT(); + } ++ return S48_TRUE; /* need to call again */ + } + + /* +Index: scheme48-1.8/scheme/posix/packages.scm +=================================================================== +--- scheme48-1.8.orig/scheme/posix/packages.scm 2008-01-11 03:00:49.000000000 +1100 ++++ scheme48-1.8/scheme/posix/packages.scm 2008-05-15 20:12:51.000000000 +1000 +@@ -182,6 +182,7 @@ + external-calls load-dynamic-externals + interrupts + placeholders ++ (subset threads (sleep)) + weak + value-pipes + debug-messages +Index: scheme48-1.8/scheme/posix/proc.scm +=================================================================== +--- scheme48-1.8.orig/scheme/posix/proc.scm 2008-01-11 03:00:49.000000000 +1100 ++++ scheme48-1.8/scheme/posix/proc.scm 2008-05-15 20:12:51.000000000 +1000 +@@ -146,14 +146,15 @@ + (car maybe-pid)))) + (let loop () + (let ((next (posix-waitpid))) +- (if next +- (let ((placeholder (process-id-placeholder next))) +- (if placeholder +- (begin +- (placeholder-set! placeholder #t) +- (set-process-id-placeholder! pid #f))) ; no longer needed +- (if (not (eq? pid next)) +- (loop)))))))) ++ (cond ((eqv? next #t) (sleep 5) (loop)) ++ (next ++ (let ((placeholder (process-id-placeholder next))) ++ (if placeholder ++ (begin ++ (placeholder-set! placeholder #t) ++ (set-process-id-placeholder! pid #f))) ; no longer needed ++ (if (not (eq? pid next)) ++ (loop))))))))) + + (import-lambda-definition posix-waitpid ()) + --- scheme48-1.8.orig/debian/patches/debian-user-name.diff +++ scheme48-1.8/debian/patches/debian-user-name.diff @@ -0,0 +1,16 @@ +The scheme48.image entry point procedure prints a welcome message that +includes "built by Fred" where Fred is the username of the user that +built Scheme48. Make this always be "Debian". +Index: scheme48-1.8/build/build-usual-image +=================================================================== +--- scheme48-1.8.orig/build/build-usual-image 2008-01-09 04:32:54.000000000 +1100 ++++ scheme48-1.8/build/build-usual-image 2008-05-15 19:53:46.000000000 +1000 +@@ -8,7 +8,7 @@ + image=$4 + vm=$5 + initial=$6 +-USER=${USER-`logname 2>/dev/null || echo '*GOK*'`} ++USER=Debian + + $vm -i $initial -a batch <errno_val = 0; + +- memcpy(handshake->host_addr, host->h_addr, handshake->host_length); ++ memcpy(handshake->host_addr, host->h_addr_list[0], handshake->host_length); + } + s48_note_external_event((long) handshake->event_uid); + } +@@ -382,7 +382,7 @@ + free(handshake); + if (host == NULL) + s48_raise_os_error(h_errno); +- return s48_enter_byte_vector(host->h_addr, host->h_length); ++ return s48_enter_byte_vector(host->h_addr_list[0], host->h_length); + } + else + { --- scheme48-1.8.orig/debian/patches/series +++ scheme48-1.8/debian/patches/series @@ -0,0 +1,5 @@ +bugfix-wait-for-child-eats-100%-cpu.diff +debian-srfi-22-interpreter-name.diff +debian-user-name.diff +honor-destdir.diff +h_addr_list.diff --- scheme48-1.8.orig/debian/patches/debian-srfi-22-interpreter-name.diff +++ scheme48-1.8/debian/patches/debian-srfi-22-interpreter-name.diff @@ -0,0 +1,34 @@ +This causes the standardized interfaces scheme-{r5rs,srfi-7} to be +installed with the "scheme48" suffix, which postinst aliases to the +suffix-less names. This allows other packages to provide alternatives +for these interfaces. +Index: scheme48-1.8/c/script-interpreter.c +=================================================================== +--- scheme48-1.8.orig/c/script-interpreter.c 2008-01-11 03:00:43.000000000 +1100 ++++ scheme48-1.8/c/script-interpreter.c 2008-05-15 19:54:13.000000000 +1000 +@@ -34,6 +34,12 @@ + } + language_tag = p + 7; + ++ /* Debian specific: Live with scheme-r5rs.scheme48 */ ++ p = strchr(language_tag, '.'); ++ if (p) { ++ *p = '\0'; ++ } ++ + new_argv = (char **)malloc((argc + 4) * sizeof(char *)); + if (!new_argv) + { +Index: scheme48-1.8/Makefile.in +=================================================================== +--- scheme48-1.8.orig/Makefile.in 2008-01-27 02:06:27.000000000 +1100 ++++ scheme48-1.8/Makefile.in 2008-05-15 19:54:13.000000000 +1000 +@@ -405,7 +405,7 @@ + inst-script-interpreters: + for dialect in r5rs srfi-7; do \ + $(INSTALL_PROGRAM) script-interpreter \ +- $(DESTDIR)$(bindir)/scheme-$$dialect; \ ++ $(DESTDIR)$(bindir)/scheme-$$dialect.scheme48; \ + done + + inst-config-script: --- scheme48-1.8.orig/debian/patches/honor-destdir.diff +++ scheme48-1.8/debian/patches/honor-destdir.diff @@ -0,0 +1,14 @@ +Fix a bug introduced in 1.8. +Index: scheme48-1.8/Makefile.in +=================================================================== +--- scheme48-1.8.orig/Makefile.in 2008-05-15 22:56:54.000000000 +1000 ++++ scheme48-1.8/Makefile.in 2008-05-15 23:03:04.000000000 +1000 +@@ -409,7 +409,7 @@ + done + + inst-config-script: +- config_script=$(bindir)/$(CONFIG_SCRIPT) && \ ++ config_script=$(DESTDIR)/$(bindir)/$(CONFIG_SCRIPT) && \ + sed -e 's,@incdir\@,$(incdir),g' \ + -e 's,@libdir\@,$(libdir),g' \ + -e 's,@CC\@,$(CC),g' \ --- scheme48-1.8.orig/debian/copyright +++ scheme48-1.8/debian/copyright @@ -0,0 +1,631 @@ +This package was debianized by Jorgen Schaefer on +Thu, 12 Aug 2004 15:04:56 +0200. + +It was downloaded from http://www.s48.org/ + +Upstream Authors: Richard Kelsey and Jonathan Rees. +Upstream Maintainer: Michael Sperber. + +Copyright: + +COPYING is almost the same as /usr/share/common-licenses/BSD, it reads + + Copyright (c) 1993-2006 Richard Kelsey and Jonathan Rees + All rights reserved. + + Redistribution and use in source and binary forms, with or without + modification, are permitted provided that the following conditions + are met: + 1. Redistributions of source code must retain the above copyright + notice, this list of conditions and the following disclaimer. + 2. Redistributions in binary form must reproduce the above + copyright notice, this list of conditions and the following + disclaimer in the documentation and/or other materials provided + with the distribution. + 3. The name of the authors may not be used to endorse or promote + products derived from this software without specific prior + written permission. + + THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS + OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED + WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY + DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE + GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, + WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING + NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS + SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + + + Distributing Autoconf Output + **************************** + + [excerpt from autoconf documentation] + + The configuration scripts that Autoconf produces are covered by + the GNU General Public License. This is because they consist + almost entirely of parts of Autoconf itself, rearranged somewhat, + and Autoconf is distributed under the terms of the GPL. As + applied to Autoconf, the GPL just means that you need to + distribute `configure.in' along with `configure'. + + Programs that use Autoconf scripts to configure themselves do + not automatically come under the GPL. Distributing an Autoconf + configuration script as part of a program is considered to be + *mere aggregation* of that work with the Autoconf script. Such + programs are not derivative works based on Autoconf; only their + configuration scripts are. We still encourage software authors to + distribute their work under terms like those of the GPL, but doing + so is not required to use Autoconf. + +Most source files have the following copyright / license declaration. + + Copyright (c) 1993-2007 by Richard Kelsey and Jonathan Rees. + See file COPYING. + +With the exception of doc/node.txt, doc/todo.txt, prescheme/union.scm +and minor-version-number, all files in the ps-compiler/ subdirectory +have the following copyright / license declaration. + + Copyright (c) 1993-2007 by Richard Kelsey. See file COPYING. + +Files with different or no copyright / license declarations are listed +below. + +INSTALL +Makefile.in +acconfig.h +build/build-external-modules +build/build-initial-image.bat +build/build-usual-image +build/build-usual-image.bat +build/check.bat +build/compile-bibop-gc.bat +build/compile-twospace-gc.bat +build/compile-vm.bat +build/dummy +build/filenames.bat +build/filenames.make +build/generate-c-header.bat +build/generate-go.bat +build/generate-scheme48-files-wxi.sh +build/generate-unicode-info.bat +build/initial.debug +build/initial.image +build/lucid-script.lisp +build/minor-version-number +build/scheme48.rc +c/asm-glue.c +c/c-mods.h +c/event.h +c/fake/dlfcn.h +c/fake/environ.c +c/fake/environ.h +c/fake/glue.c +c/fake/langinfo.c +c/fake/langinfo.h +c/fake/libdl-hp-ux.c +c/fake/libdl1.c +c/fake/libdl2.c +c/fake/sigact.h +c/fake/strerror.c +c/fake/strerror.h +c/fake/sys-select.h +c/fake/sysexits.h +c/fd-io.h +c/main.c +c/old-scheme48.h +c/posix/posix.h +c/posix/s48_signals.h +c/prescheme.h +c/scheme48-bibop-heap.c +c/scheme48-twospace-heap.c +c/scheme48.h +c/scheme48heap.c +c/scheme48heap.h +c/scheme48image.h +c/scheme48read-image.c +c/scheme48vm-prelude.h +c/scheme48vm.c +c/scheme48vm.h +c/scheme48write-image.c +c/srfi-27.c +c/sysdep.h.in +c/unix.h +configure.in +doc/hacking.txt +doc/html/manual-Z-G-D-1.gif +doc/html/manual-Z-H-1.html +doc/html/manual-Z-H-10.html +doc/html/manual-Z-H-11.html +doc/html/manual-Z-H-2.html +doc/html/manual-Z-H-3.html +doc/html/manual-Z-H-4.html +doc/html/manual-Z-H-5.html +doc/html/manual-Z-H-6.html +doc/html/manual-Z-H-7.html +doc/html/manual-Z-H-8.html +doc/html/manual-Z-H-9.html +doc/html/manual-Z-S.css +doc/html/manual.html +doc/html/unicode-Z-G-1.gif +doc/install.txt +doc/io.txt +doc/manual.pdf +doc/manual.ps +doc/meeting.ps +doc/news.txt +doc/no-leaf-env.txt +doc/scheme48.man +doc/src/ascii.scm +doc/src/bibliography.tex +doc/src/code.tex +doc/src/command.tex +doc/src/external.tex +doc/src/hacks.tex +doc/src/intro.tex +doc/src/manual-Z-G-D-1.tex +doc/src/manual.tex +doc/src/matter.sty +doc/src/meeting.tex +doc/src/module.tex +doc/src/myindex.tex +doc/src/posix.tex +doc/src/proto.tex +doc/src/summary.tex +doc/src/thread.tex +doc/src/unicode-Z-G-1.tex +doc/src/unicode.tex +doc/src/user-guide.tex +doc/src/utilities.tex +doc/src/version-number.tex +doc/todo.txt +doc/type.txt +emacs/README +emacs/cmuscheme48.el +emacs/jar-hacks.el +gdbinit +install-sh +ps-compiler/doc/node.txt +ps-compiler/doc/todo.txt +ps-compiler/minor-version-number +ps-compiler/prescheme/union.scm +scheme/bcomp/comp-exp.scm +scheme/bcomp/frame.scm +scheme/big/check.scm +scheme/big/unicode-normalization-info.scm +scheme/cml/async-channel.scm +scheme/cml/channel.scm +scheme/cml/cml-check.scm +scheme/cml/interfaces.scm +scheme/cml/jar.scm +scheme/cml/packages.scm +scheme/cml/placeholder.scm +scheme/cml/rendezvous.scm +scheme/cml/test-packages.scm +scheme/cml/time.scm +scheme/cml/trans-id.scm +scheme/env/parse-bytecode.scm +scheme/env/unicode-info.scm +scheme/env/version-info.scm +scheme/misc/sicp-check.scm +scheme/misc/test-packages.scm +scheme/posix/regexp-check.scm +scheme/posix/test-packages.scm +scheme/rts/syntax-info.scm +scheme/sort/interfaces.scm +scheme/sort/packages.scm +scheme/sort/sort.scm +scheme/sort/test.scm +scheme/sort/vector-util.scm +scheme/srfi/packages.scm +scheme/srfi/srfi-11.scm +scheme/srfi/srfi-14-base-char-sets.scm +scheme/srfi/srfi-14-check.scm +scheme/srfi/srfi-16.scm +scheme/srfi/srfi-17.scm +scheme/srfi/srfi-19-check.scm +scheme/srfi/srfi-25.scm +scheme/srfi/srfi-26.scm +scheme/srfi/srfi-27.scm +scheme/srfi/srfi-4.scm +scheme/srfi/srfi-63.scm +scheme/srfi/srfi-71.scm +scheme/srfi/test-packages.scm +scheme/test-packages.scm +scheme/vm/arith/flonum-arith.scm +scheme/vm/interp/stack-gc.scm +scheme/vm/package-defs.scm +scheme/vm/shared-interfaces.scm +scheme48.sln +scheme48.vcproj + + No copyright nor license declaration. + +c/unix/dynamo-test.c +c/unix/dynamo.c +scheme/debug/low-test-packages.scm +scheme/debug/small-packages.scm +scheme/debug/tiny-packages.scm +scheme/misc/shift-reset.scm + + Explicitly denies having a copyright. Does not mention licensing. + + [I guess this is equivalent to placing these files in the Public + Domain, but I am not a copyright lawyer. --twb] + +c/free.c + + All software (c) 1996 Robert G. Burger. + + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software, to deal in the software without + restriction, including without limitation the rights to use, copy, + modify, merge, publish, distribute, sublicense, and/or sell copies + of the software. + + The software is provided "as is," without warranty of any kind, + express or implied, including but not limited to the warranties of + merchantability, fitness for a particular purpose and + noninfringement. In no event shall the author be liable for any + claim, damages or other liability, whether in an action of + contract, tort or otherwise, arising from, out of or in connection + with the software or the use or other dealings in the software. + +c/bignum.c + + Copyright 1986,1987,1988,1989,1990,1991 Massachusetts Institute of Technology + Copyright 1992,1993,1994,2004 Massachusetts Institute of Technology + +c/bignum.h + + Copyright 1986,1987,1988,1989,1992,2004 Massachusetts Institute of Technology + +c/bignumint.h + + Copyright 1989,1992,1993,2004 Massachusetts Institute of Technology + +c/bignum.c +c/bignum.h +c/bignumint.h + + Redistribution and use in source and binary forms, with or without + modification, are permitted provided that the following conditions are + met: + + 1. Redistributions of source code must retain the above copyright + notice, this list of conditions and the following disclaimer. + + 2. Redistributions in binary form must reproduce the above + copyright notice, this list of conditions and the following + disclaimer in the documentation and/or other materials provided + with the distribution. + + 3. The name of the author may not be used to endorse or promote + products derived from this software without specific prior + written permission. + + THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR + IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED + WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE + DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, + INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES + (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR + SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, + STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING + IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + POSSIBILITY OF SUCH DAMAGE. + +configure + + Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001, + 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc. + This configure script is free software; the Free Software Foundation + gives unlimited permission to copy, distribute and modify it. + +emacs/cmulisp.el + + Copyright Olin Shivers (1988). + Please imagine a long, tedious, legalistic 5-page gnu-style copyright + notice appearing here to the effect that you may use this code any + way you like, as long as you don't charge money for it, remove this + notice, or hold me liable for its results. + +mkinstalldirs + + Author: Noah Friedman + Created: 1993-05-16 + Public domain + +scheme/sort/delndups.scm +scheme/sort/lmsort.scm +scheme/sort/sortp.scm +scheme/sort/visort.scm +scheme/sort/vmsort.scm + + Copyright (c) 1998 by Olin Shivers. + You may do as you please with this code, as long as you do not + delete this notice or hold me responsible for any outcome related + to its use. + +scheme/srfi/srfi-1.scm + + Copyright (c) 1998, 1999 by Olin Shivers. + You may do as you please with this code as long as you do not + remove this copyright notice or hold me liable for its use. + +scheme/sort/vbinsearch.scm + + Copyright (c) 1998 by Olin Shivers. + This code is in the public domain. + +scheme/sort/vhsort.scm + + Copyright (c) 2002 by Olin Shivers. + This code is open-source; see the end of the file for porting and + more copyright information. + + [There is no copyright infrmation at the end of the file --twb] + +scheme/srfi/srfi-13.scm + + Copyright (c) 1988-1994 Massachusetts Institute of Technology. + Copyright (c) 1998, 1999, 2000 Olin Shivers. All rights reserved. + + Copyright details + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + The prefix/suffix and comparison routines in this code had (extremely + distant) origins in MIT Scheme's string lib, and was substantially + reworked by Olin Shivers (shivers@ai.mit.edu) 9/98. As such, it is + covered by MIT Scheme's open source copyright. See below for details. + + The KMP string-search code was influenced by implementations written + by Stephen Bevan, Brian Dehneyer and Will Fitzgerald. However, this + version was written from scratch by myself. + + The remainder of this code was written from scratch by myself for scsh. + The scsh copyright is a BSD-style open source copyright. See below for + details. + -Olin Shivers + + MIT Scheme copyright terms + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + This material was developed by the Scheme project at the Massachusetts + Institute of Technology, Department of Electrical Engineering and + Computer Science. Permission to copy and modify this software, to + redistribute either the original software or a modified version, and + to use this software 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. Users of this software agree to make their best efforts (a) to + return to the MIT Scheme project any improvements or extensions that + they make, so that these may be included in future releases; and (b) + to inform MIT of noteworthy uses of this software. + + 3. All materials developed as a consequence of the use of this + software shall duly acknowledge such use, in accordance with the usual + standards of acknowledging credit in academic research. + + 4. MIT has made no warrantee or representation that the operation of + this software will be error-free, and MIT is under no obligation to + provide any services, by way of maintenance, update, or otherwise. + + 5. In conjunction with products arising from the use of this material, + there shall be no use of the name of the Massachusetts Institute of + Technology nor of any adaptation thereof in any advertising, + promotional, or sales literature without prior written consent from + MIT in each case. + + Scsh copyright terms + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + + [The declared license exactly matches the one in COPYING. --twb] + +scheme/srfi/srfi-19.scm + + Copyright (C) I/NET, Inc. (2000, 2002, 2003). All Rights Reserved. + + This document and translations of it may be copied and furnished + to others, and derivative works that comment on or otherwise + explain it or assist in its implementation may be prepared, + copied, published and distributed, in whole or in part, without + restriction of any kind, provided that the above copyright notice + and this paragraph are included on all such copies and derivative + works. However, this document itself may not be modified in any + way, such as by removing the copyright notice or references to the + Scheme Request For Implementation process or editors, except as + needed for the purpose of developing SRFIs in which case the + procedures for copyrights defined in the SRFI process must be + followed, or as required to translate it into languages other than + English. + + The limited permissions granted above are perpetual and will not + be revoked by the authors or their successors or assigns. + + This document and the information contained herein is provided on + an "AS IS" basis and THE AUTHOR AND THE SRFI EDITORS DISCLAIM ALL + WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY + WARRANTY THAT THE USE OF THE INFORMATION HEREIN WILL NOT INFRINGE + ANY RIGHTS OR ANY IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS + FOR A PARTICULAR PURPOSE. + +scheme/srfi/srfi-28.scm + + Copyright (C) Scott G. Miller (2002). All Rights Reserved. + +scheme/srfi/srfi-37.scm + + Copyright (c) 2002 Anthony Carrico + + [The declared license exactly matches the one in COPYING. --twb] + +scheme/srfi/srfi-40.scm + + Copyright (C) 2003 by Philip L. Bewig of Saint Louis, Missouri, + United States of America. All rights reserved. + + This document and translations of it may be copied and furnished + to others, and derivative works that comment on or otherwise + explain it or assist in its implementation may be prepared, + copied, published and distributed, in whole or in part, without + restriction of any kind, provided that the above copyright notice + and this paragraph are included on all such copies and derivative + works. However, this document itself may not be modified in any + way, such as by removing the copyright notice or references to the + Scheme Request For Implementation process or editors, except as + needed for the purpose of developing SRFIs in which case the + procedures for copyrights defined in the SRFI process must be + followed, or as required to translate it into languages other than + English. + + The limited permissions granted above are perpetual and will not + be revoked by the authors or their successors or assigns. + + This document and the information contained herein is provided on + an "AS IS" basis and THE AUTHOR AND THE SRFI EDITORS DISCLAIM ALL + WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY + WARRANTY THAT THE USE OF THE INFORMATION HEREIN WILL NOT INFRINGE + ANY RIGHTS OR ANY IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS + FOR A PARTICULAR PURPOSE. + +scheme/srfi/srfi-42.scm +scheme/srfi/srfi-43.scm + + Taylor Campbell wrote this code; he places it in the public domain. + +scheme/srfi/srfi-45.scm + + Copyright (C) André van Tonder (2003). All Rights Reserved. + + This document and translations of it may be copied and furnished + to others, and derivative works that comment on or otherwise + explain it or assist in its implementation may be prepared, + copied, published and distributed, in whole or in part, without + restriction of any kind, provided that the above copyright notice + and this paragraph are included on all such copies and derivative + works. However, this document itself may not be modified in any + way, such as by removing the copyright notice or references to the + Scheme Request For Implementation process or editors, except as + needed for the purpose of developing SRFIs in which case the + procedures for copyrights defined in the SRFI process must be + followed, or as required to translate it into languages other than + English. + + The limited permissions granted above are perpetual and will not + be revoked by the authors or their successors or assigns. + + This document and the information contained herein is provided on + an "AS IS" basis and THE AUTHOR AND THE SRFI EDITORS DISCLAIM ALL + WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY + WARRANTY THAT THE USE OF THE INFORMATION HEREIN WILL NOT INFRINGE + ANY RIGHTS OR ANY IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS + FOR A PARTICULAR PURPOSE. + +scheme/srfi/srfi-60.scm + + Copyright (C) 2005 David Van Horn + + Released under the same terms as the SRFI reference implementation + included below. + + Copyright (C) 1991, 1993, 2001, 2003, 2005 Aubrey Jaffer + + Permission to copy this software, to modify it, to redistribute + it, to distribute modified versions, 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 warranty 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. + +scheme/srfi/srfi-61.scm + + Copyright (C) 2004 Taylor Campbell. All rights reserved. + + This document and translations of it may be copied and furnished + to others, and derivative works that comment on or otherwise + explain it or assist in its implementation may be prepared, + copied, published and distributed, in whole or in part, without + restriction of any kind, provided that the above copyright notice + and this paragraph are included on all such copies and derivative + works. However, this document itself may not be modified in any + way, such as by removing this copyright notice or references to + the Scheme Request for Implementation process or editors, except + as needed for the purpose of developing SRFIs in which case the + procedures for copyrights defined in the SRFI process must be + followed, or as required to translate it into languages other than + English. + + The limited permissions granted above are perpetual and will not + be revoked by the authors or their successors or assigns. + + This document and the information contained herein is provided on + an "AS IS" basis and THE AUTHORS AND THE SRFI EDITORS DISCLAIM ALL + WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY + WARRANTY THAT THE USE OF THE INFORMATION HEREIN WILL NOT INFRINGE + ON ANY RIGHTS OR ANY IMPLIED WARRANTIES OF MERCHANTABILITY OR + FITNESS FOR A PARTICULAR PURPOSE. + +scheme/srfi/srfi-67.scm + + Copyright (c) 2005 Sebastian Egner and Jens Axel S{\o}gaard. + + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software and associated documentation + files (the ``Software''), to deal in the Software without + restriction, including without limitation the rights to use, copy, + modify, merge, publish, distribute, sublicense, and/or sell copies + of the Software, and to permit persons to whom the Software is + furnished to do so, subject to the following conditions: + + The above copyright notice and this permission notice shall be + included in all copies or substantial portions of the Software. + + THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND, + EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF + MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT + HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, + WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER + DEALINGS IN THE SOFTWARE. + +scheme/srfi/srfi-78.scm + + Copyright (c) 2005-2006 Sebastian Egner. + + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software and associated documentation + files (the ``Software''), to deal in the Software without + restriction, including without limitation the rights to use, copy, + modify, merge, publish, distribute, sublicense, and/or sell copies + of the Software, and to permit persons to whom the Software is + furnished to do so, subject to the following conditions: + + The above copyright notice and this permission notice shall be + included in all copies or substantial portions of the Software. + + THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND, + EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF + MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT + HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, + WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER + DEALINGS IN THE SOFTWARE. --- scheme48-1.8.orig/debian/scheme48.prerm +++ scheme48-1.8/debian/scheme48.prerm @@ -0,0 +1,40 @@ +#! /bin/sh +# prerm script for foo +# +# see: dh_installdeb(1) + +set -e + +# summary of how this script can be called: +# * `remove' +# * `upgrade' +# * `failed-upgrade' +# * `remove' `in-favour' +# * `deconfigure' `in-favour' +# `removing' +# +# for details, see http://www.debian.org/doc/debian-policy/ or +# the debian-policy package + + +case "$1" in + remove|upgrade|deconfigure) + update-alternatives --remove scheme-r5rs /usr/bin/scheme-r5rs.scheme48 + update-alternatives --remove scheme-srfi-7 /usr/bin/scheme-srfi-7.scheme48 + ;; + failed-upgrade) + ;; + *) + echo "prerm called with unknown argument \`$1'" >&2 + exit 1 + ;; +esac + +# dh_installdeb will replace this with shell code automatically +# generated by other debhelper scripts. + +#DEBHELPER# + +exit 0 + + --- scheme48-1.8.orig/debian/cmuscheme48-el.install +++ scheme48-1.8/debian/cmuscheme48-el.install @@ -0,0 +1 @@ +emacs/cmuscheme48.el usr/share/emacs/site-lisp/cmuscheme48-el/