1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
% This file is part of Oaklisp.
%
% This program is free software; you can redistribute it and/or modify
% it under the terms of the GNU General Public License as published by
% the Free Software Foundation; either version 2 of the License, or
% (at your option) any later version.
%
% This program is distributed in the hope that it will be useful,
% but WITHOUT ANY WARRANTY; without even the implied warranty of
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
% GNU General Public License for more details.
%
% The GNU GPL is available at http://www.gnu.org/licenses/gpl.html
% or from the Free Software Foundation, 59 Temple Place - Suite 330,
% Boston, MA 02111-1307, USA
\bibliographystyle{plainnat}
\newcommand{\df}[1]{{\tt#1}\index{{\tt#1}}}
\newcommand{\dffl}[1]{{\tt(fluid #1)}\index{{\tt#1} ! fluid}}
\newcommand{\dfcoer}[1]{{\tt(coercer #1)}\index{{\tt#1} ! coercer}}
\newcommand{\dfsw}[1]{{\tt#1}\index{{\tt#1} ! switch}}
\newenvironment{docenv}{\nopagebreak\vspace{-4ex}\nopagebreak
\begin{quotation}\noindent}{\end{quotation}}
\newcommand{\doc}[1]{\nopagebreak\vspace{-4ex}\nopagebreak
\begin{quotation}\noindent#1\end{quotation}}
\newcommand{\discbar}{\rule{3in}{.2mm}}
\newenvironment{discussenv}{\begin{quote}\begin{quote}\discbar\par}{\par\discbar\end{quote}\end{quote}}
\newcommand{\discuss}[1]{\begin{discussenv}#1\end{discussenv}}
\newcommand{\macdef}[2]{{\tt#1}\ \meq\ {\tt#2}\newline}
\newcommand{\evto}[2]{{\tt#1}\ \ra\ {\tt#2}}
\newcommand{\header}[2]{\par\noindent\hspace{\leftmargini
}{#1}\hfill\emph{#2}\hspace*{\leftmargini}\newline}
\newcommand{\heady}[3]{\index{{\tt#1} ! #3}\header{{\tt#1\ \emph{#2}}}{#3}}
\newcommand{\headyy}[3]{\index{{\tt#1} ! #3}\header{{\tt(#1\ \emph{#2}\tt)}}{#3}}
\newcommand{\sform}[2]{\headyy{#1}{#2}{Special Form}}
\newcommand{\op}[2]{\headyy{#1}{#2}{Operation}}
\newcommand{\so}[2]{\headyy{#1}{#2}{Settable Operation}}
\newcommand{\lo}[2]{\headyy{#1}{#2}{Locatable Operation}}
\newcommand{\mc}[2]{\headyy{#1}{#2}{Macro}}
\newcommand{\fn}[2]{\headyy{#1}{#2}{Function}}
\newcommand{\pr}[2]{\headyy{#1}{#2}{Predicate}}
\newcommand{\spred}[2]{\headyy{#1}{#2}{Settable Predicate}}
\newcommand{\gv}[1]{\heady{#1}{}{Global Variable}}
\newcommand{\ob}[1]{\heady{#1}{}{Object}}
\newcommand{\ty}[1]{\heady{#1}{}{Type}}
\newcommand{\cty}[1]{\heady{#1}{}{Coercable Type}}
\newcommand{\fv}[1]{\index{{\tt#1} ! Fluid Variable}\header{\tt (fluid
#1)}{Fluid Variable}}
\newcommand{\makin}[2]{\index{{\tt#1} ! Making}\header{\tt (make #1
\emph{#2}\tt)}{Operation}}
\newcommand{\setter}[3]{\index{{\tt#1} ! Setter}\header{\tt(set! (#1
\emph{#2}\tt) \emph{#3}\tt)}{Operation}}
\newcommand{\coercer}[2]{\index{{\tt#1} ! Coercer}\header{\tt((coercer
#1) \emph{#2}\tt)}{Coarcable Type}}
\newcommand{\oop}[1]{\index{{\tt#1} ! Operation}\header{\tt(#1)}{Operation}}
\newcommand{\ra}{$\Rightarrow$}
\newcommand{\meq}{$\equiv$}
\newcommand{\upar}{$\uparrow$}
\newcommand{\dt}{{\tt{.}~}}
\newcommand{\lpar}{{\tt(}}
\newcommand{\rpar}{{\tt)}}
% % These give ^ and _. Numbers for other characters are in the font
% % tables at the back of the texbook.
% \newcommand{\h}{\char'136\relax}
% \newcommand{\w}{\char'137\relax}
\newcommand{\bang}[0]{\texttt{!}}
\newcommand{\ie}{\emph{i.e.}}
|
