You can never have enough scheme interpreters.

Initial import of scm-5d8 into the NetBSD Packages Collection. Provided in
PR 22186 by David S., modified slighly by myself.

Scm is a portable R5RS Scheme implementation written in C.
    * Support for SICP, R2RS, R3RS, and R5RS scheme code.
    * Is fully documented in TeXinfo form, allowing documentation to be
      generated in info, TeX, html, nroff, and troff formats.
    * Supports inexact real and complex numbers, 30 bit immediate integers 
	and large precision integers.
    * Many Common Lisp functions: logand, logor, logxor, lognot, ash, 
	logcount, integer-length, bit-extract, defmacro, macroexpand, 
	macroexpand1, gentemp, defvar, force-output, software-type, 
	get-decoded-time, get-internal-run-time, get-internal-real-time, 
	delete-file, rename-file, copy-tree, acons, and eval.
    * Char-code-limit, most-positive-fixnum, most-negative-fixnum, and 
	internal-time-units-per-second constants. *Features* and 
	*load-pathname* variables.
    * Arrays and bit-vectors. String ports and software emulation ports. 
	I/O extensions providing ANSI C and POSIX.1 facilities.
    * Interfaces to standard libraries
    * Available add-on packages including an interactive debugger, database,
	X-window graphics, BGI graphics, Motif, and Open-Windows packages.
    * A compiler (HOBBIT) and dynamic linking of compiled modules.
    * User definable responses to interrupts and errors, 
	Process-syncronization primitives. Setable levels of monitoring 
	and timing information printed interactively (the verbose function). 

2 files changed, 62 insertions, 0 deletions

diff --git a/lang/scm/patches/patch-aa b/lang/scm/patches/patch-aa
new file mode 100644
index 00000000000..0d45bffe3f3
--- /dev/null
+++ b/lang/scm/patches/patch-aa
@@ -0,0 +1,49 @@
+$NetBSD: patch-aa,v 1.1.1.1 2003/10/04 20:31:23 agc Exp $
+
+--- Makefile.orig	2003-06-17 20:25:30.000000000 -0700
++++ Makefile
+@@ -92,7 +92,9 @@ ofiles = scm.o time.o repl.o scl.o sys.o
+ # ramap.o
+ ifiles = Init$(VERSION).scm Transcen.scm Link.scm Macro.scm Macexp.scm \
+ 	Tscript.scm compile.scm
+-hobfiles = hobbit.scm scmhob.scm scmhob.h
++hobsrcs = hobbit.scm scmhob.scm
++hobincs = scmhob.h
++hobfiles = $(hobsrcs) $(hobincs)
+ xafiles = xatoms.scm x11.scm xevent.scm keysymdef.scm
+ xfiles = x.c x.h xgen.scm xevent.h inc2scm $(xafiles)
+ 
+@@ -341,12 +343,12 @@ $(PREVDOCS)scm.info:	srcdir.mk Makefile
+ 
+ rpm_prefix=/usr/src/redhat/
+ 
+-prefix = /usr/local/
++prefix = $(PREFIX)/
+ exec_prefix = $(prefix)
+ # directory where `make install' will put executable.
+ bindir = $(exec_prefix)bin/
+ libdir = $(exec_prefix)lib/
+-libscmdir = $(libdir)scm/
++libscmdir = $(prefix)share/scm/
+ # directory where `make install' will put manual page.
+ mandir = $(prefix)man/
+ man1dir = $(mandir)man1/
+@@ -407,15 +409,15 @@ install:	scm.1
+ 	-cp scm.1 $(man1dir)
+ 	test -d $(libdir) || mkdir $(libdir)
+ 	test -d $(libscmdir) || mkdir $(libscmdir)
+-	-cp $(ifiles) $(hobfiles) COPYING r4rstest.scm $(libscmdir)
++	-cp $(ifiles) $(hobsrcs) COPYING r4rstest.scm $(libscmdir)
+ 	test -f $(libscmdir)require.scm || \
+ 		cp requires.scm $(libscmdir)require.scm
+-	-cp build build.scm mkimpcat.scm Iedline.scm *.sl *.so patchlvl.h\
++	-cp build build.scm mkimpcat.scm Iedline.scm *.sl *.so \
+ 		$(xafiles) $(libscmdir)
+ 
+ installlib:
+ 	test -d $(includedir) || mkdir $(includedir)
+-	cp scm.h scmfig.h scmflags.h $(includedir)
++	cp scm.h scmfig.h scmflags.h patchlvl.h $(hobincs) $(includedir)
+ 	test -d $(libdir) || mkdir $(libdir)
+ 	cp libscm.a $(libdir)libscm.a
+ 
diff --git a/lang/scm/patches/patch-ab b/lang/scm/patches/patch-ab
new file mode 100644
index 00000000000..99548dcf44a
--- /dev/null
+++ b/lang/scm/patches/patch-ab
@@ -0,0 +1,13 @@
+$NetBSD: patch-ab,v 1.1.1.1 2003/10/04 20:31:23 agc Exp $
+
+--- socket.c.orig	2003-01-02 11:44:31.000000000 -0800
++++ socket.c
+@@ -146,7 +146,7 @@ SCM l_hostinfo(name)
+   struct in_addr inad;
+   char **argv;
+   int i = 0;
+-#ifndef linux
++#if !(defined(linux) || defined(__NetBSD__))
+   if UNBNDP(name) {
+     DEFER_INTS;
+     SYSCALL(entry = gethostent(););