MIT Scheme

MIT/GNU Scheme running under MacOSX
Type `^C' (control-C) followed by `H' to obtain information about interrupts.

Copyright (C) 2010 Massachusetts Institute of Technology
This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

Image saved on Tuesday March 9, 2010 at 6:59:21 PM
  Release 9.0.1 || Microcode 15.1 || Runtime 15.7 || SF 4.41 || LIAR/x86-64 4.118 || Edwin 3.116

1 ]=> (set-working-directory-pathname!  "/Users/swhite/Projects/Thomas/kits/MIT/src")

;Value 13: #[pathname 13 "/Users/swhite/Projects/Thomas/kits/MIT/src/"]

1 ]=> (load "load-thomas")

;Loading "load-thomas.scm"...
;  Loading "implementation-specific"... done
;  Loading "common.scm"...
;    Loading "support.scm"... done
;  ... done
;  Loading "comp.scm"...
;    Loading "comp-util.scm"... done
;    Loading "compiler.scm"... done
;    Loading "comp-method.scm"... done
;    Loading "comp-class.scm"... done
;    Loading "comp-sf.scm"... done
;    Loading "comp-exc.scm"... done
;  ... done
;  Loading "runtime.scm"...
;    Loading "class.scm"... done
;    Loading "generic.scm"... done
;    Loading "class-structure.scm"... done
;    Loading "runtime-top.scm"... done
;    Loading "runtime-internal.scm"... done
;    Loading "runtime-methods.scm"... done
;    Loading "runtime-functions.scm"... done
;    Loading "runtime-bitstrings.scm"... done
;    Loading "runtime-collections.scm"... done
;    Loading "runtime-collections-iterate.scm"... done
;    Loading "runtime-collections-generic1.scm"... done
;    Loading "runtime-collections-generic2.scm"... done
;    Loading "runtime-collections-array.scm"... done
;    Loading "runtime-collections-deque.scm"... done
;    Loading "runtime-collections-list.scm"... done
;    Loading "runtime-collections-range.scm"... done
;    Loading "runtime-collections-string.scm"... done
;    Loading "runtime-collections-table.scm"... done
;    Loading "runtime-collections-vector.scm"... done
;    Loading "runtime-exceptions.scm"... done
;  ... done
;  Loading "rep.scm"...
Apply thomas-rep to start a Thomas read-eval-print loop.
;  ... done
;... done
;Unspecified return value

1 ]=> (thomas-rep)

Entering Thomas
(There is now 1 defined names available.)
;Package: (thomas)

2 ?