From d18f824d73322fa770cdafa7f186f3260e3510ca Mon Sep 17 00:00:00 2001 From: tailor Date: Thu, 12 Jun 2008 20:49:07 +0200 Subject: [PATCH] minor changes --- clqr-arrays.tex | 3 + clqr-clos.tex | 4 ++ clqr-input-output.tex | 114 ++++++++++++++++++-------------------- clqr-symbols-and-packages.tex | 10 ++-- clqr-system-types-and-classes.tex | 37 +++++++------ clqr.tex | 10 ++-- upload.sh | 2 +- 7 files changed, 90 insertions(+), 90 deletions(-) diff --git a/clqr-arrays.tex b/clqr-arrays.tex index 721b2f6..904e096 100644 --- a/clqr-arrays.tex +++ b/clqr-arrays.tex @@ -150,6 +150,9 @@ s.\ \ref{section:Sequences}. Return \retval{element of \VAR{vector}} its fillpointer points to after decrementation. + \IT{(\FU*{FILL-POINTER} \VAR{vector})} + Return \retval{fill pointer} of \VAR{vector}. \kwd{setf}able. + \end{LIST} diff --git a/clqr-clos.tex b/clqr-clos.tex index e7bc4e4..b0fea48 100644 --- a/clqr-clos.tex +++ b/clqr-clos.tex @@ -44,6 +44,10 @@ \IT{(\kwd*{CLASS-OF} \VAR{foo})} \retval{Class} \VAR{foo} is an instance of. + \IT{(\FU*{FIND-CLASS} \VAR{symbol} \OP{\VAR{errorp}\DF{\T} + \Op{\VAR{environment}}})} + Return \retval{class object} named \VAR{symbol}. \kwd{setf}able. + \IT{(\kwd*{MAKE-INSTANCES-OBSOLETE} \VAR{class})} Update instances of \VAR{class}. diff --git a/clqr-input-output.tex b/clqr-input-output.tex index 68e37ee..0f12851 100644 --- a/clqr-input-output.tex +++ b/clqr-input-output.tex @@ -735,22 +735,6 @@ \begin{LIST}{1cm} - \IT{(\FU*{PATHNAME} \VAR{path})} - Return \retval{pathname}. - - \IT{\V*{*default-pathname-defaults*}} - Pathname to use if one is needed but none supplied. - - \IT{(\xorGOO{\FU*{PATHNAME-HOST}\\ - \FU*{PATHNAME-DEVICE}\\ - \FU*{PATHNAME-DIRECTORY}\\ - \FU*{PATHNAME-NAME}\\ - \FU*{PATHNAME-TYPE}\\ - \FU*{PATHNAME-VERSION}}{\}} - \VAR{path} - \Op{\xorGOO{\kwd{:local}\\\kwd{:common}}{\}}\DF{\kwd{:local}}})} - Return \retval{pathname component}. - \IT{(\FU*{MAKE-PATHNAME} \orGOO{\kwd{:host} \VAR{ host}\\ \kwd{:device} \VAR{ dev}\\ @@ -766,6 +750,12 @@ \Op{\VAR{default-pathname}\DF{\V{*default-pathname-defaults*}}}\XOR\Op{\VAR{version}\DF{\kwd{:newest}}})} Return \retval{\VAR{pathname}} after filling in missing parts from defaults. + \IT{\V*{*default-pathname-defaults*}} + Pathname to use if one is needed but none supplied. + + \IT{(\FU*{PATHNAME} \VAR{path})} + \retval{Pathname} of \VAR{path}. + \IT{(\FU*{ENOUGH-NAMESTRING} \VAR{path} \Op{\VAR{root-path}\DF{\V{*default-pathname-defaults*}}})} Return \retval{minimal path string} to sufficiently describe path relative to \VAR{root-path.} @@ -785,25 +775,40 @@ Return \retval{pathname} and \retval{position} converted from string, pathname, or stream \VAR{foo}. - \IT{(\FU*{PROBE-FILE} \VAR{path})} - Return \retval{canonical file name} or \retval{\NIL} if file does - not exist. + \IT{(\xorGOO{\FU*{PATHNAME-HOST}\\ + \FU*{PATHNAME-DEVICE}\\ + \FU*{PATHNAME-DIRECTORY}\\ + \FU*{PATHNAME-NAME}\\ + \FU*{PATHNAME-TYPE}\\ + \FU*{PATHNAME-VERSION}}{\}} + \VAR{path} + \Op{\xorGOO{\kwd{:local}\\\kwd{:common}}{\}}\DF{\kwd{:local}}})} + Return \retval{pathname component}. - \IT{(\FU*{DELETE-FILE} \VAR{path})} - Delete file \VAR{path}, return \retval{\T}. + \IT{(\FU*{LOGICAL-PATHNAME} \VAR{path})} + \retval{Logical name} of \VAR{path}. - \IT{(\FU*{RENAME-FILE} \VAR{foo} \VAR{bar})} - Rename file \VAR{foo} to \VAR{bar}. Unspecified parts of path - \VAR{bar} default to those of \VAR{foo}. Return \retval{new - pathname}, \retval{old file name}, and \retval{new file name}. + \IT{(\FU*{TRANSLATE-PATHNAME} \VAR{path-a} \VAR{path-b} + \VAR{path-c})} + Translate \VAR{path-a} from wildcard \VAR{path-b} into wildcard + \VAR{path-c}. Return \retval{new path}. - \IT{(\FU*{DIRECTORY} \VAR{path})} - Return \retval{list of pathnames}. + \IT{(\FU*{LOGICAL-PATHNAME-TRANSLATIONS} \VAR{host})} + \retval{\VAR{host}'s list of translations}. - \IT{(\FU*{ENSURE-DIRECTORIES-EXIST} \VAR{path} \Op{\kwd{:verbose} - \VAR{bool}})} - Create parts of \retval{path} if necessary. Second return value is - \retval{\T} if something was created. + \IT{(\FU*{LOAD-LOGICAL-PATHNAME-TRANSLATIONS} \VAR{host})} + Load \VAR{host}'s translations. Return \retval{\NIL} if already + loded, return \retval{\T} if successful. + + \IT{(\FU*{TRANSLATE-LOGICAL-PATHNAME} \VAR{path})} + Physical \retval{pathname} of \VAR{path}. + + \IT{(\FU*{TRUENAME} \VAR{file})} + \retval{Canonical name} of \VAR{file}. + + \IT{(\FU*{PROBE-FILE} \VAR{path})} + Return \retval{canonical file name} or \retval{\NIL} if file does + not exist. \IT{(\FU*{FILE-WRITE-DATE} \VAR{path})} Return \retval{time} at which file was last written. @@ -818,44 +823,33 @@ Return \retval{position within stream}, or set it to \retval{\VAR{position}} and return \retval{\T} on success. - \IT{(\SF*{WITH-OPEN-FILE} (\VAR{stream path} - \OPn{\VAR{option-form}}) \OPn{(\kwd{declare} \OPn{\VAR{decl}})} - \OPn{\VAR{form}})} - Use \FU*{OPEN} with arguments \VAR{option-form}s to temporarily - create \VAR{stream}, and return \retval{value of \VAR{form}s}. - \IT{(\FU*{FILE-STRING-LENGTH} \VAR{stream} \VAR{foo})} \retval{Length} \VAR{foo} would have in \VAR{stream}. - \IT{(\FU*{FILL-POINTER} \VAR{vector})} - Return \retval{fill pointer} of \VAR{vector}. \kwd{setf}able. - - \IT{(\FU*{LOGICAL-PATHNAME} \VAR{path})} - \retval{Logical name} of \VAR{path}. - - \IT{(\FU*{LOAD-LOGICAL-PATHNAME-TRANSLATIONS} \VAR{host})} - Load \VAR{host}'s translations. Return \retval{\NIL} if already - loded, return \retval{\T} if successful. + \IT{(\FU*{RENAME-FILE} \VAR{foo} \VAR{bar})} + Rename file \VAR{foo} to \VAR{bar}. Unspecified parts of path + \VAR{bar} default to those of \VAR{foo}. Return \retval{new + pathname}, \retval{old file name}, and \retval{new file name}. - \IT{(\FU*{LOGICAL-PATHNAME-TRANSLATIONS} \VAR{host})} - \retval{\VAR{host}'s list of translations}. + \IT{(\FU*{DELETE-FILE} \VAR{path})} + Delete file \VAR{path}, return \retval{\T}. - \IT{(\FU*{PATHNAME} \VAR{path})} - \retval{Pathname} of \VAR{path}. + \IT{(\FU*{DIRECTORY} \VAR{path})} + Return \retval{list of pathnames}. - \IT{(\FU*{TRANSLATE-LOGICAL-PATHNAME} \VAR{path})} - Physical \retval{pathname} of \VAR{path}. + \IT{(\FU*{ENSURE-DIRECTORIES-EXIST} \VAR{path} \Op{\kwd{:verbose} + \VAR{bool}})} + Create parts of \retval{path} if necessary. Second return value is + \retval{\T} if something was created. - \IT{(\FU*{TRANSLATE-PATHNAME} \VAR{path-a} \VAR{path-b} - \VAR{path-c})} - Translate \VAR{path-a} from wildcard \VAR{path-b} into wildcard - \VAR{path-c}. Return \retval{new path}. + \IT{(\SF*{WITH-OPEN-FILE} (\VAR{stream path} + \OPn{\VAR{option-form}}) \OPn{(\kwd{declare} \OPn{\VAR{decl}})} + \OPn{\VAR{form}})} + Use \FU*{OPEN} with arguments \VAR{option-form}s to temporarily + create \VAR{stream}, and return \retval{value of \VAR{form}s}. \IT{(\FU*{USER-HOMEDIR-PATHNAME} \Op{\VAR{host}})} - User's \retval{ home directory}. - - \IT{(\FU*{TRUENAME} \VAR{file})} - \retval{Canonical name} of \VAR{file}. + User's \retval{home directory}. \end{LIST} diff --git a/clqr-symbols-and-packages.tex b/clqr-symbols-and-packages.tex index 5295121..87db20d 100644 --- a/clqr-symbols-and-packages.tex +++ b/clqr-symbols-and-packages.tex @@ -3,8 +3,8 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \begin{LIST}{1cm} - \IT{\arrGOO{(\FU*{SYMBOLP} \VAR{foo})\\ - (\FU*{PACKAGEP} \VAR{foo})}{\}}} + \IT{\arrGOO{(\FU*{SYMBOLP} \VAR{ foo})\\ + (\FU*{PACKAGEP} \VAR{ foo})}{\}}} Return \retval{\T} if \VAR{foo} is of type \kwd{symbol} or \kwd{package}, resp. @@ -14,12 +14,12 @@ \IT{(\FU*{KEYWORDP} \VAR{foo})} \retval{\T} if \VAR{foo} is a keyword. - \IT{(\kwd*{T})} - Truth, or \V{*terminal-io*}. - \IT{\KWD*{:}\VAR{foo}} Keyword, evaluates to \retval{:\VAR{foo}} + \IT{(\kwd*{T})} + Truth, or \V{*terminal-io*}. + \IT{\Goo{(\CNS*{NIL})\XOR{\kwd*{()}}}} Falsehood, the empty list, \V{*standard-input*}, \V{*standard-output*}, or the global environment. diff --git a/clqr-system-types-and-classes.tex b/clqr-system-types-and-classes.tex index 813334e..b2cde36 100644 --- a/clqr-system-types-and-classes.tex +++ b/clqr-system-types-and-classes.tex @@ -117,6 +117,10 @@ \IT{(\kwd*{NIL})} The empty type, subtype of every type. + \IT{(\kwd*{T})} + Supertype of every type including \kwd{t}; or superclass of every + class except \kwd{t}. + \IT{(\FU*{TYPEP} \VAR{foo} \VAR{type} \Op{\VAR{environment}})} Return \retval{\T} if \VAR{foo} is of \VAR{type}. @@ -138,10 +142,24 @@ Return \retval{value of a \VAR{form}} if \VAR{foo} is of this \VAR{type}. Signal correctable/non-correctable error, resp. + \IT{(\FU*{TYPE-OF} \VAR{foo})} + \retval{Type of \VAR{foo}}. + \IT{(\kwd*{CHECK-TYPE} \VAR{place} \VAR{type})} Return \retval{\NIL} and signal correctable error if \VAR{place} is not of {type}. + \IT{(\FU*{STREAM-ELEMENT-TYPE} \VAR{stream})} + Return \retval{type} of \VAR{stream} objects. + + \IT{(\FU*{ARRAY-ELEMENT-TYPE} \VAR{array})} + Element \retval{type} \VAR{array} holds. + + \IT{(\FU*{UPGRADED-ARRAY-ELEMENT-TYPE} \VAR{type} + \Op{\VAR{environment}})} + \retval{Element type} of most specialized array capable of holding + elements of \VAR{type}. + \IT{(\SF*{DEFTYPE} \VAR{name} \OPn{\VAR{arg}} \OPn{(\kwd{declare} \OPn{\VAR{decl}})} \Op{\VAR{documentation}} \OPn{\VAR{form}})} @@ -151,12 +169,6 @@ Return \retval{values} of \VAR{form} which are specified to be of \VAR{type}. - \IT{(\FU*{FIND-CLASS} \VAR{symbol} \OP{\VAR{errorp}\DF{\T} - \Op{\VAR{environment}}})} - Return \retval{class object} named \VAR{symbol}. \kwd{setf}able. - - \IT{(\FU*{TYPE-OF} \VAR{foo})} \retval{Type of \VAR{foo}}. - \IT{(\kwd*{VALUES} \OPn{\VAR{type}} \OP{\OPn{\VAR{type}} \Op{\VAR{other-args}}})} Type specifier for multiple values. @@ -166,17 +178,6 @@ \IT{(\kwd*{MOD} \VAR{n})} Type specifier for all integers $$FTPLOG +ftp -ni $REMOTE <<_FTP>>$FTPLOG quote USER $USER quote PASS $PASSWORD bin -- 2.11.4.GIT