1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
|
This directory contains the distribution of scm5c3. Scm conforms to
Revised^5 Report on the Algorithmic Language Scheme and the IEEE P1178
specification. Scm runs under VMS, MS-DOS, OS2, MacOS, Amiga,
Atari-ST, NOS/VE, Unix and similar systems.
This file consists mainly of excerpts from "scm.info", the result of
compiling (with makeinfo) "scm.texi" to `info' form. In case of
conflicts with "scm.info", consult "scm.info".
The author can be reached at <jaffer@ai.mit.edu>
MANIFEST
`README' is this file. It contains a MANIFEST, INSTALLATION
INSTRUCTIONS, hints for EDITING SCHEME CODE, and a TROUBLE
SHOOTING GUIDE.
`COPYING' details the LACK OF WARRANTY for scm and the conditions
for distributing scm.
`scm.1' is the unix style man page in nroff format.
`scm.doc' is the text man page generated from scm.1.
`QUICKREF' is a Quick Reference card for IEEE and R4RS.
`scm.texi' details feature support and enhancements to Scheme and
contains a SCHEME BIBLIOGRAPHY.
`ChangeLog' documents changes to the scm.
`r4rstest.scm' is Scheme code which tests conformance with Scheme
specifications.
`example.scm' is Scheme code from Revised^4 Report on the
Algorithmic Language Scheme which uses inexact numbers.
`pi.scm' is Scheme code for computing digits of pi [type (pi 100 5)]
which can be used to test the performance of scm against
compiled C code [cc -o pi pi.c;time pi 100 5].
`pi.c' is C code for computing digits of pi.
`bench.scm' is Scheme code for computing and recording speed of
"pi.scm".
`Makefile' is for building scmlit using the `make' program.
`build.scm' creates a database and program for compiling and linking
new SCM executables, libraries, and dlls.
`build.bat' invokes build.scm on MS-DOS platforms.
`mkimpcat.scm' build SCM-specific catalog for SLIB.
`disarm.scm' disables file opening and modifications.
`.gdbinit' provides commands for debugging SCM with GDB.
`setjump.mar' provides setjump and longjump which do not use $unwind
utility on VMS.
`ugsetjump.s' provides setjump and longjump which work on Ultrix VAX.
`setjump.s' provides setjump and longjump for the Cray YMP.
`Init5c2.scm' is Scheme initialization code.
`Transcen.scm' has Scheme code for inexact builtin procedures.
`Link.scm' has Scheme code for compiling and dynamic linking.
`scmfig.h' is a C include file containing system dependent definitions.
`patchlvl.h is the patchlevel of this release.
`continue.c' code for continuations.
`continue.h' data types and external functions for continuations.
`setjump.h' is an include file dealing with continuations, stacks,
and memory allocation.
`scm.h' has the data type and external definitions of scm.
`scm.c' has the top level and interrupt code.
`findexec.c' has code to find the executable file.
`time.c' has functions dealing with time.
`repl.c' has error, read-eval-print loop, read, write and load code.
`scl.c' has the code for utility functions which are not part of the
IEEE Scheme spec or which are required for non-integer
arithmetic.
`eval.c' has the evaluator, apply, map, and foreach.
`sys.c' has the code for opening and closing files, storage
allocation and garbage collection.
`rope.c' has C interface functions.
`subr.c' has all the rest of functions.
`sc2.c' has code for procedures from R2RS and R3RS not in R4RS.
`dynl.c' has c code for dynamically loading object files.
`unif.c' has code for uniform vectors.
`rgx.c' has code for string regular expression match.
`crs.c' has code for interactive terminal control.
`split.scm' sets up CURSCM (SCM with crs.c) so that input, output,
and diagnostic output are each directed to separate windows.
`edline.c' Gnu readline input editing
(get ftp.sys.toronto.edu:/pub/rc/editline.shar).
`Iedline.scm' Gnu readline input editing.
`record.c' has code for proposed "Record" user definable datatypes.
`gsubr.c' has make_gsubr for arbitrary (< 11) arguments to C functions.
`ioext.c' has code for system calls in common between PC compilers and unix.
`posix.c' has code for posix library interface.
`unix.c' has code for non-posix system calls on unix systems.
`socket.c' has code for socket interface.
SLIB
[SLIB] is a portable Scheme library meant to provide compatibility and
utility functions for all standard Scheme implementations. Although
SLIB is not *neccessary* to run SCM, I strongly suggest you obtain and
install it. Bug reports about running SCM without SLIB have very low
priority. SLIB is available from the same sites as SCM:
* swissnet.ai.mit.edu:pub/scm/slib2c3.tar.gz
* prep.ai.mit.edu:pub/gnu/jacal/slib2c3.tar.gz
* ftp.maths.tcd.ie:pub/bosullvn/jacal/slib2c3.tar.gz
* ftp.cs.indiana.edu:/pub/scheme-repository/imp/slib2c3.tar.gz
Unpack SLIB (`tar xzf slib2c3.tar.gz' or `unzip -ao slib2c3.zip') in an
appropriate directory for your system; both `tar' and `unzip' will
create the directory `slib'.
Then create a file `require.scm' in the SCM "implementation-vicinity"
(this is the same directory as where the file `Init.scm' is installed).
`require.scm' should have the contents:
(define (library-vicinity) "/usr/local/lib/slib/")
(load (in-vicinity (library-vicinity) "require"))
where the pathname string `/usr/local/lib/slib/' is to be replaced by
the pathname into which you installed SLIB. Absolute pathnames are
recommended here; if you use a relative pathname, SLIB can get confused
when the working directory is changed (*note chmod: I/O-Extensions.).
The way to specify a relative pathname is to append it to the
implementation-vicinity, which is absolute:
(define library-vicinity
(let ((lv (string-append (implementation-vicinity) "../slib/")))
(lambda () lv)))
(load (in-vicinity (library-vicinity) "require"))
Alternatively, you can set the (shell) environment variable
`SCHEME_LIBRARY_PATH' to the pathname of the SLIB directory (*note
SCHEME_LIBRARY_PATH: SCM Variables.). If set, the environment variable
overrides `require.scm'. Again, absolute pathnames are recommended.
MAKING SCM
The SCM distribution has "Makefile" which contains rules for making
"scmlit", a "bare-bones" version of SCM sufficient for running
`build.scm'. `build.scm' is used to compile (or create scripts to
compile) full featured versions.
Makefiles are not portable to the majority of platforms. If
`Makefile' works for you, good; If not, I don't want to hear about it.
If you need to compile SCM without build.scm, there are several ways to
proceed:
* Use SCM on a different platform to run `build.scm' to create a
script to build SCM;
* Use another implementation of Scheme to run `build.scm' to create a
script to build SCM;
* Create your own script or `Makefile'.
* Buy a SCM executable from jaffer@ai.mit.edu. See the end of
`ANNOUNCE' in the distribution for details.
* Use scmconfig (From: bos@scrg.cs.tcd.ie):
Build and install scripts using GNU "autoconf" are available from
`scmconfig4e3.tar.gz' in the distribution directories. See
`README.unix' in `scmconfig4e3.tar.gz' for further instructions.
*Note:* The last release of scmconfig (4e3) was on March 20, 1996.
I am moving it to the OLD subdirectory until someone submits an
update.
Making SCM with Think C 4.0 or 4.1
Note: These instructions need to be uptdated for scm5c3. If Think C
can be called using system(), then SCM can be built using build.scm.
Edit Scmfig.H to set desired options and IMPLINIT.
from Yasuaki Honda // honda@csl.SONY.co.jp:
Make a project and add source files repl.c, time.c, scm.c, subr.c,
sys.c, eval.c, scl.c, sc2.c, and unif.c to it.
Add libraries MacTraps, unix, ANSI to the project.
The project should be segmented in the following way:
----------
repl.c
scm.c
subr.c
sys.c
sc2.c
unif.c
time.c
----------
MacTraps
unix
----------
ANSI
----------
eval.c
----------
scl.c
----------
Choose 'Set Project Type' from 'Project' menu.
Choose Application from radio buttons.
Set Partition size to 600K. (The default 384K is not enough).
EDITING SCHEME CODE
Gnu Emacs:
Editing of Scheme code is supported by emacs. Buffers holding
files ending in .scm are automatically put into scheme-mode.
EMACS for MS-DOS and MS-Windows systems is available (free) from:
* http://simtel.coast.net/SimTel/gnu/demacs.html
If your Emacs can run a process in a buffer you can use the Emacs
command `M-x run-scheme' with SCM. Otherwise, use the emacs
command `M-x suspend-emacs'; or see "other systems" below.
Epsilon (MS-DOS):
There is lisp (and scheme) mode available by use of the package
`LISP.E'. It offers several different indentation formats. With
this package, buffers holding files ending in `.L', `.LSP', `.S',
and `.SCM' (my modification) are automatically put into lisp-mode.
It is possible to run a process in a buffer under Epsilon. With
Epsilon 5.0 the command line options `-e512 -m0' are neccessary to
manage RAM properly. It has been reported that when compiling SCM
with Turbo C, you need to `#define NOSETBUF' for proper operation
in a process buffer with Epsilon 5.0.
One can also call out to an editor from SCM if RAM is at a
premium; See "under other systems" below.
other systems:
Define the environment variable `EDITOR' to be the name of the
editing program you use. The SCM procedure `(ed arg1 ...)' will
invoke your editor and return to SCM when you exit the editor. The
following definition is convenient:
(define (e) (ed "work.scm") (load "work.scm"))
Typing `(e)' will invoke the editor with the file of interest.
After editing, the modified file will be loaded.
TROUBLE SHOOTING
Reported problems and solutions are grouped under "Compiling",
"Linking", "Running", and "Testing". If you don't find your problem
listed here, you can send a bug report to <jaffer@ai.mit.edu>. The
bug report should include:
* The version of SCM (printed when SCM is invoked with no arguments).
* The type of computer you are using.
* The name and version of your computer's operating system.
* The values of the environment variables SCM_INIT_PATH and
SCHEME_LIBRARY_PATH.
* The name and version of your C compiler.
* If you are using an executable from a distribution, the name,
vendor, and date of that distribution. In this case,
corresponding with the vendor is recommended.
Compiling:
FILE ERROR or WARNING HOW TO FIX
*.c include file not found Correct status of
STDC_HEADERS
fix #include statement
or add #define for
system type to scmfig.h
scm.c assignment between incompatible types change SIGRETTYPE in scm.c
time.c CLK_TCK redefined incompatablility
between <stdlib.h> and
<sys/types.h>. remove
STDC_HEADERS in scmfig.h
edit <sys/types.h> to
remove incompatability.
sys.c statement not reached ignore
constant in conditional expression ignore
sys.c: `???' undeclared, outside of functions #undef STDC_HEADERS
in scmfig.h
scl.c syntax error define system type in
scmfig.h and scl.c (softtype)
Linking:
ERROR or WARNING HOW TO FIX
_sin etc. missing. uncomment LIBS in makefile
Running:
PROBLEM HOW TO FIX
Opening message and then machine Change memory model option
crashes. to C compiler (or makefile).
Make sure sizet definition is
correct in scmfig.h
Reduce size of HEAP_SEG_SIZE
in setjump.h
Input hangs #define NOSETBUF
ERROR: heap: need larger initial Need to increase the initial
heap allocation using
-a<kbytes> or INIT_HEAP_SIZE.
ERROR: Could not allocate ... Check sizet definition.
Get more memory.
Don't try to run as subproccess
... in scmfig.h and recompile scm Do it and recompile files.
ERROR: Init.scm not found Assign correct IMPLINIT in
makefile or scmfig.h or
define environment variable
SCM_INIT_PATH to be the full
pathname of Init.scm (see
INSTALLATION instructions).
WARNING: require.scm not found define environment variable
SCHEME_LIBRARY_PATH to be the
full pathname of the scheme
library SLIB or change
library-vicinity in Init.scm
to point to library or remove.
See section SLIB above.
Make sure library-vicinity has
a trailing file separator
(like / or \).
Testing: (load "r4rstest.scm") or (load "pi.scm") (pi 100 5)
Runs some and then machine crashes. See above under machine
crashes.
Runs some and then ERROR: ... Remove optimization option
(after a GC has happened) to C compiler and recompile.
#define SHORT_ALIGN in scmfig.h
Some symbol names print incorrectly. Change memory model option
to C compiler (or makefile).
Check that HEAP_SEG_SIZE fits
within sizet.
Increase size of HEAP_SEG_SIZE
(or INIT_HEAP_SIZE if it is
smaller than HEAP_SEG_SIZE).
ERROR: Rogue pointer in Heap. See above under machine
crashes.
Newlines don't appear correctly in Check file mode (define OPEN_...
output files. in Init.scm
Spaces or control characters appear Check character defines in
in symbol names scmfig.h
Negative numbers turn positive. Check SRS in scmfig.h
VMS: Couldn't unwind stack #define CHEAP_CONTIUATIONS
VAX: botched longjmp in scmfig.h
Sparc(SUN-4) heap is growing out of control:
You are experiencing a GC problem peculiar to the Sparc. The
problem is that SCM doesn't know how to clear register
windows. Every location which is not reused still gets marked
at GC time. This causes lots of stuff which should be
collected to not be. This will be a problem with any
"conservative" GC until we find what instruction will clear
the register windows. This problem is exacerbated by using
lots of call-with-current-continuations.
|