Name:
Anonymous
2007-10-27 16:47
; The Lisp defined in McCarthy's 1960 paper, translated into CL.
; Assumes only &allow-other-keys, &aux, &body, &environment, &key, &optional, &rest, &whole, *, **, ***, *break-on-signals*, *compile-file-pathname*, *compile-file-truename*, *compile-print*, *compile-verbose*, *debug-io*, *debugger-hook*, *default-pathname-defaults*, *error-output*, *features*, *gensym-counter*, *load-pathname*, *load-print*, *load-truename*, *load-verbose*, *macroexpand-hook*, *modules*, *package*, *print-array*, *print-base*, *print-case*, *print-circle*, *print-escape*, *print-gensym*, *print-length*, *print-level*, *print-lines*, *print-miser-width*, *print-pprint-dispatch*, *print-pretty*, *print-radix*, *print-readably*, *print-right-margin*, *query-io*, *random-state*, *read-base*, *read-default-float-format*, *read-eval*, *read-suppress*, *readtable*, *standard-input*, *standard-output*, *terminal-io*, *trace-output*, +, ++, +++, -, /, //, ///, /=, 1+, 1-, <, <=, =, >, >=, abort, abs, acons, acos, acosh, add-method, adjoin, adjust-array, adjustable-array-p, allocate-instance, alpha-char-p, alphanumericp, and, append, apply, apropos, apropos-list, aref, arithmetic-error, arithmetic-error-operands, arithmetic-error-operation, array, array-dimension, array-dimension-limit, array-dimensions, array-displacement, array-element-type, array-has-fill-pointer-p, array-in-bounds-p, array-rank, array-rank-limit, array-row-major-index, array-total-size, array-total-size-limit, arrayp, ash, asin, asinh, assert, assoc, assoc-if, assoc-if-not, atan, atanh, atom, base-char, base-string, bignum, bit, bit-and, bit-andc1, bit-andc2, bit-eqv, bit-ior, bit-nand, bit-nor, bit-not, bit-orc1, bit-orc2, bit-vector, bit-vector-p, bit-xor, block, boole, … translate-logical-pathname, translate-pathname, tree-equal, truename, truncate, two-way-stream, two-way-stream-input-stream, two-way-stream-output-stream, type, type-error, type-error-datum, type-error-expected-type, type-of, typecase, typep, unbound-slot, unbound-slot-instance, unbound-variable, undefined-function, unexport, unintern, union, unless, unread-char, unsigned-byte, untrace, unuse-package, unwind-protect, update-instance-for-different-class, update-instance-for-redefined-class, upgraded-array-element-type, upgraded-complex-part-type, upper-case-p, use-package, use-value, user-homedir-pathname, values, values-list, variable, vector, vector-pop, vector-push, vector-push-extend, vectorp, warn, warning, when, wild-pathname-p, with-accessors, with-compilation-unit, with-condition-restarts, with-hash-table-iterator, with-input-from-string, with-open-file, with-open-stream, with-output-to-string, with-package-iterator, with-simple-restart, with-slots, with-standard-io-syntax, write, write-byte, write-char, write-line, write-sequence, write-string, write-to-string, y-or-n-p, yes-or-no-p, zerop.