;;;-*- Mode: LISP; Syntax: Zetalisp; Package: ZL-USER-*- "(c) Copyright 1986, 1987, 1988 Xerox Corporation. All rights reserved. Subject to the following conditions, permission is granted to use and copy this software and to prepare derivative works: Such use, copying or preparation of derivative works must be for non-commercial research or educational purposes; each copy or derivative work must include this copyright notice in full; a copy of each completed derivative work must be returned to: DEKLEER@XEROX.COM (Arpanet) or Johan de Kleer, Xerox PARC, 3333 Coyote Hill Road, Palo Alto, CA 94304. This software is made available AS IS, and Xerox Corporation makes no warranty about the software or its performance." (package-declare TMS LISP 1000 nil) (DEFSYSTEM TMS (:DEFAULT-PACKAGE TMS :SHORT-NAME "TMS" :DEFAULT-PATHNAME "ATMS:ATMS;" :DEFAULT-DESTINATION-PATHNAME "ATMS:ATMS;BINARY;" :PATCHABLE NIL) (:module walk "walk") (:module defs "defs") (:module body ("user" "replay" "vector" "blists" "batms3" "hash" "tms7" "interp" "cons3" "nml" "tree" "label" "breadth" "allocate" "blots" "blits")) (:module debug ("examples" "diags")) (:serial walk defs body debug))