47b9d6028e
Test case is: ,config (define-structure foo (export) (open scheme finite-types) (optimize auto-integrate) (begin (define-enumerated-type afs-permission :afs-permission afs-permission? the-afs-permissions afs-permission-name afs-permission-index (read)))) > ,config (define-structure foo (export) (open scheme finite-types) (optimize auto-integrate) (begin (define-enumerated-type afs-permission :afs-permission afs-permission? the-afs-permissions afs-permission-name afs-permission-index (read)))) > ,in foo the-afs-permissions Load structure foo (y/n)? y [foo Analyzing... Calls will be compiled in line: (#{Generated maker 1408} afs-permission-index afs-permission-name) ] '#(#{Afs-permission #{Generated name 1408}}) > ,inspect [0] '#{Afs-permission #{Generated name 1408}} inspect: 0 '#{Afs-permission #{Generated name 1408}} [0: name] '#{Generated name 1408} [1: index] '#{Generated index 1408} |
||
---|---|---|
build | ||
c | ||
cig | ||
doc | ||
emacs | ||
ps-compiler | ||
scheme | ||
scsh | ||
.gitignore | ||
COPYING | ||
CVS_README | ||
INSTALL | ||
Makefile.in | ||
README | ||
README.s48 | ||
RELEASE | ||
TODO | ||
Thanks | ||
autogen.sh | ||
config.guess | ||
config.sub | ||
configure.in | ||
gdbinit | ||
install-sh | ||
scsh-config.in |
README
-*- Mode: Text; -*- Copyright (c) 1994 Brian D. Carlstrom See file COPYING for copying information. Please report bugs to scsh-bugs@zurich.ai.mit.edu, and include the version number in your message. Installation instructions in file INSTALL. A scsh manual is in directory doc/scsh-manual/. A scsh paper is in directory doc/scsh-paper/. A scsh quick reference is in file doc/cheat.txt. Send mail to scsh-request@zurich.ai.mit.edu to be put on a mailing list for announcements, discussion, bug reports, and bug fixes.