Trailing-Edge
-
PDP-10 Archives
-
decuslib10-04
-
43,50322/compat.lsp
There are no other files named compat.lsp in the archive.
(DEFPROP COMPATFNS
(COMPATFNS (PUTPROP (QUOTE AND#) (GET (QUOTE AND) (QUOTE FSUBR)) (QUOTE FSUBR))
(PUTPROP (QUOTE OR#) (GET (QUOTE OR) (QUOTE FSUBR)) (QUOTE FSUBR))
(PUTPROP (QUOTE MEMQ#) (GET (QUOTE MEMQ) (QUOTE SUBR)) (QUOTE SUBR))
(PUTPROP (QUOTE MEMBER#) (GET (QUOTE MEMBER) (QUOTE SUBR)) (QUOTE SUBR)))
VALUE)
(PUTPROP (QUOTE AND#) (GET (QUOTE AND) (QUOTE FSUBR)) (QUOTE FSUBR))
(PUTPROP (QUOTE OR#) (GET (QUOTE OR) (QUOTE FSUBR)) (QUOTE FSUBR))
(PUTPROP (QUOTE MEMQ#) (GET (QUOTE MEMQ) (QUOTE SUBR)) (QUOTE SUBR))
(PUTPROP (QUOTE MEMBER#) (GET (QUOTE MEMBER) (QUOTE SUBR)) (QUOTE SUBR))