58 lines
2.6 KiB
TeX
58 lines
2.6 KiB
TeX
%cltl.sty
|
|
%SLaTeX Version 1.99
|
|
%Style file to be used in (La)TeX when using SLaTeX for Common Lisp
|
|
%(c) Dorai Sitaram, December 1991, Rice University
|
|
|
|
\input slatex.sty
|
|
|
|
% The database in this file was generated from CL as follows:
|
|
|
|
% (defun canonical-special-form-p (x)
|
|
% (and (special-form-p x) (not (macro-function x))))
|
|
|
|
% (defun gather (pred)
|
|
% (sort (let ((x '()))
|
|
% (do-all-symbols (y)
|
|
% (if (funcall pred y) (setq x (cons y x))))
|
|
% x)
|
|
% #'string< :key #'symbol-name))
|
|
|
|
% A rather old (1987) version of Ibuki CL was used. So you may want
|
|
% to regenerate the keywords using the above functions in _your_ CL.
|
|
|
|
% CL sp. forms, i.e., (gather #'canonical-special-form-p)
|
|
|
|
\setkeyword{block catch compiler-let declare eval-when flet function
|
|
go if labels let let* macrolet multiple-value-call
|
|
multiple-value-prog1 progn progv quote return-from setq tagbody the
|
|
throw unwind-protect}
|
|
|
|
% CL macros, i.e., (gather #'macro-function)
|
|
|
|
\setkeyword{and assert compiler::base-used case ccase check-type
|
|
compiler::ck-spec compiler::ck-vl clines compiler::cmpck
|
|
system::coerce-to-package conditions::conc-name cond ctypecase decf
|
|
debugger::def-command defcfun defconstant defentry
|
|
system:define-compiler-macro conditions:define-condition
|
|
system:define-inline-function define-modify-macro define-setf-method
|
|
define-user-stream-type defla defmacro defparameter defsetf defstruct
|
|
deftype defun debugger::defun-property defvar do do* do-all-symbols
|
|
do-external-symbols do-symbols system::docdoc system::docfun
|
|
system::doctype system::docvar dolist compiler::dolist*
|
|
compiler::dolist** dotimes compiler::dotimes* compiler::dotimes**
|
|
ecase etypecase compiler::get-output-pathname conditions:handler-bind
|
|
conditions:handler-case system::if-error conditions:ignore-errors incf
|
|
system::inspect-print system::inspect-recursively locally loop
|
|
conditions::make-function multiple-value-bind multiple-value-list
|
|
multiple-value-setq compiler::next-cfun compiler::next-cmacro
|
|
compiler::next-cvar compiler::next-label compiler::next-label* or
|
|
conditions::parent-type pop prog prog* prog1 prog2 psetf psetq push
|
|
pushnew remf conditions::report-function conditions::resolve-function
|
|
conditions:restart-bind conditions:restart-case return rotatef
|
|
compiler::safe-compile setf shiftf conditions::slots step time trace
|
|
typecase unless untrace when debugger::with-debugger-environment
|
|
with-input-from-string conditions::with-keyword-pairs with-open-file
|
|
with-open-stream with-output-to-string conditions:with-simple-restart
|
|
compiler::wt compiler::wt-go compiler::wt-h compiler::wt-label
|
|
compiler::wt-nl compiler::wt-nl1}
|