From rschlatte at common-lisp.net Sat Dec 1 17:50:50 2012 From: rschlatte at common-lisp.net (rschlatte at common-lisp.net) Date: Sat, 01 Dec 2012 09:50:50 -0800 Subject: [armedbear-cvs] r14262 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: rschlatte Date: Sat Dec 1 09:50:49 2012 New Revision: 14262 Log: Fix (describe x 'function) for non-fbound x - fixes #272 Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/clos.lisp Wed Nov 28 10:48:10 2012 (r14261) +++ trunk/abcl/src/org/armedbear/lisp/clos.lisp Sat Dec 1 09:50:49 2012 (r14262) @@ -3340,12 +3340,12 @@ (%set-documentation x doc-type new-value)) (defmethod documentation ((x symbol) (doc-type (eql 'function))) - (if (typep (fdefinition x) 'generic-function) + (if (and (fboundp x) (typep (fdefinition x) 'generic-function)) (documentation (fdefinition x) doc-type) (%documentation x doc-type))) (defmethod (setf documentation) (new-value (x symbol) (doc-type (eql 'function))) - (if (typep (fdefinition x) 'generic-function) + (if (and (fboundp x) (typep (fdefinition x) 'generic-function)) (setf (documentation (fdefinition x) 'function) new-value) (%set-documentation x 'function new-value))) From mevenson at common-lisp.net Sat Dec 1 19:35:37 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 11:35:37 -0800 Subject: [armedbear-cvs] r14263 - branches/1.1.x Message-ID: Author: mevenson Date: Sat Dec 1 11:35:26 2012 New Revision: 14263 Log: Branch abcl-1.1.0. Added: branches/1.1.x/ - copied from r14262, trunk/abcl/ From mevenson at common-lisp.net Sat Dec 1 19:42:02 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 11:42:02 -0800 Subject: [armedbear-cvs] r14264 - in trunk/abcl: . doc/manual src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sat Dec 1 11:40:47 2012 New Revision: 14264 Log: Bump trunk to abcl-1.2-dev Modified: trunk/abcl/CHANGES trunk/abcl/MANUAL trunk/abcl/README trunk/abcl/abcl.rdf trunk/abcl/doc/manual/abcl.tex trunk/abcl/src/org/armedbear/lisp/Version.java Modified: trunk/abcl/CHANGES ============================================================================== --- trunk/abcl/CHANGES Sat Dec 1 11:35:26 2012 (r14263) +++ trunk/abcl/CHANGES Sat Dec 1 11:40:47 2012 (r14264) @@ -1,3 +1,9 @@ +Version 1.2.0 +============= +svn.uri=:"http//common-lisp.net/project/armedbear/svn/trunk/abcl/" +(unreleased) + + Version 1.1.0 ============= svn.uri=:"http//common-lisp.net/project/armedbear/svn/trunk/abcl/" Modified: trunk/abcl/MANUAL ============================================================================== --- trunk/abcl/MANUAL Sat Dec 1 11:35:26 2012 (r14263) +++ trunk/abcl/MANUAL Sat Dec 1 11:40:47 2012 (r14264) @@ -4,4 +4,4 @@ solicits patches to improve the manual. Mark -October 2011 +December 2012 Modified: trunk/abcl/README ============================================================================== --- trunk/abcl/README Sat Dec 1 11:35:26 2012 (r14263) +++ trunk/abcl/README Sat Dec 1 11:40:47 2012 (r14264) @@ -186,7 +186,7 @@ ### Tests -ABCL 1.1.0-dev now fails only 1[4-6] out of 21708 total tests in the ANSI CL +ABCL 1.2.0-dev now fails only 1[2-4] out of 21708 total tests in the ANSI CL test suite (derived from the tests originally written for GCL). Maxima's test suite runs without failures. @@ -219,5 +219,5 @@ Alessio Stalla Ville Voutilainen -August 2012 +December 2012 Modified: trunk/abcl/abcl.rdf ============================================================================== --- trunk/abcl/abcl.rdf Sat Dec 1 11:35:26 2012 (r14263) +++ trunk/abcl/abcl.rdf Sat Dec 1 11:40:47 2012 (r14264) @@ -10,7 +10,9 @@ <> rdfs:seeAlso . <> rdfs:seeAlso . -<> dc:modified "01-FEB-2012" . +<> dc:modified "01-DEC-2012" . + +<> dc:version "abcl-1.2-dev" . a doap:Project ; Modified: trunk/abcl/doc/manual/abcl.tex ============================================================================== --- trunk/abcl/doc/manual/abcl.tex Sat Dec 1 11:35:26 2012 (r14263) +++ trunk/abcl/doc/manual/abcl.tex Sat Dec 1 11:40:47 2012 (r14264) @@ -8,9 +8,10 @@ \begin{document} \title{Armed Bear Common Lisp User Manual} -\date{Version 1.1.0\\ +\date{Version 1.2\\ +DRAFT \smallskip -October 15, 2012} +December 01, 2012} \author{Mark Evenson \and Erik H\"{u}lsmann \and Rudolf Schlatte \and Alessio Stalla \and Ville Voutilainen} Modified: trunk/abcl/src/org/armedbear/lisp/Version.java ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/Version.java Sat Dec 1 11:35:26 2012 (r14263) +++ trunk/abcl/src/org/armedbear/lisp/Version.java Sat Dec 1 11:40:47 2012 (r14264) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0-dev"; + static final String baseVersion = "1.2.0-dev"; static void init() { try { From mevenson at common-lisp.net Sat Dec 1 19:50:19 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 11:50:19 -0800 Subject: [armedbear-cvs] r14265 - in branches/1.1.x: . doc/manual src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sat Dec 1 11:50:07 2012 New Revision: 14265 Log: Denote branch as producing abcl-1.1.0-rc-0 artifacts. Modified: branches/1.1.x/README branches/1.1.x/doc/manual/abcl.tex branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/README ============================================================================== --- branches/1.1.x/README Sat Dec 1 11:40:47 2012 (r14264) +++ branches/1.1.x/README Sat Dec 1 11:50:07 2012 (r14265) @@ -50,7 +50,7 @@ which should result in output like the following - Armed Bear Common Lisp 1.1.0-dev + Armed Bear Common Lisp 1.1.0 Java 1.6.0_21 Sun Microsystems Inc. Java HotSpot(TM) Client VM Low-level initialization completed in 0.3 seconds. @@ -219,5 +219,5 @@ Alessio Stalla Ville Voutilainen -August 2012 +December 2012 Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Sat Dec 1 11:40:47 2012 (r14264) +++ branches/1.1.x/doc/manual/abcl.tex Sat Dec 1 11:50:07 2012 (r14265) @@ -10,7 +10,7 @@ \title{Armed Bear Common Lisp User Manual} \date{Version 1.1.0\\ \smallskip -October 15, 2012} +December 1, 2012} \author{Mark Evenson \and Erik H\"{u}lsmann \and Rudolf Schlatte \and Alessio Stalla \and Ville Voutilainen} @@ -21,6 +21,8 @@ %%\chapter{Preface} %%Preface to the second edition, abcl-1.1.0. +ABCL 1.1 now contains (A)MOP. We hope you enjoy. + \chapter{Introduction} Armed Bear Common Lisp (ABCL) is an implementation of Common Lisp that @@ -1257,8 +1259,8 @@ released abcl-1.0.0. We released abcl-1.0.1 as a maintainence release on January 10, 2012. -In October 2012, we revised the implementation with the release of -abcl-1.1.0 and accumulated changes to this manual. +In December 2012, we we revised the implementation--adding (A)MOP--with +the release of abcl-1.1.0 and accumulated changes to this manual. \bibliography{abcl} \bibliographystyle{alpha} Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Sat Dec 1 11:40:47 2012 (r14264) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Sat Dec 1 11:50:07 2012 (r14265) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0-dev"; + static final String baseVersion = "1.1.0-rc-0"; static void init() { try { From mevenson at common-lisp.net Sat Dec 1 20:57:25 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 12:57:25 -0800 Subject: [armedbear-cvs] r14266 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Sat Dec 1 12:57:24 2012 New Revision: 14266 Log: abcl-1.1.0 Manual grovel. Modified: branches/1.1.x/doc/manual/Makefile branches/1.1.x/doc/manual/extensions.tex branches/1.1.x/doc/manual/java.tex branches/1.1.x/doc/manual/threads.tex Modified: branches/1.1.x/doc/manual/Makefile ============================================================================== --- branches/1.1.x/doc/manual/Makefile Sat Dec 1 11:50:07 2012 (r14265) +++ branches/1.1.x/doc/manual/Makefile Sat Dec 1 12:57:24 2012 (r14266) @@ -8,8 +8,10 @@ pdflatex abcl.tex pdflatex abcl.tex +ABCL = /Users/evenson/work/abcl-1.1.x/abcl + grovel: - abcl --batch --noinform --load "grovel.lisp" --eval '(progn (grovel-docstrings-as-tex (find-package :java)) (grovel-docstrings-as-tex (find-package :extensions)) (grovel-docstrings-as-tex (find-package :threads)))' + $(ABCL) --batch --noinform --load "grovel.lisp" --eval '(progn (grovel-docstrings-as-tex (find-package :java)) (grovel-docstrings-as-tex (find-package :extensions)) (grovel-docstrings-as-tex (find-package :threads)))' clean: rm -f *.aux *.bbl *.blg *.idx *.ilg *.ind *.log *.out *.toc abcl.pdf Modified: branches/1.1.x/doc/manual/extensions.tex ============================================================================== --- branches/1.1.x/doc/manual/extensions.tex Sat Dec 1 11:50:07 2012 (r14265) +++ branches/1.1.x/doc/manual/extensions.tex Sat Dec 1 12:57:24 2012 (r14266) @@ -1,13 +1,4 @@ \paragraph{} -\label{EXTENSIONS:COMPILE-FILE-IF-NEEDED} -\index{COMPILE-FILE-IF-NEEDED} ---- Function: \textbf{compile-file-if-needed} [\textbf{extensions}] \textit{input-file \&rest allargs \&key force-compile \&allow-other-keys} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:MOST-POSITIVE-JAVA-LONG} \index{MOST-POSITIVE-JAVA-LONG} --- Variable: \textbf{most-positive-java-long} [\textbf{extensions}] \textit{} @@ -44,15 +35,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:GROVEL-JAVA-DEFINITIONS} -\index{GROVEL-JAVA-DEFINITIONS} ---- Function: \textbf{grovel-java-definitions} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:*AUTOLOAD-VERBOSE*} \index{*AUTOLOAD-VERBOSE*} --- Variable: \textbf{*autoload-verbose*} [\textbf{extensions}] \textit{} @@ -80,15 +62,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS-KILL} -\index{PROCESS-KILL} ---- Function: \textbf{process-kill} [\textbf{extensions}] \textit{process} - -\begin{adjustwidth}{5em}{5em} -Kills the process. -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:NIL-VECTOR} \index{NIL-VECTOR} --- Class: \textbf{nil-vector} [\textbf{extensions}] \textit{} @@ -152,6 +125,15 @@ \end{adjustwidth} \paragraph{} +\label{EXTENSIONS:WRITE-TIMEOUT} +\index{WRITE-TIMEOUT} +--- Function: \textbf{write-timeout} [\textbf{extensions}] \textit{socket seconds} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} \label{EXTENSIONS:CDR} \index{CDR} --- Macro: \textbf{\%cdr} [\textbf{extensions}] \textit{} @@ -175,7 +157,7 @@ --- Function: \textbf{make-socket} [\textbf{extensions}] \textit{host port} \begin{adjustwidth}{5em}{5em} -not-documented +Create a TCP socket for client communication to HOST on PORT. \end{adjustwidth} \paragraph{} @@ -188,15 +170,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS-INPUT} -\index{PROCESS-INPUT} ---- Function: \textbf{process-input} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:MAILBOX} \index{MAILBOX} --- Class: \textbf{mailbox} [\textbf{extensions}] \textit{} @@ -233,15 +206,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS} -\index{PROCESS} ---- Class: \textbf{process} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:CADDR} \index{CADDR} --- Macro: \textbf{\%caddr} [\textbf{extensions}] \textit{} @@ -251,15 +215,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:SIMPLE-SEARCH} -\index{SIMPLE-SEARCH} ---- Function: \textbf{simple-search} [\textbf{extensions}] \textit{sequence1 sequence2} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:*LISP-HOME*} \index{*LISP-HOME*} --- Variable: \textbf{*lisp-home*} [\textbf{extensions}] \textit{} @@ -296,6 +251,15 @@ \end{adjustwidth} \paragraph{} +\label{EXTENSIONS:*DISASSEMBLER*} +\index{*DISASSEMBLER*} +--- Variable: \textbf{*disassembler*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} \label{EXTENSIONS:CLASSP} \index{CLASSP} --- Function: \textbf{classp} [\textbf{extensions}] \textit{} @@ -305,12 +269,12 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:*DISASSEMBLER*} -\index{*DISASSEMBLER*} ---- Variable: \textbf{*disassembler*} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:MAKE-TEMP-DIRECTORY} +\index{MAKE-TEMP-DIRECTORY} +--- Function: \textbf{make-temp-directory} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} -not-documented +Create and return the pathname of a previously non-existent directory. \end{adjustwidth} \paragraph{} @@ -341,30 +305,12 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS-ERROR} -\index{PROCESS-ERROR} ---- Function: \textbf{process-error} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:SOCKET-LOCAL-PORT} \index{SOCKET-LOCAL-PORT} --- Function: \textbf{socket-local-port} [\textbf{extensions}] \textit{socket} \begin{adjustwidth}{5em}{5em} -Returns the local port number of the given socket. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:PROCESS-ALIVE-P} -\index{PROCESS-ALIVE-P} ---- Function: \textbf{process-alive-p} [\textbf{extensions}] \textit{process} - -\begin{adjustwidth}{5em}{5em} -Return t if process is still alive, nil otherwise. +Returns the local port number of the SOCKET. \end{adjustwidth} \paragraph{} @@ -445,49 +391,67 @@ --- Function: \textbf{socket-close} [\textbf{extensions}] \textit{socket} \begin{adjustwidth}{5em}{5em} +Close the client SOCKET. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*ED-FUNCTIONS*} +\index{*ED-FUNCTIONS*} +--- Variable: \textbf{*ed-functions*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:UPTIME} -\index{UPTIME} ---- Function: \textbf{uptime} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:SPECIAL-VARIABLE-P} +\index{SPECIAL-VARIABLE-P} +--- Function: \textbf{special-variable-p} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:*ED-FUNCTIONS*} -\index{*ED-FUNCTIONS*} ---- Variable: \textbf{*ed-functions*} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:RESOLVE} +\index{RESOLVE} +--- Function: \textbf{resolve} [\textbf{extensions}] \textit{symbol} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:COMPILE-SYSTEM} -\index{COMPILE-SYSTEM} ---- Function: \textbf{compile-system} [\textbf{extensions}] \textit{\&key quit (zip t) output-path} +\label{EXTENSIONS:CANCEL-FINALIZATION} +\index{CANCEL-FINALIZATION} +--- Function: \textbf{cancel-finalization} [\textbf{extensions}] \textit{object} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:*LOAD-TRUENAME-FASL*} -\index{*LOAD-TRUENAME-FASL*} ---- Variable: \textbf{*load-truename-fasl*} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:UPTIME} +\index{UPTIME} +--- Function: \textbf{uptime} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:SPECIAL-VARIABLE-P} -\index{SPECIAL-VARIABLE-P} ---- Function: \textbf{special-variable-p} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:COMPILE-SYSTEM} +\index{COMPILE-SYSTEM} +--- Function: \textbf{compile-system} [\textbf{extensions}] \textit{\&key quit (zip t) (cls-ext *compile-file-class-extension*) (abcl-ext *compile-file-type*) output-path} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*LOAD-TRUENAME-FASL*} +\index{*LOAD-TRUENAME-FASL*} +--- Variable: \textbf{*load-truename-fasl*} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented @@ -499,7 +463,7 @@ --- Function: \textbf{socket-accept} [\textbf{extensions}] \textit{socket} \begin{adjustwidth}{5em}{5em} -not-documented +Block until able to return a new socket for handling a incoming request to the specified server SOCKET. \end{adjustwidth} \paragraph{} @@ -539,24 +503,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:RESOLVE} -\index{RESOLVE} ---- Function: \textbf{resolve} [\textbf{extensions}] \textit{symbol} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CANCEL-FINALIZATION} -\index{CANCEL-FINALIZATION} ---- Function: \textbf{cancel-finalization} [\textbf{extensions}] \textit{object} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:MAKE-SLIME-OUTPUT-STREAM} \index{MAKE-SLIME-OUTPUT-STREAM} --- Function: \textbf{make-slime-output-stream} [\textbf{extensions}] \textit{function} @@ -566,48 +512,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:RUN-PROGRAM} -\index{RUN-PROGRAM} ---- Function: \textbf{run-program} [\textbf{extensions}] \textit{program args \&key environment (wait t)} - -\begin{adjustwidth}{5em}{5em} -Creates a new process running the the PROGRAM. -ARGS are a list of strings to be passed to the program as arguments. - -For no arguments, use nil which means that just the name of the -program is passed as arg 0. - -Returns a process structure containing the JAVA-OBJECT wrapped Process -object, and the PROCESS-INPUT, PROCESS-OUTPUT, and PROCESS-ERROR streams. - -c.f. http://download.oracle.com/javase/6/docs/api/java/lang/Process.html - -Notes about Unix environments (as in the :environment): - - * The ABCL implementation of run-program, like SBCL, Perl and many - other programs, copies the Unix environment by default. - - * Running Unix programs from a setuid process, or in any other - situation where the Unix environment is under the control of - someone else, is a mother lode of security problems. If you are - contemplating doing this, read about it first. (The Perl - community has a lot of good documentation about this and other - security issues in script-like programs.) - -The \&key arguments have the following meanings: - -:environment - An alist of STRINGs (name . value) describing the new - environment. The default is to copy the environment of the current - process. - -:wait - If non-NIL, which is the default, wait until the created process - finishes. If NIL, continue running Lisp until the program - finishes. -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:FIXNUMP} \index{FIXNUMP} --- Function: \textbf{fixnump} [\textbf{extensions}] \textit{} @@ -635,47 +539,47 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:INTERNAL-COMPILER-ERROR} -\index{INTERNAL-COMPILER-ERROR} ---- Function: \textbf{internal-compiler-error} [\textbf{extensions}] \textit{format-control \&rest format-arguments} +\label{EXTENSIONS:JAR-PATHNAME} +\index{JAR-PATHNAME} +--- Class: \textbf{jar-pathname} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:JAR-PATHNAME} -\index{JAR-PATHNAME} ---- Class: \textbf{jar-pathname} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:ASSQL} +\index{ASSQL} +--- Function: \textbf{assql} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} -NIL - \paragraph{} -\label{EXTENSIONS:SIMPLE-STRING-SEARCH} -\index{SIMPLE-STRING-SEARCH} ---- Function: \textbf{simple-string-search} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:FINALIZE} +\index{FINALIZE} +--- Function: \textbf{finalize} [\textbf{extensions}] \textit{object function} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:ASSQL} -\index{ASSQL} ---- Function: \textbf{assql} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:CAR} +\index{CAR} +--- Macro: \textbf{\%car} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} +NIL + \paragraph{} -\label{EXTENSIONS:FINALIZE} -\index{FINALIZE} ---- Function: \textbf{finalize} [\textbf{extensions}] \textit{object function} +\label{EXTENSIONS:SIMPLE-STRING-SEARCH} +\index{SIMPLE-STRING-SEARCH} +--- Function: \textbf{simple-string-search} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented @@ -700,15 +604,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:CAR} -\index{CAR} ---- Macro: \textbf{\%car} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:COLLECT} \index{COLLECT} --- Macro: \textbf{collect} [\textbf{extensions}] \textit{} @@ -750,16 +645,7 @@ --- Function: \textbf{make-temp-file} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:DESCRIBE-COMPILER-POLICY} -\index{DESCRIBE-COMPILER-POLICY} ---- Function: \textbf{describe-compiler-policy} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented +Create and return the pathname of a previously non-existent file. \end{adjustwidth} \paragraph{} @@ -777,7 +663,7 @@ --- Function: \textbf{socket-peer-address} [\textbf{extensions}] \textit{socket} \begin{adjustwidth}{5em}{5em} -Returns the peer address of the given socket as a dotted quad string. +Returns the peer address of the SOCKET as a dotted quad string. \end{adjustwidth} \paragraph{} @@ -804,7 +690,7 @@ --- Function: \textbf{server-socket-close} [\textbf{extensions}] \textit{socket} \begin{adjustwidth}{5em}{5em} -not-documented +Close the server SOCKET. \end{adjustwidth} \paragraph{} @@ -885,7 +771,7 @@ --- Function: \textbf{make-server-socket} [\textbf{extensions}] \textit{port} \begin{adjustwidth}{5em}{5em} -not-documented +Create a TCP server socket listening for clients on PORT. \end{adjustwidth} \paragraph{} @@ -898,15 +784,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:AVER} -\index{AVER} ---- Macro: \textbf{aver} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:INIT-GUI} \index{INIT-GUI} --- Function: \textbf{init-gui} [\textbf{extensions}] \textit{} @@ -925,15 +802,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS-EXIT-CODE} -\index{PROCESS-EXIT-CODE} ---- Function: \textbf{process-exit-code} [\textbf{extensions}] \textit{instance} - -\begin{adjustwidth}{5em}{5em} -The exit code of a process. -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:SOURCE-FILE-POSITION} \index{SOURCE-FILE-POSITION} --- Function: \textbf{source-file-position} [\textbf{extensions}] \textit{} @@ -948,7 +816,7 @@ --- Function: \textbf{socket-peer-port} [\textbf{extensions}] \textit{socket} \begin{adjustwidth}{5em}{5em} -Returns the peer port number of the given socket. +Returns the peer port number of the given SOCKET. \end{adjustwidth} \paragraph{} @@ -970,15 +838,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:SOCKET-LOCAL-ADDRESS} -\index{SOCKET-LOCAL-ADDRESS} ---- Function: \textbf{socket-local-address} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Returns the local address of the given socket as a dotted quad string. -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:NEQ} \index{NEQ} --- Function: \textbf{neq} [\textbf{extensions}] \textit{obj1 obj2} @@ -997,45 +856,45 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PATHNAME-JAR-P} -\index{PATHNAME-JAR-P} ---- Function: \textbf{pathname-jar-p} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:SOCKET-LOCAL-ADDRESS} +\index{SOCKET-LOCAL-ADDRESS} +--- Function: \textbf{socket-local-address} [\textbf{extensions}] \textit{socket} \begin{adjustwidth}{5em}{5em} -not-documented +Returns the local address of the SOCKET as a dotted quad string. \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS-WAIT} -\index{PROCESS-WAIT} ---- Function: \textbf{process-wait} [\textbf{extensions}] \textit{process} +\label{EXTENSIONS:READ-TIMEOUT} +\index{READ-TIMEOUT} +--- Function: \textbf{read-timeout} [\textbf{extensions}] \textit{socket seconds} \begin{adjustwidth}{5em}{5em} -Wait for process to quit running for some reason. +Time in SECONDS to set local implementation of SO\_CREVTIMEO on SOCKET. \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:SHOW-RESTARTS} -\index{SHOW-RESTARTS} ---- Function: \textbf{show-restarts} [\textbf{extensions}] \textit{restarts stream} +\label{EXTENSIONS:PATHNAME-JAR-P} +\index{PATHNAME-JAR-P} +--- Function: \textbf{pathname-jar-p} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:*BATCH-MODE*} -\index{*BATCH-MODE*} ---- Variable: \textbf{*batch-mode*} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:SHOW-RESTARTS} +\index{SHOW-RESTARTS} +--- Function: \textbf{show-restarts} [\textbf{extensions}] \textit{restarts stream} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS-P} -\index{PROCESS-P} ---- Function: \textbf{process-p} [\textbf{extensions}] \textit{object} +\label{EXTENSIONS:*BATCH-MODE*} +\index{*BATCH-MODE*} +--- Variable: \textbf{*batch-mode*} [\textbf{extensions}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented @@ -1097,15 +956,6 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:PROCESS-OUTPUT} -\index{PROCESS-OUTPUT} ---- Function: \textbf{process-output} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} \label{EXTENSIONS:URL-PATHNAME} \index{URL-PATHNAME} --- Class: \textbf{url-pathname} [\textbf{extensions}] \textit{} @@ -1115,12 +965,12 @@ \end{adjustwidth} \paragraph{} -\label{EXTENSIONS:COMPILER-UNSUPPORTED-FEATURE-ERROR} -\index{COMPILER-UNSUPPORTED-FEATURE-ERROR} ---- Class: \textbf{compiler-unsupported-feature-error} [\textbf{extensions}] \textit{} +\label{EXTENSIONS:GETENV-ALL} +\index{GETENV-ALL} +--- Function: \textbf{getenv-all} [\textbf{extensions}] \textit{variable} \begin{adjustwidth}{5em}{5em} -not-documented +Returns all environment variables as an alist containing (name . value) \end{adjustwidth} \paragraph{} @@ -1130,15 +980,6 @@ \begin{adjustwidth}{5em}{5em} not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:COMPILER-ERROR} -\index{COMPILER-ERROR} ---- Function: \textbf{compiler-error} [\textbf{extensions}] \textit{format-control \&rest format-arguments} - -\begin{adjustwidth}{5em}{5em} -not-documented \end{adjustwidth} \paragraph{} Modified: branches/1.1.x/doc/manual/java.tex ============================================================================== --- branches/1.1.x/doc/manual/java.tex Sat Dec 1 11:50:07 2012 (r14265) +++ branches/1.1.x/doc/manual/java.tex Sat Dec 1 12:57:24 2012 (r14266) @@ -114,9 +114,7 @@ --- Function: \textbf{jclass-of} [\textbf{java}] \textit{object \&optional name} \begin{adjustwidth}{5em}{5em} -Returns the name of the Java class of OBJECT. If the NAME argument is - supplied, verifies that OBJECT is an instance of the named class. The name - of the class or nil is always returned as a second value. +not-documented \end{adjustwidth} \paragraph{} @@ -138,75 +136,76 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:GET-DEFAULT-CLASSLOADER} -\index{GET-DEFAULT-CLASSLOADER} ---- Function: \textbf{get-default-classloader} [\textbf{java}] \textit{} +\label{JAVA:GET-CURRENT-CLASSLOADER} +\index{GET-CURRENT-CLASSLOADER} +--- Function: \textbf{get-current-classloader} [\textbf{java}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{JAVA:JCLASS-METHODS} -\index{JCLASS-METHODS} ---- Function: \textbf{jclass-methods} [\textbf{java}] \textit{class \&key declared public} +\label{JAVA:JNEW-ARRAY-FROM-LIST} +\index{JNEW-ARRAY-FROM-LIST} +--- Function: \textbf{jnew-array-from-list} [\textbf{java}] \textit{element-type list} \begin{adjustwidth}{5em}{5em} -Return a vector of all (or just the declared/public, if DECLARED/PUBLIC is true) methods of CLASS +Returns a new Java array with base type ELEMENT-TYPE (a string or a class-ref) + initialized from a Lisp list. \end{adjustwidth} \paragraph{} -\label{JAVA:GET-CURRENT-CLASSLOADER} -\index{GET-CURRENT-CLASSLOADER} ---- Function: \textbf{get-current-classloader} [\textbf{java}] \textit{} +\label{JAVA:JMETHOD} +\index{JMETHOD} +--- Function: \textbf{jmethod} [\textbf{java}] \textit{class-ref method-name \&rest parameter-class-refs} \begin{adjustwidth}{5em}{5em} -not-documented +Returns a reference to the Java method METHOD-NAME of CLASS-REF with the given PARAMETER-CLASS-REFS. \end{adjustwidth} \paragraph{} -\label{JAVA:REGISTER-JAVA-EXCEPTION} -\index{REGISTER-JAVA-EXCEPTION} ---- Function: \textbf{register-java-exception} [\textbf{java}] \textit{exception-name condition-symbol} +\label{JAVA:GET-DEFAULT-CLASSLOADER} +\index{GET-DEFAULT-CLASSLOADER} +--- Function: \textbf{get-default-classloader} [\textbf{java}] \textit{} \begin{adjustwidth}{5em}{5em} -Registers the Java Throwable named by the symbol EXCEPTION-NAME as the condition designated by CONDITION-SYMBOL. Returns T if successful, NIL if not. +not-documented \end{adjustwidth} \paragraph{} -\label{JAVA:JCLASS} -\index{JCLASS} ---- Function: \textbf{jclass} [\textbf{java}] \textit{name-or-class-ref \&optional class-loader} +\label{JAVA:JCLASS-METHODS} +\index{JCLASS-METHODS} +--- Function: \textbf{jclass-methods} [\textbf{java}] \textit{class \&key declared public} \begin{adjustwidth}{5em}{5em} -Returns a reference to the Java class designated by NAME-OR-CLASS-REF. If the CLASS-LOADER parameter is passed, the class is resolved with respect to the given ClassLoader. +Return a vector of all (or just the declared/public, if DECLARED/PUBLIC is true) methods of CLASS \end{adjustwidth} \paragraph{} -\label{JAVA:JNEW-ARRAY-FROM-LIST} -\index{JNEW-ARRAY-FROM-LIST} ---- Function: \textbf{jnew-array-from-list} [\textbf{java}] \textit{element-type list} +\label{JAVA:REGISTER-JAVA-EXCEPTION} +\index{REGISTER-JAVA-EXCEPTION} +--- Function: \textbf{register-java-exception} [\textbf{java}] \textit{exception-name condition-symbol} \begin{adjustwidth}{5em}{5em} -not-documented +Registers the Java Throwable named by the symbol EXCEPTION-NAME as the condition designated by CONDITION-SYMBOL. Returns T if successful, NIL if not. \end{adjustwidth} \paragraph{} -\label{JAVA:JMETHOD} -\index{JMETHOD} ---- Function: \textbf{jmethod} [\textbf{java}] \textit{class-ref method-name \&rest parameter-class-refs} +\label{JAVA:JCLASS} +\index{JCLASS} +--- Function: \textbf{jclass} [\textbf{java}] \textit{name-or-class-ref \&optional class-loader} \begin{adjustwidth}{5em}{5em} -Returns a reference to the Java method METHOD-NAME of CLASS-REF with the given PARAMETER-CLASS-REFS. +Returns a reference to the Java class designated by NAME-OR-CLASS-REF. If the CLASS-LOADER parameter is passed, the class is resolved with respect to the given ClassLoader. \end{adjustwidth} \paragraph{} \label{JAVA:JPROPERTY-VALUE} \index{JPROPERTY-VALUE} ---- Function: \textbf{jproperty-value} [\textbf{java}] \textit{obj prop} +--- Function: \textbf{jproperty-value} [\textbf{java}] \textit{object property} \begin{adjustwidth}{5em}{5em} -not-documented +setf-able access on the Java Beans notion of property named PROPETRY on OBJECT. \end{adjustwidth} \paragraph{} @@ -219,6 +218,15 @@ \end{adjustwidth} \paragraph{} +\label{JAVA:JCLASS-CONSTRUCTORS} +\index{JCLASS-CONSTRUCTORS} +--- Function: \textbf{jclass-constructors} [\textbf{java}] \textit{class} + +\begin{adjustwidth}{5em}{5em} +Returns a vector of constructors for CLASS +\end{adjustwidth} + +\paragraph{} \label{JAVA:JNEW-RUNTIME-CLASS} \index{JNEW-RUNTIME-CLASS} --- Function: \textbf{jnew-runtime-class} [\textbf{java}] \textit{class-name \&rest args \&key (superclass java.lang.Object) interfaces constructors methods fields (access-flags (quote (public))) annotations} @@ -251,15 +259,6 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JCLASS-CONSTRUCTORS} -\index{JCLASS-CONSTRUCTORS} ---- Function: \textbf{jclass-constructors} [\textbf{java}] \textit{class} - -\begin{adjustwidth}{5em}{5em} -Returns a vector of constructors for CLASS -\end{adjustwidth} - -\paragraph{} \label{JAVA:JSTATIC} \index{JSTATIC} --- Function: \textbf{jstatic} [\textbf{java}] \textit{method class \&rest args} @@ -278,15 +277,6 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JNEW} -\index{JNEW} ---- Function: \textbf{jnew} [\textbf{java}] \textit{constructor \&rest args} - -\begin{adjustwidth}{5em}{5em} -Invokes the Java constructor CONSTRUCTOR with the arguments ARGS. -\end{adjustwidth} - -\paragraph{} \label{JAVA:JREGISTER-HANDLER} \index{JREGISTER-HANDLER} --- Function: \textbf{jregister-handler} [\textbf{java}] \textit{object event handler \&key data count} @@ -314,6 +304,33 @@ \end{adjustwidth} \paragraph{} +\label{JAVA:JINPUT-STREAM} +\index{JINPUT-STREAM} +--- Function: \textbf{jinput-stream} [\textbf{java}] \textit{pathname} + +\begin{adjustwidth}{5em}{5em} +Returns a java.io.InputStream for resource denoted by PATHNAME. +\end{adjustwidth} + +\paragraph{} +\label{JAVA:UNREGISTER-JAVA-EXCEPTION} +\index{UNREGISTER-JAVA-EXCEPTION} +--- Function: \textbf{unregister-java-exception} [\textbf{java}] \textit{exception-name} + +\begin{adjustwidth}{5em}{5em} +Unregisters the Java Throwable EXCEPTION-NAME previously registered by REGISTER-JAVA-EXCEPTION. +\end{adjustwidth} + +\paragraph{} +\label{JAVA:JNEW} +\index{JNEW} +--- Function: \textbf{jnew} [\textbf{java}] \textit{constructor \&rest args} + +\begin{adjustwidth}{5em}{5em} +Invokes the Java constructor CONSTRUCTOR with the arguments ARGS. +\end{adjustwidth} + +\paragraph{} \label{JAVA:JARRAY-COMPONENT-TYPE} \index{JARRAY-COMPONENT-TYPE} --- Function: \textbf{jarray-component-type} [\textbf{java}] \textit{atype} @@ -328,16 +345,10 @@ --- Generic Function: \textbf{add-to-classpath} [\textbf{java}] \textit{} \begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{JAVA:UNREGISTER-JAVA-EXCEPTION} -\index{UNREGISTER-JAVA-EXCEPTION} ---- Function: \textbf{unregister-java-exception} [\textbf{java}] \textit{exception-name} +Add JAR-OR-JARS to the JVM classpath optionally specifying the CLASSLOADER to add. -\begin{adjustwidth}{5em}{5em} -Unregisters the Java Throwable EXCEPTION-NAME previously registered by REGISTER-JAVA-EXCEPTION. +JAR-OR-JARS is either a pathname designating a jar archive or the root +directory to search for classes or a list of such values. \end{adjustwidth} \paragraph{} @@ -372,15 +383,6 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JMEMBER-PUBLIC-P} -\index{JMEMBER-PUBLIC-P} ---- Function: \textbf{jmember-public-p} [\textbf{java}] \textit{member} - -\begin{adjustwidth}{5em}{5em} -MEMBER is a public member of its declaring class -\end{adjustwidth} - -\paragraph{} \label{JAVA:+NULL+} \index{+NULL+} --- Variable: \textbf{+null+} [\textbf{java}] \textit{} @@ -395,22 +397,22 @@ --- Function: \textbf{ensure-java-class} [\textbf{java}] \textit{jclass} \begin{adjustwidth}{5em}{5em} -not-documented +Attempt to ensure that the Java class referenced by JCLASS exists in the current process of the implementation. \end{adjustwidth} \paragraph{} -\label{JAVA:JAVA-CLASS} -\index{JAVA-CLASS} ---- Class: \textbf{java-class} [\textbf{java}] \textit{} +\label{JAVA:JMEMBER-PUBLIC-P} +\index{JMEMBER-PUBLIC-P} +--- Function: \textbf{jmember-public-p} [\textbf{java}] \textit{member} \begin{adjustwidth}{5em}{5em} -not-documented +MEMBER is a public member of its declaring class \end{adjustwidth} \paragraph{} -\label{JAVA:JMETHOD-LET} -\index{JMETHOD-LET} ---- Macro: \textbf{jmethod-let} [\textbf{java}] \textit{} +\label{JAVA:JAVA-CLASS} +\index{JAVA-CLASS} +--- Class: \textbf{java-class} [\textbf{java}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented @@ -426,6 +428,15 @@ \end{adjustwidth} \paragraph{} +\label{JAVA:JMETHOD-LET} +\index{JMETHOD-LET} +--- Macro: \textbf{jmethod-let} [\textbf{java}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} \label{JAVA:JCALL} \index{JCALL} --- Function: \textbf{jcall} [\textbf{java}] \textit{method-ref instance \&rest args} @@ -537,6 +548,15 @@ \end{adjustwidth} \paragraph{} +\label{JAVA:JMAKE-INVOCATION-HANDLER} +\index{JMAKE-INVOCATION-HANDLER} +--- Function: \textbf{jmake-invocation-handler} [\textbf{java}] \textit{function} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} \label{JAVA:+TRUE+} \index{+TRUE+} --- Variable: \textbf{+true+} [\textbf{java}] \textit{} @@ -546,12 +566,12 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JMAKE-INVOCATION-HANDLER} -\index{JMAKE-INVOCATION-HANDLER} ---- Function: \textbf{jmake-invocation-handler} [\textbf{java}] \textit{function} +\label{JAVA:JMEMBER-PROTECTED-P} +\index{JMEMBER-PROTECTED-P} +--- Function: \textbf{jmember-protected-p} [\textbf{java}] \textit{member} \begin{adjustwidth}{5em}{5em} -not-documented +MEMBER is a protected member of its declaring class \end{adjustwidth} \paragraph{} @@ -573,15 +593,6 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JMEMBER-PROTECTED-P} -\index{JMEMBER-PROTECTED-P} ---- Function: \textbf{jmember-protected-p} [\textbf{java}] \textit{member} - -\begin{adjustwidth}{5em}{5em} -MEMBER is a protected member of its declaring class -\end{adjustwidth} - -\paragraph{} \label{JAVA:MAKE-IMMEDIATE-OBJECT} \index{MAKE-IMMEDIATE-OBJECT} --- Function: \textbf{make-immediate-object} [\textbf{java}] \textit{object \&optional type} @@ -599,13 +610,22 @@ \end{adjustwidth} \paragraph{} +\label{JAVA:JCLASS-FIELDS} +\index{JCLASS-FIELDS} +--- Function: \textbf{jclass-fields} [\textbf{java}] \textit{class \&key declared public} + +\begin{adjustwidth}{5em}{5em} +Returns a vector of all (or just the declared/public, if DECLARED/PUBLIC is true) fields of CLASS +\end{adjustwidth} + +\paragraph{} \label{JAVA:JNEW-ARRAY-FROM-ARRAY} \index{JNEW-ARRAY-FROM-ARRAY} --- Function: \textbf{jnew-array-from-array} [\textbf{java}] \textit{element-type array} \begin{adjustwidth}{5em}{5em} Returns a new Java array with base type ELEMENT-TYPE (a string or a class-ref) - initialized from ARRAY + initialized from ARRAY. \end{adjustwidth} \paragraph{} @@ -618,15 +638,6 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JCLASS-FIELDS} -\index{JCLASS-FIELDS} ---- Function: \textbf{jclass-fields} [\textbf{java}] \textit{class \&key declared public} - -\begin{adjustwidth}{5em}{5em} -Returns a vector of all (or just the declared/public, if DECLARED/PUBLIC is true) fields of CLASS -\end{adjustwidth} - -\paragraph{} \label{JAVA:JAVA-EXCEPTION} \index{JAVA-EXCEPTION} --- Class: \textbf{java-exception} [\textbf{java}] \textit{} @@ -683,21 +694,21 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JCONSTRUCTOR-PARAMS} -\index{JCONSTRUCTOR-PARAMS} ---- Function: \textbf{jconstructor-params} [\textbf{java}] \textit{constructor} +\label{JAVA:JMEMBER-STATIC-P} +\index{JMEMBER-STATIC-P} +--- Function: \textbf{jmember-static-p} [\textbf{java}] \textit{member} \begin{adjustwidth}{5em}{5em} -Returns a vector of parameter types (Java classes) for CONSTRUCTOR +MEMBER is a static member of its declaring class \end{adjustwidth} \paragraph{} -\label{JAVA:JMEMBER-STATIC-P} -\index{JMEMBER-STATIC-P} ---- Function: \textbf{jmember-static-p} [\textbf{java}] \textit{member} +\label{JAVA:JCONSTRUCTOR-PARAMS} +\index{JCONSTRUCTOR-PARAMS} +--- Function: \textbf{jconstructor-params} [\textbf{java}] \textit{constructor} \begin{adjustwidth}{5em}{5em} -MEMBER is a static member of its declaring class +Returns a vector of parameter types (Java classes) for CONSTRUCTOR \end{adjustwidth} \paragraph{} @@ -733,7 +744,7 @@ --- Function: \textbf{jarray-length} [\textbf{java}] \textit{java-array} \begin{adjustwidth}{5em}{5em} -not-documented +Returns the length of a Java primitive array. \end{adjustwidth} \paragraph{} @@ -746,21 +757,21 @@ \end{adjustwidth} \paragraph{} -\label{JAVA:JCLASS-FIELD} -\index{JCLASS-FIELD} ---- Function: \textbf{jclass-field} [\textbf{java}] \textit{class field-name} +\label{JAVA:JMAKE-PROXY} +\index{JMAKE-PROXY} +--- Generic Function: \textbf{jmake-proxy} [\textbf{java}] \textit{} \begin{adjustwidth}{5em}{5em} -Returns the field named FIELD-NAME of CLASS +Returns a proxy Java object implementing the provided interface(s) using methods implemented in Lisp - typically closures, but implementations are free to provide other mechanisms. You can pass an optional 'lisp-this' object that will be passed to the implementing methods as their first argument. If you don't provide this object, NIL will be used. The second argument of the Lisp methods is the name of the Java method being implemented. This has the implication that overloaded methods are merged, so you have to manually discriminate them if you want to. The remaining arguments are java-objects wrapping the method's parameters. \end{adjustwidth} \paragraph{} -\label{JAVA:JMAKE-PROXY} -\index{JMAKE-PROXY} ---- Generic Function: \textbf{jmake-proxy} [\textbf{java}] \textit{} +\label{JAVA:JCLASS-FIELD} +\index{JCLASS-FIELD} +--- Function: \textbf{jclass-field} [\textbf{java}] \textit{class field-name} \begin{adjustwidth}{5em}{5em} -not-documented +Returns the field named FIELD-NAME of CLASS \end{adjustwidth} \paragraph{} Modified: branches/1.1.x/doc/manual/threads.tex ============================================================================== --- branches/1.1.x/doc/manual/threads.tex Sat Dec 1 11:50:07 2012 (r14265) +++ branches/1.1.x/doc/manual/threads.tex Sat Dec 1 12:57:24 2012 (r14266) @@ -4,7 +4,7 @@ --- Function: \textbf{mailbox-empty-p} [\textbf{threads}] \textit{mailbox} \begin{adjustwidth}{5em}{5em} -Returns non-NIL if the mailbox can be read from, NIL otherwise. +not-documented \end{adjustwidth} \paragraph{} @@ -53,18 +53,18 @@ \end{adjustwidth} \paragraph{} -\label{THREADS:OBJECT-WAIT} -\index{OBJECT-WAIT} ---- Function: \textbf{object-wait} [\textbf{threads}] \textit{} +\label{THREADS:MAKE-THREAD} +\index{MAKE-THREAD} +--- Function: \textbf{make-thread} [\textbf{threads}] \textit{function \&key name} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{THREADS:MAKE-THREAD} -\index{MAKE-THREAD} ---- Function: \textbf{make-thread} [\textbf{threads}] \textit{function \&key name} +\label{THREADS:OBJECT-WAIT} +\index{OBJECT-WAIT} +--- Function: \textbf{object-wait} [\textbf{threads}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented @@ -91,7 +91,7 @@ \paragraph{} \label{THREADS:MAKE-MAILBOX} \index{MAKE-MAILBOX} ---- Function: \textbf{make-mailbox} [\textbf{threads}] \textit{\&key ((queue g2304220) NIL)} +--- Function: \textbf{make-mailbox} [\textbf{threads}] \textit{\&key ((queue g348097) NIL)} \begin{adjustwidth}{5em}{5em} not-documented @@ -122,8 +122,7 @@ \begin{adjustwidth}{5em}{5em} Returns two values. The second returns non-NIL when the mailbox -is empty. The first is the next item to be read from the mailbox -if the first is NIL. +is empty. The first is the next item to be read from the mailbox. Note that due to multi-threading, the first value returned upon peek, may be different from the one returned upon next read in the @@ -169,18 +168,18 @@ \end{adjustwidth} \paragraph{} -\label{THREADS:MAKE-MUTEX} -\index{MAKE-MUTEX} ---- Function: \textbf{make-mutex} [\textbf{threads}] \textit{\&key ((in-use g2304421) NIL)} +\label{THREADS:THREAD} +\index{THREAD} +--- Class: \textbf{thread} [\textbf{threads}] \textit{} \begin{adjustwidth}{5em}{5em} not-documented \end{adjustwidth} \paragraph{} -\label{THREADS:THREAD} -\index{THREAD} ---- Class: \textbf{thread} [\textbf{threads}] \textit{} +\label{THREADS:MAKE-MUTEX} +\index{MAKE-MUTEX} +--- Function: \textbf{make-mutex} [\textbf{threads}] \textit{\&key ((in-use g348357) NIL)} \begin{adjustwidth}{5em}{5em} not-documented From mevenson at common-lisp.net Sat Dec 1 21:01:45 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 13:01:45 -0800 Subject: [armedbear-cvs] r14267 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Sat Dec 1 13:01:44 2012 New Revision: 14267 Log: manual: We now include (A)MOP. Modified: branches/1.1.x/doc/manual/abcl.tex Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Sat Dec 1 12:57:24 2012 (r14266) +++ branches/1.1.x/doc/manual/abcl.tex Sat Dec 1 13:01:44 2012 (r14267) @@ -94,8 +94,6 @@ allowed by \textsc{ANSI}}, the inability to inspect local variables in a given call frame, and the inability to resume a halted computation at an arbitrarily selected call frame. -\item An incomplete implementation of a proper metaobject protocol - (c.f. the (A)MOP specification~\cite{AMOP, AMOPspec}) \item Incomplete streams abstraction, in that \textsc{ABCL} needs suitable abstraction between ANSI and Gray streams. The streams could be optimized to the JVM NIO abstractions at great profit for binary From mevenson at common-lisp.net Sat Dec 1 21:29:21 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 13:29:21 -0800 Subject: [armedbear-cvs] r14268 - branches/1.1.x Message-ID: Author: mevenson Date: Sat Dec 1 13:29:20 2012 New Revision: 14268 Log: Update MANUAL pointer. Modified: branches/1.1.x/MANUAL Modified: branches/1.1.x/MANUAL ============================================================================== --- branches/1.1.x/MANUAL Sat Dec 1 13:01:44 2012 (r14267) +++ branches/1.1.x/MANUAL Sat Dec 1 13:29:20 2012 (r14268) @@ -3,5 +3,4 @@ solicits patches to improve the manual. -Mark -October 2011 +December 2012 From mevenson at common-lisp.net Sat Dec 1 21:30:25 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 13:30:25 -0800 Subject: [armedbear-cvs] r14269 - in branches/1.1.x: . contrib Message-ID: Author: mevenson Date: Sat Dec 1 13:30:25 2012 New Revision: 14269 Log: build: update POM artifact version.@ Modified: branches/1.1.x/contrib/pom.xml branches/1.1.x/pom.xml Modified: branches/1.1.x/contrib/pom.xml ============================================================================== --- branches/1.1.x/contrib/pom.xml Sat Dec 1 13:29:20 2012 (r14268) +++ branches/1.1.x/contrib/pom.xml Sat Dec 1 13:30:25 2012 (r14269) @@ -13,7 +13,7 @@ org.armedbear.lisp abcl-contrib - 1.1.0-dev + 1.1.0 jar Armed Bear Common Lisp (ABCL) Contribs Extra packages--contribs--for ABCL Modified: branches/1.1.x/pom.xml ============================================================================== --- branches/1.1.x/pom.xml Sat Dec 1 13:29:20 2012 (r14268) +++ branches/1.1.x/pom.xml Sat Dec 1 13:30:25 2012 (r14269) @@ -13,7 +13,7 @@ org.armedbear.lisp abcl - 1.1.0-dev + 1.1.0 jar ABCL - Armed Bear Common Lisp Common Lisp implementation running on the JVM From mevenson at common-lisp.net Sat Dec 1 21:32:27 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sat, 01 Dec 2012 13:32:27 -0800 Subject: [armedbear-cvs] r14270 - in trunk/abcl: . contrib Message-ID: Author: mevenson Date: Sat Dec 1 13:32:27 2012 New Revision: 14270 Log: Update POM version. Modified: trunk/abcl/contrib/pom.xml trunk/abcl/pom.xml Modified: trunk/abcl/contrib/pom.xml ============================================================================== --- trunk/abcl/contrib/pom.xml Sat Dec 1 13:30:25 2012 (r14269) +++ trunk/abcl/contrib/pom.xml Sat Dec 1 13:32:27 2012 (r14270) @@ -13,7 +13,7 @@ org.armedbear.lisp abcl-contrib - 1.1.0-dev + 1.2.0-dev jar Armed Bear Common Lisp (ABCL) Contribs Extra packages--contribs--for ABCL Modified: trunk/abcl/pom.xml ============================================================================== --- trunk/abcl/pom.xml Sat Dec 1 13:30:25 2012 (r14269) +++ trunk/abcl/pom.xml Sat Dec 1 13:32:27 2012 (r14270) @@ -13,7 +13,7 @@ org.armedbear.lisp abcl - 1.1.0-dev + 1.2.0-dev jar ABCL - Armed Bear Common Lisp Common Lisp implementation running on the JVM From mevenson at common-lisp.net Sun Dec 2 08:41:40 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 00:41:40 -0800 Subject: [armedbear-cvs] r14271 - trunk/abcl/test/lisp/ansi Message-ID: Author: mevenson Date: Sun Dec 2 00:41:37 2012 New Revision: 14271 Log: abcl-1.1.0 RC0 Ansi interpreted test results. 13 out of 21707 total tests failed (PSETF.37 CALL-NEXT-METHOD.ERROR.1 CALL-NEXT-METHOD.ERROR.2 INVOKE-DEBUGGER.1 MAKE-CONDITION.3 MAKE-CONDITION.4 SXHASH.8 MAP.48 TYPE-OF.1 TYPE-OF.4 MAKE-CONCATENATED-STREAM.30 PRINT.RANDOM-STATE.1 PPRINT-LOGICAL-BLOCK.17) Modified: trunk/abcl/test/lisp/ansi/ansi-test-failures Modified: trunk/abcl/test/lisp/ansi/ansi-test-failures ============================================================================== --- trunk/abcl/test/lisp/ansi/ansi-test-failures Sat Dec 1 13:32:27 2012 (r14270) +++ trunk/abcl/test/lisp/ansi/ansi-test-failures Sun Dec 2 00:41:37 2012 (r14271) @@ -483,3 +483,18 @@ +;;13 out of 21707 total tests failed: +(doit abcl-1.1.0-rc-0 :id saturn-java6 +(PSETF.37 +CALL-NEXT-METHOD.ERROR.1 +CALL-NEXT-METHOD.ERROR.2 +INVOKE-DEBUGGER.1 +MAKE-CONDITION.3 +MAKE-CONDITION.4 +SXHASH.8 +MAP.48 +TYPE-OF.1 +TYPE-OF.4 +MAKE-CONCATENATED-STREAM.30 +PRINT.RANDOM-STATE.1 +PPRINT-LOGICAL-BLOCK.17)) From mevenson at common-lisp.net Sun Dec 2 08:42:44 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 00:42:44 -0800 Subject: [armedbear-cvs] r14272 - branches/1.1.x/test/lisp/ansi Message-ID: Author: mevenson Date: Sun Dec 2 00:42:43 2012 New Revision: 14272 Log: abcl-1.1.0 RC0 Ansi interpreted test results. 13 out of 21707 total tests failed (PSETF.37 CALL-NEXT-METHOD.ERROR.1 CALL-NEXT-METHOD.ERROR.2 INVOKE-DEBUGGER.1 MAKE-CONDITION.3 MAKE-CONDITION.4 SXHASH.8 MAP.48 TYPE-OF.1 TYPE-OF.4 MAKE-CONCATENATED-STREAM.30 PRINT.RANDOM-STATE.1 PPRINT-LOGICAL-BLOCK.17) Modified: branches/1.1.x/test/lisp/ansi/ansi-test-failures Modified: branches/1.1.x/test/lisp/ansi/ansi-test-failures ============================================================================== --- branches/1.1.x/test/lisp/ansi/ansi-test-failures Sun Dec 2 00:41:37 2012 (r14271) +++ branches/1.1.x/test/lisp/ansi/ansi-test-failures Sun Dec 2 00:42:43 2012 (r14272) @@ -483,3 +483,18 @@ +;;13 out of 21707 total tests failed: +(doit abcl-1.1.0-rc-0 :id saturn-java6 +(PSETF.37 +CALL-NEXT-METHOD.ERROR.1 +CALL-NEXT-METHOD.ERROR.2 +INVOKE-DEBUGGER.1 +MAKE-CONDITION.3 +MAKE-CONDITION.4 +SXHASH.8 +MAP.48 +TYPE-OF.1 +TYPE-OF.4 +MAKE-CONCATENATED-STREAM.30 +PRINT.RANDOM-STATE.1 +PPRINT-LOGICAL-BLOCK.17)) From mevenson at common-lisp.net Sun Dec 2 08:57:55 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 00:57:55 -0800 Subject: [armedbear-cvs] r14273 - trunk/abcl/test/lisp/ansi Message-ID: Author: mevenson Date: Sun Dec 2 00:57:54 2012 New Revision: 14273 Log: ansi: results for abcl-1.1.0-rc-0 Ansi compiled tests. Modified: trunk/abcl/test/lisp/ansi/ansi-test-failures Modified: trunk/abcl/test/lisp/ansi/ansi-test-failures ============================================================================== --- trunk/abcl/test/lisp/ansi/ansi-test-failures Sun Dec 2 00:42:43 2012 (r14272) +++ trunk/abcl/test/lisp/ansi/ansi-test-failures Sun Dec 2 00:57:54 2012 (r14273) @@ -498,3 +498,22 @@ MAKE-CONCATENATED-STREAM.30 PRINT.RANDOM-STATE.1 PPRINT-LOGICAL-BLOCK.17)) + +;;15 out of 21707 total tests failed: +(compileit abcl-1.1.0-rc-0 :id saturn-java6 +(PSETF.37 +CALL-NEXT-METHOD.ERROR.1 +CALL-NEXT-METHOD.ERROR.2 +INVOKE-DEBUGGER.1 +MAKE-CONDITION.3 +MAKE-CONDITION.4 +SXHASH.8 +MAP.48 +TYPE-OF.1 +TYPE-OF.4 +MAKE-CONCATENATED-STREAM.30 +PRINT.BACKQUOTE.RANDOM.14 +PRINT.RANDOM-STATE.1 +PPRINT-LOGICAL-BLOCK.17 +TRACE.8)) + From mevenson at common-lisp.net Sun Dec 2 08:58:27 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 00:58:27 -0800 Subject: [armedbear-cvs] r14274 - branches/1.1.x/test/lisp/ansi Message-ID: Author: mevenson Date: Sun Dec 2 00:58:26 2012 New Revision: 14274 Log: ansi: results for abcl-1.1.0-rc-0 Ansi compiled tests. Modified: branches/1.1.x/test/lisp/ansi/ansi-test-failures Modified: branches/1.1.x/test/lisp/ansi/ansi-test-failures ============================================================================== --- branches/1.1.x/test/lisp/ansi/ansi-test-failures Sun Dec 2 00:57:54 2012 (r14273) +++ branches/1.1.x/test/lisp/ansi/ansi-test-failures Sun Dec 2 00:58:26 2012 (r14274) @@ -498,3 +498,22 @@ MAKE-CONCATENATED-STREAM.30 PRINT.RANDOM-STATE.1 PPRINT-LOGICAL-BLOCK.17)) + +;;15 out of 21707 total tests failed: +(compileit abcl-1.1.0-rc-0 :id saturn-java6 +(PSETF.37 +CALL-NEXT-METHOD.ERROR.1 +CALL-NEXT-METHOD.ERROR.2 +INVOKE-DEBUGGER.1 +MAKE-CONDITION.3 +MAKE-CONDITION.4 +SXHASH.8 +MAP.48 +TYPE-OF.1 +TYPE-OF.4 +MAKE-CONCATENATED-STREAM.30 +PRINT.BACKQUOTE.RANDOM.14 +PRINT.RANDOM-STATE.1 +PPRINT-LOGICAL-BLOCK.17 +TRACE.8)) + From mevenson at common-lisp.net Sun Dec 2 10:14:32 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 02:14:32 -0800 Subject: [armedbear-cvs] r14275 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sun Dec 2 02:14:31 2012 New Revision: 14275 Log: Mark EXT:RUN-SHELL-COMMAND as deprecated. Modified: trunk/abcl/src/org/armedbear/lisp/run-shell-command.lisp Modified: trunk/abcl/src/org/armedbear/lisp/run-shell-command.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/run-shell-command.lisp Sun Dec 2 00:58:26 2012 (r14274) +++ trunk/abcl/src/org/armedbear/lisp/run-shell-command.lisp Sun Dec 2 02:14:31 2012 (r14275) @@ -33,5 +33,7 @@ (export '(run-shell-command)) +;; Deprecated: use SYS:RUN-PROGRAM ;; XXX (defun run-shell-command (command &key directory (output *standard-output*)) + "Deprecated. Use SYS:RUN-PROGRAM." (sys::%run-shell-command command directory output)) From mevenson at common-lisp.net Sun Dec 2 12:42:32 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 04:42:32 -0800 Subject: [armedbear-cvs] r14276 - trunk/abcl Message-ID: Author: mevenson Date: Sun Dec 2 04:42:31 2012 New Revision: 14276 Log: abcl.rdf: correct parsability with Jeannie. Modified: trunk/abcl/abcl.rdf Modified: trunk/abcl/abcl.rdf ============================================================================== --- trunk/abcl/abcl.rdf Sun Dec 2 02:14:31 2012 (r14275) +++ trunk/abcl/abcl.rdf Sun Dec 2 04:42:31 2012 (r14276) @@ -1,6 +1,6 @@ # -*- Mode: n3 -*- - at prefix abcl: + at prefix abcl: . @prefix doap: . @prefix rdf: . @prefix rdfs: . @@ -10,6 +10,7 @@ <> rdfs:seeAlso . <> rdfs:seeAlso . + at prefix dc: . <> dc:modified "01-DEC-2012" . <> dc:version "abcl-1.2-dev" . @@ -17,15 +18,20 @@ a doap:Project ; doap:label "Armed Bear Common Lisp" ; - doap:download-page ; - doap:license [ - _:license , - ; - ] - doap:programming-language """("Common Lisp" "Java" "Ant" "Shell Script") """" ; - doap:shortname "ABCL"^^xsd:string + doap:download ; + doap:shortname "ABCL" ; doap:contributors """( ehu easye v-ille astalla rudi peter)""" . + + doap:language + "Common Lisp", "Java", "Ant", "Bourne Shell Script", "Windows Batch Script" . + + + doap:license [ + dc:license , + ; + ] . + doap:Project rdfs:seeAlso , , From mevenson at common-lisp.net Mon Dec 3 00:10:02 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 16:10:02 -0800 Subject: [armedbear-cvs] r14277 - in trunk/abcl: doc/asdf src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sun Dec 2 16:09:58 2012 New Revision: 14277 Log: Sync to asdf-2.26.6. Fixes #271. Modified: trunk/abcl/doc/asdf/asdf.texinfo trunk/abcl/src/org/armedbear/lisp/asdf.lisp Modified: trunk/abcl/doc/asdf/asdf.texinfo ============================================================================== --- trunk/abcl/doc/asdf/asdf.texinfo Sun Dec 2 04:42:31 2012 (r14276) +++ trunk/abcl/doc/asdf/asdf.texinfo Sun Dec 2 16:09:58 2012 (r14277) @@ -317,9 +317,9 @@ @item Any ASDF extension becomes invalid, and will need to be reloaded. This applies to e.g. CFFI-Grovel, or to hacks used by ironclad, etc. -Starting with ASDF 2.014.8, ASDF will actually invalidate -all previously loaded systems when it is loaded on top of -a different ASDF version. +Starting with ASDF 2.014.8 (as far as releases go, 2.015), +ASDF will actually invalidate all previously loaded systems +when it is loaded on top of a different ASDF version. @item Until all implementations provide ASDF 2.015 or later, it is safer if you upgrade ASDF and its extensions as a special step @@ -341,6 +341,13 @@ (asdf:asdf-version) *required-asdf-version*)) (error "FOO requires ASDF ~A or later." *required-asdf-version*)) @end example + at item +Until all implementations provide ASDF 2.27 or later, +it is unsafe for a system to transitively depend on ASDF +and not directly depend on ASDF; +if any of the system you use either depends-on asdf, +system-depends-on asdf, or transitively does, +you should also do as well. @end itemize @@ -637,7 +644,8 @@ @end example On some implementations (namely recent versions of -ABCL, Allegro CL, Clozure CL, CMUCL, ECL, GNU CLISP, LispWorks, MKCL, SBCL and XCL), +ABCL, Allegro CL, Clozure CL, CMUCL, ECL, GNU CLISP, +LispWorks, MKCL, SBCL and XCL), ASDF hooks into the @code{CL:REQUIRE} facility and you can just use: @@ -688,6 +696,13 @@ it must be able to find and load that system's definition. @xref{Configuring ASDF,,Configuring ASDF to find your systems}. +For the advanced users, note that + at code{require-system} calls @code{load-system} +with keyword arguments @code{:force-not (loaded-systems)}. + at code{loaded-systems} returns a list of the names of loaded systems. + at code{load-system} applies @code{operate} with the operation from + at code{*load-system-operation*}, which by default is @code{load-op}, +the system, and any provided keyword arguments. @section Summary @@ -1309,8 +1324,8 @@ Operations are invoked on systems via @code{operate}. @anchor{operate} - at deffn {Generic function} @code{operate} @var{operation} @var{system} @&rest @var{initargs} - at deffnx {Generic function} @code{oos} @var{operation} @var{system} @&rest @var{initargs} + at deffn {Generic function} @code{operate} @var{operation} @var{system} @&rest @var{initargs} @&key @code{force} @code{force-not} @code{verbose} @&allow-other-keys + at deffnx {Generic function} @code{oos} @var{operation} @var{system} @&rest @var{initargs} @&key @&allow-other-keys @code{operate} invokes @var{operation} on @var{system}. @code{oos} is a synonym for @code{operate}. @@ -1325,6 +1340,16 @@ the new operations will be created with the same @var{initargs} as the original one. +If @var{force} is @code{t}, then all systems +are forced to be recompiled even if not modified since last compilation. +If @var{force} is a list, then it specifies a list of systems that +are forced to be recompiled even if not modified since last compilation. +If @var{force-not} is @code{t}, then all systems +are forced not to be recompiled even if modified since last compilation. +If @var{force-not} is a list, then it specifies a list of systems that +are forced not to be recompiled even if modified since last compilation. + at var{force} takes precedences over @var{force-not}; +both of them apply to systems that are dependencies and were already compiled. @end deffn @menu @@ -2886,17 +2911,25 @@ @code{nil} means the normal compile-file function will be called. A non-nil value designates a function of one argument that will be called with a function that -calls the @code{*compile-op-compile-file-function*} (usually @code{compile-file*}) +calls the @code{*compile-op-compile-file-function*} +(usually @code{compile-file*}) with proper arguments; the around-compile hook may supply additional arguments to pass to that @code{*compile-op-compile-file-function*}. + One notable argument that is heeded by @code{compile-file*} is - at code{:compile-check}, a function called when the compilation was otherwise a success, -with the same arguments as @code{compile-file}, -to determine whether -(NB: The ability to pass such extra flags is only available starting with asdf 2.22.1.) + at code{:compile-check}, +a function called when the compilation was otherwise a success, +with the same arguments as @code{compile-file}; +the function shall return true if the compilation +and its resulting compiled file respected all system-specific invariants, +and false (NIL) if it broke any of those invariants; +it may issue warnings or errors before it returns NIL. +(NB: The ability to pass such extra flags +is only available starting with ASDF 2.22.3.) +This feature is notably exercised by asdf-finalizers. -Note that by using a string, you may reference +By using a string, you may reference a function, symbol and/or package that will only be created later during the build, but isn't yet present at the time the defsystem form is evaluated. @@ -3241,9 +3274,9 @@ to see if the new API is present. @emph{All} versions of ASDF should have the @code{:asdf} feature. -Additionally, all versions of asdf 2 +Additionally, all versions of ASDF 2 define a function @code{(asdf:asdf-version)} you may use to query the version; -and the source code of recent versions of asdf 2 features the version number +and the source code of recent versions of ASDF 2 features the version number prominently on the second line of its source code. If you are experiencing problems or limitations of any sort with ASDF 1, @@ -3462,7 +3495,8 @@ @xref{FAQ,,``How can I wholly disable the compiler output cache?''}. @item -Some systems in the large have been known not to play well with output translations. +Some systems in the large have been known +not to play well with output translations. They were relatively easy to fix. Once again, it is also easy to disable output translations, or to override its configuration. @@ -3482,9 +3516,11 @@ @itemize @item -ASDF pathname designators are now specified in places where they were unspecified, +ASDF pathname designators are now specified +in places where they were unspecified, and a few small adjustments have to be made to some non-portable defsystems. -Notably, in the @code{:pathname} argument to a @code{defsystem} and its components, +Notably, in the @code{:pathname} argument +to a @code{defsystem} and its components, a logical pathname (or implementation-dependent hierarchical pathname) must now be specified with @code{#p} syntax where the namestring might have previously sufficed; @@ -3512,20 +3548,26 @@ On Windows, only LispWorks supports proper default configuration pathnames based on the Windows registry. Other implementations make do with environment variables, -that you may have to define yourself if you're using an older version of Windows. +that you may have to define yourself +if you're using an older version of Windows. Windows support is somewhat less tested than Unix support. Please help report and fix bugs. + at emph{Update}: As of ASDF 2.21, all implementations +should now use the same proper default configuration pathnames +and they should actually work, though they haven't all been tested. @item The mechanism by which one customizes a system so that Lisp files may use a different extension from the default @file{.lisp} has changed. -Previously, the pathname for a component was lazily computed when operating on a system, +Previously, the pathname for a component +was lazily computed when operating on a system, and you would @code{(defmethod source-file-type ((component cl-source-file) (system (eql (find-system 'foo)))) (declare (ignorable component system)) "lis")}. Now, the pathname for a component is eagerly computed when defining the system, and instead you will @code{(defclass cl-source-file.lis (cl-source-file) ((type :initform "lis")))} -and use @code{:default-component-class cl-source-file.lis} as argument to @code{defsystem}, +and use @code{:default-component-class cl-source-file.lis} +as argument to @code{defsystem}, as detailed in a @pxref{FAQ,How do I create a system definition where all the source files have a .cl extension?} below. @findex source-file-type @@ -3553,7 +3595,8 @@ it should always be a good time to upgrade to a recent ASDF. You may consult with the maintainer for which specific version they recommend, but the latest @code{release} should be correct. -We trust you to thoroughly test it with your implementation before you release it. +We trust you to thoroughly test it with your implementation +before you release it. If there are any issues with the current release, it's a bug that you should report upstream and that we will fix ASAP. @@ -3571,6 +3614,7 @@ If your system provides a mechanism to hook into @code{CL:REQUIRE}, then it would be nice to add ASDF to this hook the same way that ABCL, CCL, CLISP, CMUCL, ECL, SBCL and SCL do it. +Please send us appropriate code to this end. @item You may, like SBCL, have ASDF be implicitly used to require systems @@ -3906,25 +3950,16 @@ Reinstate @code{parse-option} or something akin. -** document all the error classes - -** what to do with compile-file failure - -Should check the primary return value from compile-file and see if -that gets us any closer to a sensible error handling strategy - -** foreign files - -lift unix-dso stuff from db-sockets - ** Diagnostics A ``dry run'' of an operation can be made with the following form: @lisp -(traverse (make-instance ') - (find-system ) - 'explain) +(let ((asdf::*verbose-out* *standard-output*)) + (loop :for (op . comp) :in + (asdf::traverse (make-instance ' :force t) + (asdf:find-system )) + :do (asdf:explain op comp))) @end lisp This uses unexported symbols. @@ -3934,13 +3969,9 @@ ** reuse the same scratch package whenever a system is reloaded from disk -** proclamations probably aren't +Have a package ASDF-USER instead of all these temporary packages? -** when a system is reloaded with fewer components than it previously had, odd things happen - -We should do something inventive when processing a @code{defsystem} form, -like take the list of kids and @code{setf} the slot to @code{nil}, -then transfer children from old to new list as they're found. +** proclamations probably aren't ** (stuff that might happen later) @@ -3950,9 +3981,11 @@ @code{(asdf:compile-system :araneida :force t)} -also forces compilation of every other system the @code{:araneida} system depends on. +also forces compilation of every other system +the @code{:araneida} system depends on. This is rarely useful to me; -usually, when I want to force recompilation of something more than a single source file, +usually, when I want to force recompilation +of something more than a single source file, I want to recompile only one system. So it would be more useful to have @code{make-sub-operation} refuse to propagate @code{:force t} to other systems, and Modified: trunk/abcl/src/org/armedbear/lisp/asdf.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/asdf.lisp Sun Dec 2 04:42:31 2012 (r14276) +++ trunk/abcl/src/org/armedbear/lisp/asdf.lisp Sun Dec 2 16:09:58 2012 (r14277) @@ -1,5 +1,5 @@ ;;; -*- mode: Common-Lisp; Base: 10 ; Syntax: ANSI-Common-Lisp ; coding: utf-8 -*- -;;; This is ASDF 2.26: Another System Definition Facility. +;;; This is ASDF 2.26.6: Another System Definition Facility. ;;; ;;; Feedback, bug reports, and patches are all welcome: ;;; please mail to . @@ -118,7 +118,7 @@ ;; "2.345.6" would be a development version in the official upstream ;; "2.345.0.7" would be your seventh local modification of official release 2.345 ;; "2.345.6.7" would be your seventh local modification of development version 2.345.6 - (asdf-version "2.26") + (asdf-version "2.26.6") (existing-asdf (find-class 'component nil)) (existing-version *asdf-version*) (already-there (equal asdf-version existing-version))) @@ -215,10 +215,10 @@ (ensure-package (name &key nicknames use unintern shadow export redefined-functions) (let* ((p (ensure-exists name nicknames use))) - (ensure-unintern p (append unintern #+cmu redefined-functions)) + (ensure-unintern p unintern) (ensure-shadow p shadow) (ensure-export p export) - #-cmu (ensure-fmakunbound p redefined-functions) + (ensure-fmakunbound p redefined-functions) p))) (macrolet ((pkgdcl (name &key nicknames use export @@ -411,7 +411,7 @@ Valid values are :error, :warn, and :ignore.") (defvar *compile-file-failure-behaviour* - (or #+sbcl :error #+clisp :ignore :warn) + (or #+(or mkcl sbcl) :error #+clisp :ignore :warn) "How should ASDF react if it encounters a failure (per the ANSI spec of COMPILE-FILE) when compiling a file? Valid values are :error, :warn, and :ignore. Note that ASDF ALWAYS raises an error if it fails to create an output file when compiling.") @@ -1212,8 +1212,8 @@ ((component :reader error-component :initarg :component) (operation :reader error-operation :initarg :operation)) (:report (lambda (c s) - (format s (compatfmt "~@") - (error-operation c) (error-component c))))) + (format s (compatfmt "~@<~A while invoking ~A on ~A~@:>") + (type-of c) (error-operation c) (error-component c))))) (define-condition compile-error (operation-error) ()) (define-condition compile-failed (compile-error) ()) (define-condition compile-warned (compile-error) ()) @@ -1461,8 +1461,7 @@ (maintainer :accessor system-maintainer :initarg :maintainer) (licence :accessor system-licence :initarg :licence :accessor system-license :initarg :license) - (source-file :reader %system-source-file :initarg :source-file ; for CLISP upgrade - :writer %set-system-source-file) + (source-file :initarg :source-file :writer %set-system-source-file) ; upgrade issues on CLISP, CMUCL (defsystem-depends-on :reader system-defsystem-depends-on :initarg :defsystem-depends-on))) ;;;; ------------------------------------------------------------------------- @@ -1636,12 +1635,8 @@ FN should be a function of one argument. It will be called with an object of type asdf:system." - (maphash #'(lambda (_ datum) - (declare (ignore _)) - (destructuring-bind (_ . def) datum - (declare (ignore _)) - (funcall fn def))) - *defined-systems*)) + (loop :for (nil . system) :being :the hash-values :of *defined-systems* + :do (funcall fn system))) ;;; for the sake of keeping things reasonably neat, we adopt a ;;; convention that functions in this list are prefixed SYSDEF- @@ -1795,6 +1790,8 @@ (defvar *systems-being-defined* nil "A hash-table of systems currently being defined keyed by name, or NIL") +(defvar *systems-being-operated* nil + "A boolean indicating that some systems are being operated on") (defun* find-system-if-being-defined (name) (when *systems-being-defined* @@ -2004,10 +2001,10 @@ ;; the &allow-other-keys disables initarg validity checking (declare (ignorable operation slot-names force force-not)) (macrolet ((frob (x) ;; normalize forced and forced-not slots - `(when (consp (,x operation)) - (setf (,x operation) - (mapcar #'coerce-name (,x operation)))))) - (frob operation-forced) (frob operation-forced-not)) + `(when (consp (slot-value operation ',x)) + (setf (slot-value operation ',x) + (mapcar #'coerce-name (slot-value operation ',x)))))) + (frob forced) (frob forced-not)) (values)) (defun* node-for (o c) @@ -2357,7 +2354,7 @@ (r* (svref x 0)) (c x))) (r* (l) - (dolist (x l) (r x)))) + (map () #'r l))) (r* l)))) (defmethod traverse ((operation operation) (c component)) @@ -2458,11 +2455,11 @@ (let ((*package* (find-package package))) (read-from-string fun)))))))) -(defmethod call-with-around-compile-hook ((c component) thunk) - (let ((hook (around-compile-hook c))) - (if hook - (funcall (ensure-function hook) thunk) - (funcall thunk)))) +(defun call-around-hook (hook function) + (funcall (or (ensure-function hook) 'funcall) function)) + +(defmethod call-with-around-compile-hook ((c component) function) + (call-around-hook (around-compile-hook c) function)) ;;; perform is required to check output-files to find out where to put ;;; its answers, in case it has been overridden for site policy @@ -2618,10 +2615,9 @@ (defmethod operation-done-p ((o load-source-op) (c source-file)) (declare (ignorable o)) - (if (or (not (component-property c 'last-loaded-as-source)) - (> (safe-file-write-date (component-pathname c)) - (component-property c 'last-loaded-as-source))) - nil t)) + (and (component-property c 'last-loaded-as-source) + (<= (safe-file-write-date (component-pathname c)) + (component-property c 'last-loaded-as-source)))) (defmethod operation-description ((operation load-source-op) component) (declare (ignorable operation)) @@ -2657,6 +2653,7 @@ (defgeneric* operate (operation-class system &key &allow-other-keys)) (defgeneric* perform-plan (plan &key)) +(defgeneric* plan-operates-on-p (plan component)) ;;;; Separating this into a different function makes it more forward-compatible (defun* cleanup-upgraded-asdf (old-version) @@ -2691,6 +2688,10 @@ (operate 'load-op :asdf :verbose nil)) (cleanup-upgraded-asdf version))) +(defmethod plan-operates-on-p ((plan list) (component-path list)) + (find component-path (mapcar 'cdr plan) + :test 'equal :key 'component-find-path)) + (defmethod perform-plan ((steps list) &key) (let ((*package* *package*) (*readtable* *readtable*)) @@ -2699,38 +2700,44 @@ (perform-with-restarts op component))))) (defmethod operate (operation-class system &rest args - &key ((:verbose *asdf-verbose*) *asdf-verbose*) version force - &allow-other-keys) - (declare (ignore force)) + &key force force-not verbose version &allow-other-keys) + (declare (ignore force force-not)) (with-system-definitions () - (let* ((op (apply 'make-instance operation-class - :original-initargs args - args)) - (*verbose-out* (if *asdf-verbose* *standard-output* (make-broadcast-stream))) + (let* ((*asdf-verbose* verbose) + (*verbose-out* (if verbose *standard-output* (make-broadcast-stream))) + (op (apply 'make-instance operation-class + :original-initargs args args)) (system (etypecase system (system system) - ((or string symbol) (find-system system))))) - (unless (version-satisfies system version) - (error 'missing-component-of-version :requires system :version version)) - (let ((steps (traverse op system))) - (when (and (not (equal '("asdf") (component-find-path system))) - (find '("asdf") (mapcar 'cdr steps) - :test 'equal :key 'component-find-path) - (upgrade-asdf)) - ;; If we needed to upgrade ASDF to achieve our goal, - ;; then do it specially as the first thing, then - ;; invalidate all existing system - ;; retry the whole thing with the new OPERATE function, - ;; which on some implementations - ;; has a new symbol shadowing the current one. - (return-from operate - (apply (find-symbol* 'operate :asdf) operation-class system args))) - (perform-plan steps) - (values op steps))))) - -(defun* oos (operation-class system &rest args &key force verbose version - &allow-other-keys) - (declare (ignore force verbose version)) + ((or string symbol) (find-system system)))) + (systems-being-operated *systems-being-operated*) + (*systems-being-operated* (or systems-being-operated (make-hash-table :test 'equal)))) + (check-type system system) + (setf (gethash (coerce-name system) *systems-being-operated*) system) + (flet ((upgrade () + ;; If we needed to upgrade ASDF to achieve our goal, + ;; then do it specially as the first thing, + ;; which will invalidate all existing systems; + ;; afterwards, retry the whole thing with the new OPERATE function, + ;; which on some implementations + ;; has a new symbol shadowing the current one. + (unless (gethash "asdf" *systems-being-operated*) + (upgrade-asdf) + (return-from operate + (apply (find-symbol* 'operate :asdf) operation-class system args))))) + (when systems-being-operated ;; Upgrade if loading a system from another one. + (upgrade)) + (unless (version-satisfies system version) + (error 'missing-component-of-version :requires system :version version)) + (let ((plan (traverse op system))) + (when (plan-operates-on-p plan '("asdf")) + (upgrade)) ;; Upgrade early if the plan involves upgrading asdf at any time. + (perform-plan plan) + (values op plan)))))) + +(defun* oos (operation-class system &rest args + &key force force-not verbose version &allow-other-keys) + (declare (ignore force force-not verbose version)) (apply 'operate operation-class system args)) (let ((operate-docstring @@ -3183,11 +3190,11 @@ (unless (slot-boundp system 'source-file) (%set-system-source-file (probe-asd (component-name system) (component-pathname system)) system)) - (%system-source-file system)) + (slot-value system 'source-file)) (defmethod system-source-file ((system-name string)) - (%system-source-file (find-system system-name))) + (system-source-file (find-system system-name))) (defmethod system-source-file ((system-name symbol)) - (%system-source-file (find-system system-name))) + (system-source-file (find-system system-name))) (defun* system-source-directory (system-designator) "Return a pathname object corresponding to the @@ -3918,9 +3925,7 @@ (if output-file keys (remove-keyword :output-file keys)))))) (defun* tmpize-pathname (x) - (make-pathname - :name (strcat "ASDF-TMP-" (pathname-name x)) - :defaults x)) + (make-pathname :name (strcat "ASDF-TMP-" (pathname-name x)) :defaults x)) (defun* delete-file-if-exists (x) (when (and x (probe-file* x)) @@ -3955,38 +3960,32 @@ (setf output-truename nil failure-p t))) (values output-truename warnings-p failure-p)))) -#+abcl +#+abcl (defun* translate-jar-pathname (source wildcard) (declare (ignore wildcard)) - (let* ((jar - (pathname (first (pathname-device source)))) - (target-root-directory-namestring - (format nil "/___jar___file___root___/~@[~A/~]" - (and (find :windows *features*) - (pathname-device jar)))) - (relative-source - (relativize-pathname-directory source)) - (relative-jar - (relativize-pathname-directory (ensure-directory-pathname jar))) - (target-root-directory - (if (find :windows *features*) - (make-pathname :name nil - :type nil - :version nil - :defaults (parse-namestring target-root-directory-namestring)) - (make-pathname :device :unspecific - :name nil - :type nil - :version nil - :defaults (parse-namestring target-root-directory-namestring)))) - (target-root - (merge-pathnames* relative-jar target-root-directory)) - (target - (merge-pathnames* relative-source target-root))) - (if (find :windows *features*) - (apply-output-translations target) - (make-pathname :defaults (apply-output-translations target) - :device :unspecific)))) + (flet ((normalize-device (pathname) + (if (find :windows *features*) + pathname + (make-pathname :defaults pathname :device :unspecific)))) + (let* ((jar + (pathname (first (pathname-device source)))) + (target-root-directory-namestring + (format nil "/___jar___file___root___/~@[~A/~]" + (and (find :windows *features*) + (pathname-device jar)))) + (relative-source + (relativize-pathname-directory source)) + (relative-jar + (relativize-pathname-directory (ensure-directory-pathname jar))) + (target-root-directory + (normalize-device + (pathname-directory-pathname + (parse-namestring target-root-directory-namestring)))) + (target-root + (merge-pathnames* relative-jar target-root-directory)) + (target + (merge-pathnames* relative-source target-root))) + (normalize-device (apply-output-translations target))))) ;;;; ----------------------------------------------------------------- ;;;; Compatibility mode for ASDF-Binary-Locations @@ -4154,9 +4153,7 @@ (collect-sub*directories subdir collectp recursep collector)))) (defun* collect-sub*directories-asd-files - (directory &key - (exclude *default-source-registry-exclusions*) - collect) + (directory &key (exclude *default-source-registry-exclusions*) collect) (collect-sub*directories directory (constantly t) @@ -4508,19 +4505,16 @@ (asdf-message ";; ASDF, version ~a~%" (asdf-version))) #+mkcl -(progn - (defvar *loading-asdf-bundle* nil) - (unless *loading-asdf-bundle* - (let ((*central-registry* - (cons (translate-logical-pathname #P"CONTRIB:asdf-bundle;") *central-registry*)) - (*loading-asdf-bundle* t)) - (clear-system :asdf-bundle) ;; we hope to force a reload. - (multiple-value-bind (result bundling-error) - (ignore-errors (asdf:oos 'asdf:load-op :asdf-bundle)) - (unless result - (format *error-output* - "~&;;; ASDF: Failed to load package 'asdf-bundle'!~%;;; ASDF: Reason is: ~A.~%" - bundling-error)))))) +(handler-case + (progn + (load-sysdef "asdf-bundle" + (subpathname (translate-logical-pathname #P"CONTRIB:") + "asdf-bundle/asdf-bundle.asd")) + (load-system "asdf-bundle")) + (error (e) + (format *error-output* + "~&;;; ASDF: Failed to load package 'asdf-bundle'!~%;;; ~A~%" + e))) #+allegro (eval-when (:compile-toplevel :execute) From mevenson at common-lisp.net Mon Dec 3 00:17:59 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 16:17:59 -0800 Subject: [armedbear-cvs] r14278 - in branches/1.1.x: doc/asdf src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sun Dec 2 16:17:58 2012 New Revision: 14278 Log: Sync to asdf-2.26.6. Fixes #271. Backport r14277. Modified: branches/1.1.x/doc/asdf/asdf.texinfo branches/1.1.x/src/org/armedbear/lisp/asdf.lisp Modified: branches/1.1.x/doc/asdf/asdf.texinfo ============================================================================== --- branches/1.1.x/doc/asdf/asdf.texinfo Sun Dec 2 16:09:58 2012 (r14277) +++ branches/1.1.x/doc/asdf/asdf.texinfo Sun Dec 2 16:17:58 2012 (r14278) @@ -317,9 +317,9 @@ @item Any ASDF extension becomes invalid, and will need to be reloaded. This applies to e.g. CFFI-Grovel, or to hacks used by ironclad, etc. -Starting with ASDF 2.014.8, ASDF will actually invalidate -all previously loaded systems when it is loaded on top of -a different ASDF version. +Starting with ASDF 2.014.8 (as far as releases go, 2.015), +ASDF will actually invalidate all previously loaded systems +when it is loaded on top of a different ASDF version. @item Until all implementations provide ASDF 2.015 or later, it is safer if you upgrade ASDF and its extensions as a special step @@ -341,6 +341,13 @@ (asdf:asdf-version) *required-asdf-version*)) (error "FOO requires ASDF ~A or later." *required-asdf-version*)) @end example + at item +Until all implementations provide ASDF 2.27 or later, +it is unsafe for a system to transitively depend on ASDF +and not directly depend on ASDF; +if any of the system you use either depends-on asdf, +system-depends-on asdf, or transitively does, +you should also do as well. @end itemize @@ -637,7 +644,8 @@ @end example On some implementations (namely recent versions of -ABCL, Allegro CL, Clozure CL, CMUCL, ECL, GNU CLISP, LispWorks, MKCL, SBCL and XCL), +ABCL, Allegro CL, Clozure CL, CMUCL, ECL, GNU CLISP, +LispWorks, MKCL, SBCL and XCL), ASDF hooks into the @code{CL:REQUIRE} facility and you can just use: @@ -688,6 +696,13 @@ it must be able to find and load that system's definition. @xref{Configuring ASDF,,Configuring ASDF to find your systems}. +For the advanced users, note that + at code{require-system} calls @code{load-system} +with keyword arguments @code{:force-not (loaded-systems)}. + at code{loaded-systems} returns a list of the names of loaded systems. + at code{load-system} applies @code{operate} with the operation from + at code{*load-system-operation*}, which by default is @code{load-op}, +the system, and any provided keyword arguments. @section Summary @@ -1309,8 +1324,8 @@ Operations are invoked on systems via @code{operate}. @anchor{operate} - at deffn {Generic function} @code{operate} @var{operation} @var{system} @&rest @var{initargs} - at deffnx {Generic function} @code{oos} @var{operation} @var{system} @&rest @var{initargs} + at deffn {Generic function} @code{operate} @var{operation} @var{system} @&rest @var{initargs} @&key @code{force} @code{force-not} @code{verbose} @&allow-other-keys + at deffnx {Generic function} @code{oos} @var{operation} @var{system} @&rest @var{initargs} @&key @&allow-other-keys @code{operate} invokes @var{operation} on @var{system}. @code{oos} is a synonym for @code{operate}. @@ -1325,6 +1340,16 @@ the new operations will be created with the same @var{initargs} as the original one. +If @var{force} is @code{t}, then all systems +are forced to be recompiled even if not modified since last compilation. +If @var{force} is a list, then it specifies a list of systems that +are forced to be recompiled even if not modified since last compilation. +If @var{force-not} is @code{t}, then all systems +are forced not to be recompiled even if modified since last compilation. +If @var{force-not} is a list, then it specifies a list of systems that +are forced not to be recompiled even if modified since last compilation. + at var{force} takes precedences over @var{force-not}; +both of them apply to systems that are dependencies and were already compiled. @end deffn @menu @@ -2886,17 +2911,25 @@ @code{nil} means the normal compile-file function will be called. A non-nil value designates a function of one argument that will be called with a function that -calls the @code{*compile-op-compile-file-function*} (usually @code{compile-file*}) +calls the @code{*compile-op-compile-file-function*} +(usually @code{compile-file*}) with proper arguments; the around-compile hook may supply additional arguments to pass to that @code{*compile-op-compile-file-function*}. + One notable argument that is heeded by @code{compile-file*} is - at code{:compile-check}, a function called when the compilation was otherwise a success, -with the same arguments as @code{compile-file}, -to determine whether -(NB: The ability to pass such extra flags is only available starting with asdf 2.22.1.) + at code{:compile-check}, +a function called when the compilation was otherwise a success, +with the same arguments as @code{compile-file}; +the function shall return true if the compilation +and its resulting compiled file respected all system-specific invariants, +and false (NIL) if it broke any of those invariants; +it may issue warnings or errors before it returns NIL. +(NB: The ability to pass such extra flags +is only available starting with ASDF 2.22.3.) +This feature is notably exercised by asdf-finalizers. -Note that by using a string, you may reference +By using a string, you may reference a function, symbol and/or package that will only be created later during the build, but isn't yet present at the time the defsystem form is evaluated. @@ -3241,9 +3274,9 @@ to see if the new API is present. @emph{All} versions of ASDF should have the @code{:asdf} feature. -Additionally, all versions of asdf 2 +Additionally, all versions of ASDF 2 define a function @code{(asdf:asdf-version)} you may use to query the version; -and the source code of recent versions of asdf 2 features the version number +and the source code of recent versions of ASDF 2 features the version number prominently on the second line of its source code. If you are experiencing problems or limitations of any sort with ASDF 1, @@ -3462,7 +3495,8 @@ @xref{FAQ,,``How can I wholly disable the compiler output cache?''}. @item -Some systems in the large have been known not to play well with output translations. +Some systems in the large have been known +not to play well with output translations. They were relatively easy to fix. Once again, it is also easy to disable output translations, or to override its configuration. @@ -3482,9 +3516,11 @@ @itemize @item -ASDF pathname designators are now specified in places where they were unspecified, +ASDF pathname designators are now specified +in places where they were unspecified, and a few small adjustments have to be made to some non-portable defsystems. -Notably, in the @code{:pathname} argument to a @code{defsystem} and its components, +Notably, in the @code{:pathname} argument +to a @code{defsystem} and its components, a logical pathname (or implementation-dependent hierarchical pathname) must now be specified with @code{#p} syntax where the namestring might have previously sufficed; @@ -3512,20 +3548,26 @@ On Windows, only LispWorks supports proper default configuration pathnames based on the Windows registry. Other implementations make do with environment variables, -that you may have to define yourself if you're using an older version of Windows. +that you may have to define yourself +if you're using an older version of Windows. Windows support is somewhat less tested than Unix support. Please help report and fix bugs. + at emph{Update}: As of ASDF 2.21, all implementations +should now use the same proper default configuration pathnames +and they should actually work, though they haven't all been tested. @item The mechanism by which one customizes a system so that Lisp files may use a different extension from the default @file{.lisp} has changed. -Previously, the pathname for a component was lazily computed when operating on a system, +Previously, the pathname for a component +was lazily computed when operating on a system, and you would @code{(defmethod source-file-type ((component cl-source-file) (system (eql (find-system 'foo)))) (declare (ignorable component system)) "lis")}. Now, the pathname for a component is eagerly computed when defining the system, and instead you will @code{(defclass cl-source-file.lis (cl-source-file) ((type :initform "lis")))} -and use @code{:default-component-class cl-source-file.lis} as argument to @code{defsystem}, +and use @code{:default-component-class cl-source-file.lis} +as argument to @code{defsystem}, as detailed in a @pxref{FAQ,How do I create a system definition where all the source files have a .cl extension?} below. @findex source-file-type @@ -3553,7 +3595,8 @@ it should always be a good time to upgrade to a recent ASDF. You may consult with the maintainer for which specific version they recommend, but the latest @code{release} should be correct. -We trust you to thoroughly test it with your implementation before you release it. +We trust you to thoroughly test it with your implementation +before you release it. If there are any issues with the current release, it's a bug that you should report upstream and that we will fix ASAP. @@ -3571,6 +3614,7 @@ If your system provides a mechanism to hook into @code{CL:REQUIRE}, then it would be nice to add ASDF to this hook the same way that ABCL, CCL, CLISP, CMUCL, ECL, SBCL and SCL do it. +Please send us appropriate code to this end. @item You may, like SBCL, have ASDF be implicitly used to require systems @@ -3906,25 +3950,16 @@ Reinstate @code{parse-option} or something akin. -** document all the error classes - -** what to do with compile-file failure - -Should check the primary return value from compile-file and see if -that gets us any closer to a sensible error handling strategy - -** foreign files - -lift unix-dso stuff from db-sockets - ** Diagnostics A ``dry run'' of an operation can be made with the following form: @lisp -(traverse (make-instance ') - (find-system ) - 'explain) +(let ((asdf::*verbose-out* *standard-output*)) + (loop :for (op . comp) :in + (asdf::traverse (make-instance ' :force t) + (asdf:find-system )) + :do (asdf:explain op comp))) @end lisp This uses unexported symbols. @@ -3934,13 +3969,9 @@ ** reuse the same scratch package whenever a system is reloaded from disk -** proclamations probably aren't +Have a package ASDF-USER instead of all these temporary packages? -** when a system is reloaded with fewer components than it previously had, odd things happen - -We should do something inventive when processing a @code{defsystem} form, -like take the list of kids and @code{setf} the slot to @code{nil}, -then transfer children from old to new list as they're found. +** proclamations probably aren't ** (stuff that might happen later) @@ -3950,9 +3981,11 @@ @code{(asdf:compile-system :araneida :force t)} -also forces compilation of every other system the @code{:araneida} system depends on. +also forces compilation of every other system +the @code{:araneida} system depends on. This is rarely useful to me; -usually, when I want to force recompilation of something more than a single source file, +usually, when I want to force recompilation +of something more than a single source file, I want to recompile only one system. So it would be more useful to have @code{make-sub-operation} refuse to propagate @code{:force t} to other systems, and Modified: branches/1.1.x/src/org/armedbear/lisp/asdf.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/asdf.lisp Sun Dec 2 16:09:58 2012 (r14277) +++ branches/1.1.x/src/org/armedbear/lisp/asdf.lisp Sun Dec 2 16:17:58 2012 (r14278) @@ -1,5 +1,5 @@ ;;; -*- mode: Common-Lisp; Base: 10 ; Syntax: ANSI-Common-Lisp ; coding: utf-8 -*- -;;; This is ASDF 2.26: Another System Definition Facility. +;;; This is ASDF 2.26.6: Another System Definition Facility. ;;; ;;; Feedback, bug reports, and patches are all welcome: ;;; please mail to . @@ -118,7 +118,7 @@ ;; "2.345.6" would be a development version in the official upstream ;; "2.345.0.7" would be your seventh local modification of official release 2.345 ;; "2.345.6.7" would be your seventh local modification of development version 2.345.6 - (asdf-version "2.26") + (asdf-version "2.26.6") (existing-asdf (find-class 'component nil)) (existing-version *asdf-version*) (already-there (equal asdf-version existing-version))) @@ -215,10 +215,10 @@ (ensure-package (name &key nicknames use unintern shadow export redefined-functions) (let* ((p (ensure-exists name nicknames use))) - (ensure-unintern p (append unintern #+cmu redefined-functions)) + (ensure-unintern p unintern) (ensure-shadow p shadow) (ensure-export p export) - #-cmu (ensure-fmakunbound p redefined-functions) + (ensure-fmakunbound p redefined-functions) p))) (macrolet ((pkgdcl (name &key nicknames use export @@ -411,7 +411,7 @@ Valid values are :error, :warn, and :ignore.") (defvar *compile-file-failure-behaviour* - (or #+sbcl :error #+clisp :ignore :warn) + (or #+(or mkcl sbcl) :error #+clisp :ignore :warn) "How should ASDF react if it encounters a failure (per the ANSI spec of COMPILE-FILE) when compiling a file? Valid values are :error, :warn, and :ignore. Note that ASDF ALWAYS raises an error if it fails to create an output file when compiling.") @@ -1212,8 +1212,8 @@ ((component :reader error-component :initarg :component) (operation :reader error-operation :initarg :operation)) (:report (lambda (c s) - (format s (compatfmt "~@") - (error-operation c) (error-component c))))) + (format s (compatfmt "~@<~A while invoking ~A on ~A~@:>") + (type-of c) (error-operation c) (error-component c))))) (define-condition compile-error (operation-error) ()) (define-condition compile-failed (compile-error) ()) (define-condition compile-warned (compile-error) ()) @@ -1461,8 +1461,7 @@ (maintainer :accessor system-maintainer :initarg :maintainer) (licence :accessor system-licence :initarg :licence :accessor system-license :initarg :license) - (source-file :reader %system-source-file :initarg :source-file ; for CLISP upgrade - :writer %set-system-source-file) + (source-file :initarg :source-file :writer %set-system-source-file) ; upgrade issues on CLISP, CMUCL (defsystem-depends-on :reader system-defsystem-depends-on :initarg :defsystem-depends-on))) ;;;; ------------------------------------------------------------------------- @@ -1636,12 +1635,8 @@ FN should be a function of one argument. It will be called with an object of type asdf:system." - (maphash #'(lambda (_ datum) - (declare (ignore _)) - (destructuring-bind (_ . def) datum - (declare (ignore _)) - (funcall fn def))) - *defined-systems*)) + (loop :for (nil . system) :being :the hash-values :of *defined-systems* + :do (funcall fn system))) ;;; for the sake of keeping things reasonably neat, we adopt a ;;; convention that functions in this list are prefixed SYSDEF- @@ -1795,6 +1790,8 @@ (defvar *systems-being-defined* nil "A hash-table of systems currently being defined keyed by name, or NIL") +(defvar *systems-being-operated* nil + "A boolean indicating that some systems are being operated on") (defun* find-system-if-being-defined (name) (when *systems-being-defined* @@ -2004,10 +2001,10 @@ ;; the &allow-other-keys disables initarg validity checking (declare (ignorable operation slot-names force force-not)) (macrolet ((frob (x) ;; normalize forced and forced-not slots - `(when (consp (,x operation)) - (setf (,x operation) - (mapcar #'coerce-name (,x operation)))))) - (frob operation-forced) (frob operation-forced-not)) + `(when (consp (slot-value operation ',x)) + (setf (slot-value operation ',x) + (mapcar #'coerce-name (slot-value operation ',x)))))) + (frob forced) (frob forced-not)) (values)) (defun* node-for (o c) @@ -2357,7 +2354,7 @@ (r* (svref x 0)) (c x))) (r* (l) - (dolist (x l) (r x)))) + (map () #'r l))) (r* l)))) (defmethod traverse ((operation operation) (c component)) @@ -2458,11 +2455,11 @@ (let ((*package* (find-package package))) (read-from-string fun)))))))) -(defmethod call-with-around-compile-hook ((c component) thunk) - (let ((hook (around-compile-hook c))) - (if hook - (funcall (ensure-function hook) thunk) - (funcall thunk)))) +(defun call-around-hook (hook function) + (funcall (or (ensure-function hook) 'funcall) function)) + +(defmethod call-with-around-compile-hook ((c component) function) + (call-around-hook (around-compile-hook c) function)) ;;; perform is required to check output-files to find out where to put ;;; its answers, in case it has been overridden for site policy @@ -2618,10 +2615,9 @@ (defmethod operation-done-p ((o load-source-op) (c source-file)) (declare (ignorable o)) - (if (or (not (component-property c 'last-loaded-as-source)) - (> (safe-file-write-date (component-pathname c)) - (component-property c 'last-loaded-as-source))) - nil t)) + (and (component-property c 'last-loaded-as-source) + (<= (safe-file-write-date (component-pathname c)) + (component-property c 'last-loaded-as-source)))) (defmethod operation-description ((operation load-source-op) component) (declare (ignorable operation)) @@ -2657,6 +2653,7 @@ (defgeneric* operate (operation-class system &key &allow-other-keys)) (defgeneric* perform-plan (plan &key)) +(defgeneric* plan-operates-on-p (plan component)) ;;;; Separating this into a different function makes it more forward-compatible (defun* cleanup-upgraded-asdf (old-version) @@ -2691,6 +2688,10 @@ (operate 'load-op :asdf :verbose nil)) (cleanup-upgraded-asdf version))) +(defmethod plan-operates-on-p ((plan list) (component-path list)) + (find component-path (mapcar 'cdr plan) + :test 'equal :key 'component-find-path)) + (defmethod perform-plan ((steps list) &key) (let ((*package* *package*) (*readtable* *readtable*)) @@ -2699,38 +2700,44 @@ (perform-with-restarts op component))))) (defmethod operate (operation-class system &rest args - &key ((:verbose *asdf-verbose*) *asdf-verbose*) version force - &allow-other-keys) - (declare (ignore force)) + &key force force-not verbose version &allow-other-keys) + (declare (ignore force force-not)) (with-system-definitions () - (let* ((op (apply 'make-instance operation-class - :original-initargs args - args)) - (*verbose-out* (if *asdf-verbose* *standard-output* (make-broadcast-stream))) + (let* ((*asdf-verbose* verbose) + (*verbose-out* (if verbose *standard-output* (make-broadcast-stream))) + (op (apply 'make-instance operation-class + :original-initargs args args)) (system (etypecase system (system system) - ((or string symbol) (find-system system))))) - (unless (version-satisfies system version) - (error 'missing-component-of-version :requires system :version version)) - (let ((steps (traverse op system))) - (when (and (not (equal '("asdf") (component-find-path system))) - (find '("asdf") (mapcar 'cdr steps) - :test 'equal :key 'component-find-path) - (upgrade-asdf)) - ;; If we needed to upgrade ASDF to achieve our goal, - ;; then do it specially as the first thing, then - ;; invalidate all existing system - ;; retry the whole thing with the new OPERATE function, - ;; which on some implementations - ;; has a new symbol shadowing the current one. - (return-from operate - (apply (find-symbol* 'operate :asdf) operation-class system args))) - (perform-plan steps) - (values op steps))))) - -(defun* oos (operation-class system &rest args &key force verbose version - &allow-other-keys) - (declare (ignore force verbose version)) + ((or string symbol) (find-system system)))) + (systems-being-operated *systems-being-operated*) + (*systems-being-operated* (or systems-being-operated (make-hash-table :test 'equal)))) + (check-type system system) + (setf (gethash (coerce-name system) *systems-being-operated*) system) + (flet ((upgrade () + ;; If we needed to upgrade ASDF to achieve our goal, + ;; then do it specially as the first thing, + ;; which will invalidate all existing systems; + ;; afterwards, retry the whole thing with the new OPERATE function, + ;; which on some implementations + ;; has a new symbol shadowing the current one. + (unless (gethash "asdf" *systems-being-operated*) + (upgrade-asdf) + (return-from operate + (apply (find-symbol* 'operate :asdf) operation-class system args))))) + (when systems-being-operated ;; Upgrade if loading a system from another one. + (upgrade)) + (unless (version-satisfies system version) + (error 'missing-component-of-version :requires system :version version)) + (let ((plan (traverse op system))) + (when (plan-operates-on-p plan '("asdf")) + (upgrade)) ;; Upgrade early if the plan involves upgrading asdf at any time. + (perform-plan plan) + (values op plan)))))) + +(defun* oos (operation-class system &rest args + &key force force-not verbose version &allow-other-keys) + (declare (ignore force force-not verbose version)) (apply 'operate operation-class system args)) (let ((operate-docstring @@ -3183,11 +3190,11 @@ (unless (slot-boundp system 'source-file) (%set-system-source-file (probe-asd (component-name system) (component-pathname system)) system)) - (%system-source-file system)) + (slot-value system 'source-file)) (defmethod system-source-file ((system-name string)) - (%system-source-file (find-system system-name))) + (system-source-file (find-system system-name))) (defmethod system-source-file ((system-name symbol)) - (%system-source-file (find-system system-name))) + (system-source-file (find-system system-name))) (defun* system-source-directory (system-designator) "Return a pathname object corresponding to the @@ -3918,9 +3925,7 @@ (if output-file keys (remove-keyword :output-file keys)))))) (defun* tmpize-pathname (x) - (make-pathname - :name (strcat "ASDF-TMP-" (pathname-name x)) - :defaults x)) + (make-pathname :name (strcat "ASDF-TMP-" (pathname-name x)) :defaults x)) (defun* delete-file-if-exists (x) (when (and x (probe-file* x)) @@ -3955,38 +3960,32 @@ (setf output-truename nil failure-p t))) (values output-truename warnings-p failure-p)))) -#+abcl +#+abcl (defun* translate-jar-pathname (source wildcard) (declare (ignore wildcard)) - (let* ((jar - (pathname (first (pathname-device source)))) - (target-root-directory-namestring - (format nil "/___jar___file___root___/~@[~A/~]" - (and (find :windows *features*) - (pathname-device jar)))) - (relative-source - (relativize-pathname-directory source)) - (relative-jar - (relativize-pathname-directory (ensure-directory-pathname jar))) - (target-root-directory - (if (find :windows *features*) - (make-pathname :name nil - :type nil - :version nil - :defaults (parse-namestring target-root-directory-namestring)) - (make-pathname :device :unspecific - :name nil - :type nil - :version nil - :defaults (parse-namestring target-root-directory-namestring)))) - (target-root - (merge-pathnames* relative-jar target-root-directory)) - (target - (merge-pathnames* relative-source target-root))) - (if (find :windows *features*) - (apply-output-translations target) - (make-pathname :defaults (apply-output-translations target) - :device :unspecific)))) + (flet ((normalize-device (pathname) + (if (find :windows *features*) + pathname + (make-pathname :defaults pathname :device :unspecific)))) + (let* ((jar + (pathname (first (pathname-device source)))) + (target-root-directory-namestring + (format nil "/___jar___file___root___/~@[~A/~]" + (and (find :windows *features*) + (pathname-device jar)))) + (relative-source + (relativize-pathname-directory source)) + (relative-jar + (relativize-pathname-directory (ensure-directory-pathname jar))) + (target-root-directory + (normalize-device + (pathname-directory-pathname + (parse-namestring target-root-directory-namestring)))) + (target-root + (merge-pathnames* relative-jar target-root-directory)) + (target + (merge-pathnames* relative-source target-root))) + (normalize-device (apply-output-translations target))))) ;;;; ----------------------------------------------------------------- ;;;; Compatibility mode for ASDF-Binary-Locations @@ -4154,9 +4153,7 @@ (collect-sub*directories subdir collectp recursep collector)))) (defun* collect-sub*directories-asd-files - (directory &key - (exclude *default-source-registry-exclusions*) - collect) + (directory &key (exclude *default-source-registry-exclusions*) collect) (collect-sub*directories directory (constantly t) @@ -4508,19 +4505,16 @@ (asdf-message ";; ASDF, version ~a~%" (asdf-version))) #+mkcl -(progn - (defvar *loading-asdf-bundle* nil) - (unless *loading-asdf-bundle* - (let ((*central-registry* - (cons (translate-logical-pathname #P"CONTRIB:asdf-bundle;") *central-registry*)) - (*loading-asdf-bundle* t)) - (clear-system :asdf-bundle) ;; we hope to force a reload. - (multiple-value-bind (result bundling-error) - (ignore-errors (asdf:oos 'asdf:load-op :asdf-bundle)) - (unless result - (format *error-output* - "~&;;; ASDF: Failed to load package 'asdf-bundle'!~%;;; ASDF: Reason is: ~A.~%" - bundling-error)))))) +(handler-case + (progn + (load-sysdef "asdf-bundle" + (subpathname (translate-logical-pathname #P"CONTRIB:") + "asdf-bundle/asdf-bundle.asd")) + (load-system "asdf-bundle")) + (error (e) + (format *error-output* + "~&;;; ASDF: Failed to load package 'asdf-bundle'!~%;;; ~A~%" + e))) #+allegro (eval-when (:compile-toplevel :execute) From mevenson at common-lisp.net Mon Dec 3 01:37:56 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 17:37:56 -0800 Subject: [armedbear-cvs] r14279 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sun Dec 2 17:37:56 2012 New Revision: 14279 Log: branches/1.1.x: now produces abcl-1.1.0-rc-1 artifacts. Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Sun Dec 2 16:17:58 2012 (r14278) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Sun Dec 2 17:37:56 2012 (r14279) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0-rc-0"; + static final String baseVersion = "1.1.0-rc-1"; static void init() { try { From mevenson at common-lisp.net Mon Dec 3 03:27:31 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 19:27:31 -0800 Subject: [armedbear-cvs] r14280 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Sun Dec 2 19:27:31 2012 New Revision: 14280 Log: manual: Note inclusion of asdf-2.26.6 with ABCL 1.1 Modified: branches/1.1.x/doc/manual/abcl.tex Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Sun Dec 2 17:37:56 2012 (r14279) +++ branches/1.1.x/doc/manual/abcl.tex Sun Dec 2 19:27:31 2012 (r14280) @@ -10,7 +10,7 @@ \title{Armed Bear Common Lisp User Manual} \date{Version 1.1.0\\ \smallskip -December 1, 2012} +December 3, 2012} \author{Mark Evenson \and Erik H\"{u}lsmann \and Rudolf Schlatte \and Alessio Stalla \and Ville Voutilainen} @@ -18,10 +18,10 @@ \tableofcontents -%%\chapter{Preface} +\chapter{Preface} %%Preface to the second edition, abcl-1.1.0. - -ABCL 1.1 now contains (A)MOP. We hope you enjoy. +\section{Second Edition} +ABCL 1.1 now contains (A)MOP. We hope you enjoy! --The Mgmt. \chapter{Introduction} @@ -1053,7 +1053,10 @@ \item \code{mvn} These systems name common JVM artifacts from the distributed pom.xml graph of Maven Aether: \begin{enumerate} - \item \code{jna} Dynamically load 'jna.jar' version 3.4.0 from the network. + \item \code{jna} Dynamically load 'jna.jar' version 3.5.1 + from the network \footnote{This loading can be inhibited + if, at runtime, the Java class corresponding + ``:classname'' clause of the system defition is present.} \end{enumerate} \item \code{quicklisp-abcl} (Not working) boot a local Quicklisp installation via the ASDF:IRI type introduced bia ABCL-ASDF. @@ -1076,7 +1079,7 @@ \section{ASDF} -asdf-2.25 (see \cite{asdf}) is packaged as core component of ABCL, +asdf-2.26.6 (see \cite{asdf}) is packaged as core component of ABCL, but not initialized by default, as it relies on the CLOS subsystem which can take a bit of time to start \footnote{While this time is ``merely'' on the order of seconds for contemporary 2011 machines, From mevenson at common-lisp.net Mon Dec 3 04:12:52 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 20:12:52 -0800 Subject: [armedbear-cvs] r14281 - branches/1.1.x Message-ID: Author: mevenson Date: Sun Dec 2 20:12:52 2012 New Revision: 14281 Log: abcl.asd: Add Lisp for Manual for grovel infrastructure. Define needed symbols in CL-USER (should not appear in documentation). Modified: branches/1.1.x/abcl.asd Modified: branches/1.1.x/abcl.asd ============================================================================== --- branches/1.1.x/abcl.asd Sun Dec 2 19:27:31 2012 (r14280) +++ branches/1.1.x/abcl.asd Sun Dec 2 20:12:52 2012 (r14281) @@ -26,6 +26,9 @@ (:module package :depends-on (abcl-rt) :pathname "test/lisp/abcl/" :components ((:file "package"))) + (:module manual :pathname "doc/manual/" + :components ((:file "grovel") + (:file "index" :depends-on (grovel)))) (:module test :depends-on (package) :pathname "test/lisp/abcl/" :components ((:file "utilities") From mevenson at common-lisp.net Mon Dec 3 04:12:55 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 20:12:55 -0800 Subject: [armedbear-cvs] r14282 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Sun Dec 2 20:12:54 2012 New Revision: 14282 Log: manual: Updates to manual for ABCL 1.1. Preface to the second addition. TODO TeX. Added Appendix for SYSTEM and JSS packages. TODO Need to fix LaTex. Added: branches/1.1.x/doc/manual/jss.tex branches/1.1.x/doc/manual/system.tex Modified: branches/1.1.x/doc/manual/Makefile branches/1.1.x/doc/manual/abcl.tex branches/1.1.x/doc/manual/extensions.tex branches/1.1.x/doc/manual/grovel.lisp branches/1.1.x/doc/manual/threads.tex Modified: branches/1.1.x/doc/manual/Makefile ============================================================================== --- branches/1.1.x/doc/manual/Makefile Sun Dec 2 20:12:52 2012 (r14281) +++ branches/1.1.x/doc/manual/Makefile Sun Dec 2 20:12:54 2012 (r14282) @@ -8,10 +8,18 @@ pdflatex abcl.tex pdflatex abcl.tex -ABCL = /Users/evenson/work/abcl-1.1.x/abcl +#ABCL = abcl +ABCL = ../../abcl +#ABCL = /Users/evenson/work/abcl-1.1.x/abcl +# XXX TODO 1) use more compact iterated form, 2) pare down to using --noinit grovel: - $(ABCL) --batch --noinform --load "grovel.lisp" --eval '(progn (grovel-docstrings-as-tex (find-package :java)) (grovel-docstrings-as-tex (find-package :extensions)) (grovel-docstrings-as-tex (find-package :threads)))' + $(ABCL) --batch --noinform --load "grovel.lisp" \ + --eval '(grovel-docstrings-as-tex (find-package :java)' \ + --eval '(grovel-docstrings-as-tex (find-package :extensions))' \ + --eval '(grovel-docstrings-as-tex (find-package :threads))' \ + --eval '(grovel-docstrings-as-tex (find-package :system))' \ + --eval '(progn (require :abcl-contrib) (require :jss) (grovel-docstrings-as-tex (find-package :jss)))' clean: rm -f *.aux *.bbl *.blg *.idx *.ilg *.ind *.log *.out *.toc abcl.pdf Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Sun Dec 2 20:12:52 2012 (r14281) +++ branches/1.1.x/doc/manual/abcl.tex Sun Dec 2 20:12:54 2012 (r14282) @@ -18,9 +18,8 @@ \tableofcontents -\chapter{Preface} %%Preface to the second edition, abcl-1.1.0. -\section{Second Edition} +\section{Preface to the Second Edition} ABCL 1.1 now contains (A)MOP. We hope you enjoy! --The Mgmt. \chapter{Introduction} @@ -1260,8 +1259,17 @@ released abcl-1.0.0. We released abcl-1.0.1 as a maintainence release on January 10, 2012. -In December 2012, we we revised the implementation--adding (A)MOP--with -the release of abcl-1.1.0 and accumulated changes to this manual. +In December 2012, we we revised the implementation with +the release of abcl-1.1.0 by adding (A)MOP. + +\chapter{Appendix SYSTEM} + +\include{system} + +\chapter{Appendix JSS} + +\include{jss} + \bibliography{abcl} \bibliographystyle{alpha} Modified: branches/1.1.x/doc/manual/extensions.tex ============================================================================== --- branches/1.1.x/doc/manual/extensions.tex Sun Dec 2 20:12:52 2012 (r14281) +++ branches/1.1.x/doc/manual/extensions.tex Sun Dec 2 20:12:54 2012 (r14282) @@ -130,7 +130,7 @@ --- Function: \textbf{write-timeout} [\textbf{extensions}] \textit{socket seconds} \begin{adjustwidth}{5em}{5em} -not-documented +No-op setting of write timeout to SECONDS on SOCKET. \end{adjustwidth} \paragraph{} @@ -870,7 +870,7 @@ --- Function: \textbf{read-timeout} [\textbf{extensions}] \textit{socket seconds} \begin{adjustwidth}{5em}{5em} -Time in SECONDS to set local implementation of SO\_CREVTIMEO on SOCKET. +Time in SECONDS to set local implementation of 'SO\_RCVTIMEO' on SOCKET. \end{adjustwidth} \paragraph{} Modified: branches/1.1.x/doc/manual/grovel.lisp ============================================================================== --- branches/1.1.x/doc/manual/grovel.lisp Sun Dec 2 20:12:52 2012 (r14281) +++ branches/1.1.x/doc/manual/grovel.lisp Sun Dec 2 20:12:54 2012 (r14282) @@ -1,4 +1,4 @@ - +(in-package :cl-user) (defun grovel-docstrings-as-tex (&optional (package (find-package :java))) (let ((output-file (format nil "~A.tex" (string-downcase (package-name package))))) (with-open-file (stream output-file :direction :output) Added: branches/1.1.x/doc/manual/jss.tex ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ branches/1.1.x/doc/manual/jss.tex Sun Dec 2 20:12:54 2012 (r14282) @@ -0,0 +1,230 @@ +\paragraph{} +\label{JSS:HASHMAP-TO-HASHTABLE} +\index{HASHMAP-TO-HASHTABLE} +--- Function: \textbf{hashmap-to-hashtable} [\textbf{jss}] \textit{hashmap \&rest rest \&key (keyfun (function identity)) (valfun (function identity)) (invert? NIL) table \&allow-other-keys} + +\begin{adjustwidth}{5em}{5em} +Converts the a HASHMAP reference to a java.util.HashMap object to a Lisp hashtable. + +The REST paramter specifies arguments to the underlying MAKE-HASH-TABLE call. + +KEYFUN and VALFUN specifies functions to be run on the keys and values +of the HASHMAP right before they are placed in the hashtable. + +If INVERT? is non-nil than reverse the keys and values in the resulting hashtable. +\end{adjustwidth} + +\paragraph{} +\label{JSS:FIND-JAVA-CLASS} +\index{FIND-JAVA-CLASS} +--- Function: \textbf{find-java-class} [\textbf{jss}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:INVOKE-ADD-IMPORTS} +\index{INVOKE-ADD-IMPORTS} +--- Macro: \textbf{invoke-add-imports} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{JSS:JAVA-CLASS-METHOD-NAMES} +\index{JAVA-CLASS-METHOD-NAMES} +--- Function: \textbf{java-class-method-names} [\textbf{jss}] \textit{class \&optional stream} + +\begin{adjustwidth}{5em}{5em} +Return a list of the public methods encapsulated by the JVM CLASS. + +If STREAM non-nil, output a verbose description to the named output stream. + +CLASS may either be a string naming a fully qualified JVM class in dot +notation, or a symbol resolved against all class entries in the +current classpath. +\end{adjustwidth} + +\paragraph{} +\label{JSS:*DO-AUTO-IMPORTS*} +\index{*DO-AUTO-IMPORTS*} +--- Variable: \textbf{*do-auto-imports*} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Whether to automatically introspect all Java classes on the classpath when JSS is loaded. +\end{adjustwidth} + +\paragraph{} +\label{JSS:NEW} +\index{NEW} +--- Function: \textbf{new} [\textbf{jss}] \textit{class-name \&rest args} + +\begin{adjustwidth}{5em}{5em} +Invoke the Java constructor for CLASS-NAME with ARGS. + +CLASS-NAME may either be a symbol or a string according to the usual JSS conventions. +\end{adjustwidth} + +\paragraph{} +\label{JSS:LIST-TO-LIST} +\index{LIST-TO-LIST} +--- Function: \textbf{list-to-list} [\textbf{jss}] \textit{list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:JARRAY-TO-LIST} +\index{JARRAY-TO-LIST} +--- Function: \textbf{jarray-to-list} [\textbf{jss}] \textit{jarray} + +\begin{adjustwidth}{5em}{5em} +Convert the Java array named by JARRARY into a Lisp list. +\end{adjustwidth} + +\paragraph{} +\label{JSS:SET-TO-LIST} +\index{SET-TO-LIST} +--- Function: \textbf{set-to-list} [\textbf{jss}] \textit{set} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:SET-JAVA-FIELD} +\index{SET-JAVA-FIELD} +--- Function: \textbf{set-java-field} [\textbf{jss}] \textit{object field value \&optional (try-harder *running-in-osgi*)} + +\begin{adjustwidth}{5em}{5em} +Set the FIELD of OBJECT to VALUE. +If OBJECT is a symbol, it names a dot qualified Java class to look for +a static FIELD. If OBJECT is an instance of java:java-object, the +associated is used to look up the static FIELD. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JCLASS-ALL-INTERFACES} +\index{JCLASS-ALL-INTERFACES} +--- Function: \textbf{jclass-all-interfaces} [\textbf{jss}] \textit{class} + +\begin{adjustwidth}{5em}{5em} +Return a list of interfaces the class implements +\end{adjustwidth} + +\paragraph{} +\label{JSS:WITH-CONSTANT-SIGNATURE} +\index{WITH-CONSTANT-SIGNATURE} +--- Macro: \textbf{with-constant-signature} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:GET-JAVA-FIELD} +\index{GET-JAVA-FIELD} +--- Function: \textbf{get-java-field} [\textbf{jss}] \textit{object field \&optional (try-harder *running-in-osgi*)} + +\begin{adjustwidth}{5em}{5em} +Get the value of the FIELD contained in OBJECT. +If OBJECT is a symbol it names a dot qualified static FIELD. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JLIST-TO-LIST} +\index{JLIST-TO-LIST} +--- Function: \textbf{jlist-to-list} [\textbf{jss}] \textit{list} + +\begin{adjustwidth}{5em}{5em} +Convert a LIST implementing java.util.List to a Lisp list. +\end{adjustwidth} + +\paragraph{} +\label{JSS:ITERABLE-TO-LIST} +\index{ITERABLE-TO-LIST} +--- Function: \textbf{iterable-to-list} [\textbf{jss}] \textit{iterable} + +\begin{adjustwidth}{5em}{5em} +Return the items contained the java.lang.Iterable ITERABLE as a list. +\end{adjustwidth} + +\paragraph{} +\label{JSS:*CL-USER-COMPATIBILITY*} +\index{*CL-USER-COMPATIBILITY*} +--- Variable: \textbf{*cl-user-compatibility*} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Whether backwards compatibility with JSS's use of CL-USER has been enabled. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JCMN} +\index{JCMN} +--- Function: \textbf{jcmn} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:CLASSFILES-IMPORT} +\index{CLASSFILES-IMPORT} +--- Function: \textbf{classfiles-import} [\textbf{jss}] \textit{directory} + +\begin{adjustwidth}{5em}{5em} +Load all Java classes recursively contained under DIRECTORY in the current process. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JAPROPOS} +\index{JAPROPOS} +--- Function: \textbf{japropos} [\textbf{jss}] \textit{string} + +\begin{adjustwidth}{5em}{5em} +Output the names of all Java class names loaded in the current process which match STRING.. +\end{adjustwidth} + +\paragraph{} +\label{JSS:VECTOR-TO-LIST} +\index{VECTOR-TO-LIST} +--- Function: \textbf{vector-to-list} [\textbf{jss}] \textit{vector} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{JSS:INVOKE-RESTARGS} +\index{INVOKE-RESTARGS} +--- Function: \textbf{invoke-restargs} [\textbf{jss}] \textit{method object args \&optional (raw? NIL)} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:JAR-IMPORT} +\index{JAR-IMPORT} +--- Function: \textbf{jar-import} [\textbf{jss}] \textit{file} + +\begin{adjustwidth}{5em}{5em} +Import all the Java classes contained in the pathname FILE into the JSS dynamic lookup cache. +\end{adjustwidth} + +\paragraph{} +\label{JSS:ENSURE-COMPATIBILITY} +\index{ENSURE-COMPATIBILITY} +--- Function: \textbf{ensure-compatibility} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Ensure backwards compatibility with JSS's use of CL-USER. +\end{adjustwidth} + Added: branches/1.1.x/doc/manual/system.tex ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ branches/1.1.x/doc/manual/system.tex Sun Dec 2 20:12:54 2012 (r14282) @@ -0,0 +1,1383 @@ +\paragraph{} +\label{SYSTEM:LOGICAL-PATHNAME-P} +\index{LOGICAL-PATHNAME-P} +--- Function: \textbf{logical-pathname-p} [\textbf{system}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +Returns true if OBJECT is of type logical-pathname; otherwise, returns false. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-READERS} +\index{SLOT-DEFINITION-READERS} +--- Function: \textbf{\%slot-definition-readers} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILER-MACROEXPAND} +\index{COMPILER-MACROEXPAND} +--- Function: \textbf{compiler-macroexpand} [\textbf{system}] \textit{form \&optional env} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-INITIAL-METHODS} +\index{SET-GENERIC-FUNCTION-INITIAL-METHODS} +--- Function: \textbf{set-generic-function-initial-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-READERS} +\index{SET-SLOT-DEFINITION-READERS} +--- Function: \textbf{set-slot-definition-readers} [\textbf{system}] \textit{slot-definition readers} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-INITFORM} +\index{SET-SLOT-DEFINITION-INITFORM} +--- Function: \textbf{set-slot-definition-initform} [\textbf{system}] \textit{slot-definition initform} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-DOCUMENTATION} +\index{GENERIC-FUNCTION-DOCUMENTATION} +--- Function: \textbf{generic-function-documentation} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:NSTRING-CAPITALIZE} +\index{NSTRING-CAPITALIZE} +--- Function: \textbf{\%nstring-capitalize} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-FINALIZED-P} +\index{CLASS-FINALIZED-P} +--- Function: \textbf{\%class-finalized-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENVIRONMENT-ADD-MACRO-DEFINITION} +\index{ENVIRONMENT-ADD-MACRO-DEFINITION} +--- Function: \textbf{environment-add-macro-definition} [\textbf{system}] \textit{environment name expander} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAMBDA-NAME} +\index{LAMBDA-NAME} +--- Function: \textbf{lambda-name} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-SLOT-VALUE} +\index{STD-SLOT-VALUE} +--- Function: \textbf{std-slot-value} [\textbf{system}] \textit{instance slot-name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-INSTANCE-CLASS} +\index{STD-INSTANCE-CLASS} +--- Function: \textbf{std-instance-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-SLOT-DEFINITION} +\index{MAKE-SLOT-DEFINITION} +--- Function: \textbf{make-slot-definition} [\textbf{system}] \textit{\&optional class} + +\begin{adjustwidth}{5em}{5em} +Cannot be called with user-defined subclasses of standard-slot-definition. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:WRITE-VECTOR-UNSIGNED-BYTE-8} +\index{WRITE-VECTOR-UNSIGNED-BYTE-8} +--- Function: \textbf{write-vector-unsigned-byte-8} [\textbf{system}] \textit{vector stream start end} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:NOTINLINE-P} +\index{NOTINLINE-P} +--- Function: \textbf{notinline-p} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:VECTOR-DELETE-EQL} +\index{VECTOR-DELETE-EQL} +--- Function: \textbf{vector-delete-eql} [\textbf{system}] \textit{item vector} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PACKAGE-SYMBOLS} +\index{PACKAGE-SYMBOLS} +--- Function: \textbf{package-symbols} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-DIRECT-SUBCLASSES} +\index{SET-CLASS-DIRECT-SUBCLASSES} +--- Function: \textbf{\%set-class-direct-subclasses} [\textbf{system}] \textit{class direct-subclasses} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DEFCONST} +\index{DEFCONST} +--- Macro: \textbf{defconst} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILE-FILE-IF-NEEDED} +\index{COMPILE-FILE-IF-NEEDED} +--- Function: \textbf{compile-file-if-needed} [\textbf{system}] \textit{input-file \&rest allargs \&key force-compile \&allow-other-keys} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PUTHASH} +\index{PUTHASH} +--- Function: \textbf{puthash} [\textbf{system}] \textit{key hash-table new-value \&optional default} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRUCTURE-SET} +\index{STRUCTURE-SET} +--- Function: \textbf{structure-set} [\textbf{system}] \textit{instance index new-value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-LAYOUT} +\index{MAKE-LAYOUT} +--- Function: \textbf{make-layout} [\textbf{system}] \textit{class instance-slots class-slots} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING/=} +\index{STRING/=} +--- Function: \textbf{\%string/=} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DELETE-EQ} +\index{DELETE-EQ} +--- Function: \textbf{delete-eq} [\textbf{system}] \textit{item sequence} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SINGLE-FLOAT-BITS} +\index{SINGLE-FLOAT-BITS} +--- Function: \textbf{single-float-bits} [\textbf{system}] \textit{float} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+KEYWORD-PACKAGE+} +\index{+KEYWORD-PACKAGE+} +--- Variable: \textbf{+keyword-package+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-KILL} +\index{PROCESS-KILL} +--- Function: \textbf{process-kill} [\textbf{system}] \textit{process} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAYOUT-LENGTH} +\index{LAYOUT-LENGTH} +--- Function: \textbf{layout-length} [\textbf{system}] \textit{layout} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENVIRONMENT} +\index{ENVIRONMENT} +--- Class: \textbf{environment} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-METHOD-CLASS} +\index{GENERIC-FUNCTION-METHOD-CLASS} +--- Function: \textbf{\%generic-function-method-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LIST-DELETE-EQL} +\index{LIST-DELETE-EQL} +--- Function: \textbf{list-delete-eql} [\textbf{system}] \textit{item list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ASET} +\index{ASET} +--- Function: \textbf{aset} [\textbf{system}] \textit{array subscripts new-element} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*COMPILE-FILE-TYPE*} +\index{*COMPILE-FILE-TYPE*} +--- Variable: \textbf{*compile-file-type*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+CL-PACKAGE+} +\index{+CL-PACKAGE+} +--- Variable: \textbf{+cl-package+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-SUBCLASSES} +\index{CLASS-DIRECT-SUBCLASSES} +--- Function: \textbf{\%class-direct-subclasses} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GF-REQUIRED-ARGS} +\index{GF-REQUIRED-ARGS} +--- Function: \textbf{gf-required-args} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SCHAR} +\index{SET-SCHAR} +--- Function: \textbf{set-schar} [\textbf{system}] \textit{string index character} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-FILL-POINTER-OUTPUT-STREAM} +\index{MAKE-FILL-POINTER-OUTPUT-STREAM} +--- Function: \textbf{make-fill-pointer-output-stream} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-CAPITALIZE} +\index{STRING-CAPITALIZE} +--- Function: \textbf{\%string-capitalize} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INLINE-EXPANSION} +\index{INLINE-EXPANSION} +--- Function: \textbf{inline-expansion} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*SOURCE-POSITION*} +\index{*SOURCE-POSITION*} +--- Variable: \textbf{*source-position*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SYMBOL-MACRO-P} +\index{SYMBOL-MACRO-P} +--- Function: \textbf{symbol-macro-p} [\textbf{system}] \textit{value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DOUBLE-FLOAT-HIGH-BITS} +\index{DOUBLE-FLOAT-HIGH-BITS} +--- Function: \textbf{double-float-high-bits} [\textbf{system}] \textit{float} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+FIXNUM-TYPE+} +\index{+FIXNUM-TYPE+} +--- Variable: \textbf{+fixnum-type+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FDEFINITION-BLOCK-NAME} +\index{FDEFINITION-BLOCK-NAME} +--- Function: \textbf{fdefinition-block-name} [\textbf{system}] \textit{function-name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:EXPAND-INLINE} +\index{EXPAND-INLINE} +--- Function: \textbf{expand-inline} [\textbf{system}] \textit{form expansion} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FUNCTION-RESULT-TYPE} +\index{FUNCTION-RESULT-TYPE} +--- Function: \textbf{function-result-type} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENVIRONMENT-ADD-SYMBOL-BINDING} +\index{ENVIRONMENT-ADD-SYMBOL-BINDING} +--- Function: \textbf{environment-add-symbol-binding} [\textbf{system}] \textit{environment symbol value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SWAP-SLOTS} +\index{SWAP-SLOTS} +--- Function: \textbf{swap-slots} [\textbf{system}] \textit{instance-1 instance-2} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-METHODS} +\index{GENERIC-FUNCTION-METHODS} +--- Function: \textbf{\%generic-function-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*SPEED*} +\index{*SPEED*} +--- Variable: \textbf{*speed*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:IDENTITY-HASH-CODE} +\index{IDENTITY-HASH-CODE} +--- Function: \textbf{identity-hash-code} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DUMP-FORM} +\index{DUMP-FORM} +--- Function: \textbf{dump-form} [\textbf{system}] \textit{form stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FIXNUM-TYPE-P} +\index{FIXNUM-TYPE-P} +--- Function: \textbf{fixnum-type-p} [\textbf{system}] \textit{compiler-type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-KEYWORD} +\index{MAKE-KEYWORD} +--- Function: \textbf{make-keyword} [\textbf{system}] \textit{symbol} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-ENVIRONMENT} +\index{MAKE-ENVIRONMENT} +--- Function: \textbf{make-environment} [\textbf{system}] \textit{\&optional parent-environment} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILED-LISP-FUNCTION-P} +\index{COMPILED-LISP-FUNCTION-P} +--- Function: \textbf{compiled-lisp-function-p} [\textbf{system}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LIST-DIRECTORY} +\index{LIST-DIRECTORY} +--- Function: \textbf{list-directory} [\textbf{system}] \textit{directory \&optional (resolve-symlinks t)} + +\begin{adjustwidth}{5em}{5em} +Lists the contents of DIRECTORY, optionally resolving symbolic links. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-FILE-STREAM} +\index{MAKE-FILE-STREAM} +--- Function: \textbf{make-file-stream} [\textbf{system}] \textit{pathname namestring element-type direction if-exists external-format} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILER-SUBTYPEP} +\index{COMPILER-SUBTYPEP} +--- Function: \textbf{compiler-subtypep} [\textbf{system}] \textit{compiler-type typespec} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PUTF} +\index{PUTF} +--- Function: \textbf{\%putf} [\textbf{system}] \textit{plist indicator new-value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CHECK-SEQUENCE-BOUNDS} +\index{CHECK-SEQUENCE-BOUNDS} +--- Function: \textbf{check-sequence-bounds} [\textbf{system}] \textit{sequence start end} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:OUTPUT-OBJECT} +\index{OUTPUT-OBJECT} +--- Function: \textbf{\%output-object} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-DIRECT-SLOTS} +\index{SET-CLASS-DIRECT-SLOTS} +--- Function: \textbf{\%set-class-direct-slots} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CAR} +\index{SET-CAR} +--- Function: \textbf{set-car} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-SLOTS} +\index{SET-CLASS-SLOTS} +--- Function: \textbf{\%set-class-slots} [\textbf{system}] \textit{class slot-definitions} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +\index{SET-GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +--- Function: \textbf{set-generic-function-argument-precedence-order} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-DOCUMENTATION} +\index{SET-SLOT-DEFINITION-DOCUMENTATION} +--- Function: \textbf{set-slot-definition-documentation} [\textbf{system}] \textit{slot-definition documentation} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*SAFETY*} +\index{*SAFETY*} +--- Variable: \textbf{*safety*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:EMPTY-ENVIRONMENT-P} +\index{EMPTY-ENVIRONMENT-P} +--- Function: \textbf{empty-environment-p} [\textbf{system}] \textit{environment} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-DOCUMENTATION} +\index{SET-GENERIC-FUNCTION-DOCUMENTATION} +--- Function: \textbf{set-generic-function-documentation} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-LOCATION} +\index{SLOT-DEFINITION-LOCATION} +--- Function: \textbf{\%slot-definition-location} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:REMOVE-ZIP-CACHE-ENTRY} +\index{REMOVE-ZIP-CACHE-ENTRY} +--- Function: \textbf{remove-zip-cache-entry} [\textbf{system}] \textit{pathname} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GET-CACHED-EMF} +\index{GET-CACHED-EMF} +--- Function: \textbf{get-cached-emf} [\textbf{system}] \textit{generic-function args} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-FINALIZED-P} +\index{SET-CLASS-FINALIZED-P} +--- Function: \textbf{\%set-class-finalized-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-NOT-LESSP} +\index{STRING-NOT-LESSP} +--- Function: \textbf{\%string-not-lessp} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-INSTANCES-OBSOLETE} +\index{MAKE-INSTANCES-OBSOLETE} +--- Function: \textbf{\%make-instances-obsolete} [\textbf{system}] \textit{class} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENSURE-INPUT-STREAM} +\index{ENSURE-INPUT-STREAM} +--- Function: \textbf{ensure-input-stream} [\textbf{system}] \textit{pathname} + +\begin{adjustwidth}{5em}{5em} +Returns a java.io.InputStream for resource denoted by PATHNAME. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-LOGICAL-PATHNAME} +\index{MAKE-LOGICAL-PATHNAME} +--- Function: \textbf{\%make-logical-pathname} [\textbf{system}] \textit{namestring} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-FIND-CLASS} +\index{SET-FIND-CLASS} +--- Function: \textbf{\%set-find-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+FALSE-TYPE+} +\index{+FALSE-TYPE+} +--- Variable: \textbf{+false-type+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-INPUT} +\index{PROCESS-INPUT} +--- Function: \textbf{process-input} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-INITARGS} +\index{SET-SLOT-DEFINITION-INITARGS} +--- Function: \textbf{set-slot-definition-initargs} [\textbf{system}] \textit{slot-definition initargs} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-STRUCTURE} +\index{MAKE-STRUCTURE} +--- Function: \textbf{make-structure} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-ALLOCATION-CLASS} +\index{SLOT-DEFINITION-ALLOCATION-CLASS} +--- Function: \textbf{\%slot-definition-allocation-class} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*INLINE-DECLARATIONS*} +\index{*INLINE-DECLARATIONS*} +--- Variable: \textbf{*inline-declarations*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DEFAULT-INITARGS} +\index{CLASS-DEFAULT-INITARGS} +--- Function: \textbf{\%class-default-initargs} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STANDARD-INSTANCE-ACCESS} +\index{STANDARD-INSTANCE-ACCESS} +--- Function: \textbf{standard-instance-access} [\textbf{system}] \textit{instance location} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-FUNCTION-INFO-VALUE} +\index{SET-FUNCTION-INFO-VALUE} +--- Function: \textbf{set-function-info-value} [\textbf{system}] \textit{name indicator value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PRECOMPILE} +\index{PRECOMPILE} +--- Function: \textbf{precompile} [\textbf{extensions}] \textit{name \&optional definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-NOT-EQUAL} +\index{STRING-NOT-EQUAL} +--- Function: \textbf{\%string-not-equal} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SHA256} +\index{SHA256} +--- Function: \textbf{sha256} [\textbf{system}] \textit{\&rest paths-or-strings} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DISABLE-ZIP-CACHE} +\index{DISABLE-ZIP-CACHE} +--- Function: \textbf{disable-zip-cache} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Disable all caching of ABCL FASLs and ZIPs. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-SLOT-BOUNDP} +\index{STD-SLOT-BOUNDP} +--- Function: \textbf{std-slot-boundp} [\textbf{system}] \textit{instance slot-name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-METHOD-CLASS} +\index{SET-GENERIC-FUNCTION-METHOD-CLASS} +--- Function: \textbf{set-generic-function-method-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-METHOD-COMBINATION} +\index{GENERIC-FUNCTION-METHOD-COMBINATION} +--- Function: \textbf{\%generic-function-method-combination} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CALL-COUNT} +\index{CALL-COUNT} +--- Function: \textbf{call-count} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-ALLOCATION} +\index{SLOT-DEFINITION-ALLOCATION} +--- Function: \textbf{\%slot-definition-allocation} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ALLOCATE-FUNCALLABLE-INSTANCE} +\index{ALLOCATE-FUNCALLABLE-INSTANCE} +--- Function: \textbf{\%allocate-funcallable-instance} [\textbf{system}] \textit{class} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DOUBLE-FLOAT-LOW-BITS} +\index{DOUBLE-FLOAT-LOW-BITS} +--- Function: \textbf{double-float-low-bits} [\textbf{system}] \textit{float} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SIMPLE-SEARCH} +\index{SIMPLE-SEARCH} +--- Function: \textbf{simple-search} [\textbf{system}] \textit{sequence1 sequence2} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FLOAT-INFINITY-P} +\index{FLOAT-INFINITY-P} +--- Function: \textbf{float-infinity-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:AVAILABLE-ENCODINGS} +\index{AVAILABLE-ENCODINGS} +--- Function: \textbf{available-encodings} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Returns all charset encodings suitable for passing to a stream constructor available at runtime. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-EQUAL} +\index{STRING-EQUAL} +--- Function: \textbf{\%string-equal} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-PRECEDENCE-LIST} +\index{CLASS-PRECEDENCE-LIST} +--- Function: \textbf{\%class-precedence-list} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS} +\index{PROCESS} +--- Class: \textbf{process} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-LIST} +\index{MAKE-LIST} +--- Function: \textbf{\%make-list} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:TYPE-ERROR} +\index{TYPE-ERROR} +--- Function: \textbf{\%type-error} [\textbf{system}] \textit{datum expected-type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STREAM-WRITE-CHAR} +\index{STREAM-WRITE-CHAR} +--- Function: \textbf{\%stream-write-char} [\textbf{system}] \textit{character output-stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FINALIZE-GENERIC-FUNCTION} +\index{FINALIZE-GENERIC-FUNCTION} +--- Function: \textbf{\%finalize-generic-function} [\textbf{system}] \textit{generic-function} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{SYSTEM:BUILT-IN-FUNCTION-P} +\index{BUILT-IN-FUNCTION-P} +--- Function: \textbf{built-in-function-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*COMPILE-FILE-ENVIRONMENT*} +\index{*COMPILE-FILE-ENVIRONMENT*} +--- Variable: \textbf{*compile-file-environment*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING<} +\index{STRING<} +--- Function: \textbf{\%string<} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-WRITERS} +\index{SET-SLOT-DEFINITION-WRITERS} +--- Function: \textbf{set-slot-definition-writers} [\textbf{system}] \textit{slot-definition writers} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INIT-EQL-SPECIALIZATIONS} +\index{INIT-EQL-SPECIALIZATIONS} +--- Function: \textbf{\%init-eql-specializations} [\textbf{system}] \textit{generic-function eql-specilizer-objects-list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-TYPE} +\index{SET-SLOT-DEFINITION-TYPE} +--- Function: \textbf{set-slot-definition-type} [\textbf{system}] \textit{slot-definition type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:OUT-SYNONYM-OF} +\index{OUT-SYNONYM-OF} +--- Function: \textbf{out-synonym-of} [\textbf{system}] \textit{stream-designator} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:NOTE-NAME-DEFINED} +\index{NOTE-NAME-DEFINED} +--- Function: \textbf{note-name-defined} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INTEGER-TYPE-P} +\index{INTEGER-TYPE-P} +--- Function: \textbf{integer-type-p} [\textbf{system}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRUCTURE-LENGTH} +\index{STRUCTURE-LENGTH} +--- Function: \textbf{structure-length} [\textbf{system}] \textit{instance} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CACHE-EMF} +\index{CACHE-EMF} +--- Function: \textbf{cache-emf} [\textbf{system}] \textit{generic-function args emf} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:HASH-TABLE-WEAKNESS} +\index{HASH-TABLE-WEAKNESS} +--- Function: \textbf{hash-table-weakness} [\textbf{system}] \textit{hash-table} + +\begin{adjustwidth}{5em}{5em} +Return weakness property of HASH-TABLE, or NIL if it has none. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FLOAT-OVERFLOW-MODE} +\index{FLOAT-OVERFLOW-MODE} +--- Function: \textbf{float-overflow-mode} [\textbf{system}] \textit{\&optional boolean} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-ERROR} +\index{PROCESS-ERROR} +--- Function: \textbf{process-error} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-ALIVE-P} +\index{PROCESS-ALIVE-P} +--- Function: \textbf{process-alive-p} [\textbf{system}] \textit{process} + +\begin{adjustwidth}{5em}{5em} +Return t if process is still alive, nil otherwise. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-DEFAULT-INITARGS} +\index{CLASS-DIRECT-DEFAULT-INITARGS} +--- Function: \textbf{\%class-direct-default-initargs} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-DOUBLE-FLOAT} +\index{MAKE-DOUBLE-FLOAT} +--- Function: \textbf{make-double-float} [\textbf{system}] \textit{bits} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-METHODS} +\index{SET-GENERIC-FUNCTION-METHODS} +--- Function: \textbf{set-generic-function-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAYOUT-SLOT-INDEX} +\index{LAYOUT-SLOT-INDEX} +--- Function: \textbf{layout-slot-index} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STREAM-TERPRI} +\index{STREAM-TERPRI} +--- Function: \textbf{\%stream-terpri} [\textbf{system}] \textit{output-stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STREAM-OUTPUT-OBJECT} +\index{STREAM-OUTPUT-OBJECT} +--- Function: \textbf{\%stream-output-object} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INTERACTIVE-EVAL} +\index{INTERACTIVE-EVAL} +--- Function: \textbf{interactive-eval} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:JAR-STREAM} +\index{JAR-STREAM} +--- Class: \textbf{jar-stream} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-NAME} +\index{SLOT-DEFINITION-NAME} +--- Function: \textbf{\%slot-definition-name} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ZIP} +\index{ZIP} +--- Function: \textbf{zip} [\textbf{system}] \textit{pathname pathnames \&optional topdir} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-WRITERS} +\index{SLOT-DEFINITION-WRITERS} +--- Function: \textbf{\%slot-definition-writers} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-NAME} +\index{GENERIC-FUNCTION-NAME} +--- Function: \textbf{\%generic-function-name} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-INSTANCE-LAYOUT} +\index{STD-INSTANCE-LAYOUT} +--- Function: \textbf{std-instance-layout} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION} +\index{SLOT-DEFINITION} +--- Class: \textbf{slot-definition} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{SYSTEM:SHRINK-VECTOR} +\index{SHRINK-VECTOR} +--- Function: \textbf{shrink-vector} [\textbf{system}] \textit{vector new-size} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PACKAGE-INHERITED-SYMBOLS} +\index{PACKAGE-INHERITED-SYMBOLS} +--- Function: \textbf{package-inherited-symbols} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAYOUT-CLASS} +\index{LAYOUT-CLASS} +--- Function: \textbf{layout-class} [\textbf{system}] \textit{layout} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-FILL-POINTER} +\index{SET-FILL-POINTER} +--- Function: \textbf{\%set-fill-pointer} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-DOCUMENTATION} +\index{SET-CLASS-DOCUMENTATION} +--- Function: \textbf{\%set-class-documentation} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:REQUIRE-TYPE} +\index{REQUIRE-TYPE} +--- Function: \textbf{require-type} [\textbf{system}] \textit{arg type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-SLOTS} +\index{CLASS-DIRECT-SLOTS} +--- Function: \textbf{\%class-direct-slots} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-METHODS} +\index{CLASS-DIRECT-METHODS} +--- Function: \textbf{\%class-direct-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SETF-FUNCTION-NAME-P} +\index{SETF-FUNCTION-NAME-P} +--- Function: \textbf{setf-function-name-p} [\textbf{system}] \textit{thing} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*COMPILER-ERROR-CONTEXT*} +\index{*COMPILER-ERROR-CONTEXT*} +--- Variable: \textbf{*compiler-error-context*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-INTEGER-TYPE} +\index{MAKE-INTEGER-TYPE} +--- Function: \textbf{make-integer-type} [\textbf{system}] \textit{type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INTEGER-TYPE-HIGH} +\index{INTEGER-TYPE-HIGH} +--- Function: \textbf{integer-type-high} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + Modified: branches/1.1.x/doc/manual/threads.tex ============================================================================== --- branches/1.1.x/doc/manual/threads.tex Sun Dec 2 20:12:52 2012 (r14281) +++ branches/1.1.x/doc/manual/threads.tex Sun Dec 2 20:12:54 2012 (r14282) @@ -4,7 +4,7 @@ --- Function: \textbf{mailbox-empty-p} [\textbf{threads}] \textit{mailbox} \begin{adjustwidth}{5em}{5em} -not-documented +Returns non-NIL if the mailbox can be read from, NIL otherwise. \end{adjustwidth} \paragraph{} From mevenson at common-lisp.net Mon Dec 3 04:49:09 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 20:49:09 -0800 Subject: [armedbear-cvs] r14283 - in branches/1.1.x: . src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sun Dec 2 20:49:08 2012 New Revision: 14283 Log: 1.1.x: now produces abcl-1.1.0-rc-2 artifacts. Modified: branches/1.1.x/abcl.rdf branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Sun Dec 2 20:12:54 2012 (r14282) +++ branches/1.1.x/abcl.rdf Sun Dec 2 20:49:08 2012 (r14283) @@ -1,6 +1,6 @@ # -*- Mode: n3 -*- - at prefix abcl: + at prefix abcl: . @prefix doap: . @prefix rdf: . @prefix rdfs: . @@ -10,20 +10,29 @@ <> rdfs:seeAlso . <> rdfs:seeAlso . -<> dc:modified "01-FEB-2012" . + at prefix dc: . +<> dc:modified "03-DEC-2012" . + +<> dc:version "abcl-1.1.0" . +<> abcl:releaseCandidate "rc-2" . a doap:Project ; doap:label "Armed Bear Common Lisp" ; - doap:download-page ; - doap:license [ - _:license , - ; - ] - doap:programming-language """("Common Lisp" "Java" "Ant" "Shell Script") """" ; - doap:shortname "ABCL"^^xsd:string + doap:download ; + doap:shortname "ABCL" ; doap:contributors """( ehu easye v-ille astalla rudi peter)""" . + + doap:language + "Common Lisp", "Java", "Ant", "Bourne Shell Script", "Windows Batch Script" . + + + doap:license [ + dc:license , + ; + ] . + doap:Project rdfs:seeAlso , , Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Sun Dec 2 20:12:54 2012 (r14282) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Sun Dec 2 20:49:08 2012 (r14283) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0-rc-1"; + static final String baseVersion = "1.1.0-rc-2"; static void init() { try { From mevenson at common-lisp.net Mon Dec 3 05:32:38 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 02 Dec 2012 21:32:38 -0800 Subject: [armedbear-cvs] r14284 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sun Dec 2 21:32:35 2012 New Revision: 14284 Log: Docstrings for RUN-PROGRAM not generating. Modified: trunk/abcl/src/org/armedbear/lisp/run-program.lisp Modified: trunk/abcl/src/org/armedbear/lisp/run-program.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/run-program.lisp Sun Dec 2 20:49:08 2012 (r14283) +++ trunk/abcl/src/org/armedbear/lisp/run-program.lisp Sun Dec 2 21:32:35 2012 (r14284) @@ -46,27 +46,13 @@ ;;; . (defun run-program (program args &key environment (wait t) clear-environment) "Run PROGRAM with ARGS in with ENVIRONMENT variables. + Possibly WAIT for subprocess to exit. -Optionally CLEAR-ENVIRONMENT of the subprocess of any non specified values." - ;;For documentation, see below. - (let* ((program-namestring (namestring (pathname program))) +Optionally CLEAR-ENVIRONMENT of the subprocess of any non specified values. - (process-builder (%make-process-builder program-namestring args))) - (let ((env-map (%process-builder-environment process-builder))) - (when clear-environment - (%process-builder-env-clear env-map)) - (when environment - (dolist (entry environment) - (%process-builder-env-put env-map - (princ-to-string (car entry)) - (princ-to-string (cdr entry)))))) - (let ((process (make-process (%process-builder-start process-builder)))) - (when wait (process-wait process)) - process))) +Creates a new process running the the PROGRAM. -(setf (documentation 'run-program 'function) - "Creates a new process running the the PROGRAM. ARGS are a list of strings to be passed to the program as arguments. For no arguments, use nil which means that just the name of the @@ -87,7 +73,7 @@ someone else, is a mother lode of security problems. If you are contemplating doing this, read about it first. (The Perl community has a lot of good documentation about this and other - security issues in script-like programs.) + security issues in script-like programs. The &key arguments have the following meanings: @@ -102,8 +88,22 @@ :wait If non-NIL, which is the default, wait until the created process finishes. If NIL, continue running Lisp until the program - finishes.") + finishes. +" + (let* ((program-namestring (namestring (pathname program))) + (process-builder (%make-process-builder program-namestring args))) + (let ((env-map (%process-builder-environment process-builder))) + (when clear-environment + (%process-builder-env-clear env-map)) + (when environment + (dolist (entry environment) + (%process-builder-env-put env-map + (princ-to-string (car entry)) + (princ-to-string (cdr entry)))))) + (let ((process (make-process (%process-builder-start process-builder)))) + (when wait (process-wait process)) + process))) ;;The process structure. (defstruct (process (:constructor %make-process (jprocess))) From mevenson at common-lisp.net Mon Dec 3 14:13:19 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 03 Dec 2012 06:13:19 -0800 Subject: [armedbear-cvs] r14285 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Mon Dec 3 06:13:18 2012 New Revision: 14285 Log: manual: actually demarcate appendices. Modified: branches/1.1.x/doc/manual/abcl.tex Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Sun Dec 2 21:32:35 2012 (r14284) +++ branches/1.1.x/doc/manual/abcl.tex Mon Dec 3 06:13:18 2012 (r14285) @@ -25,8 +25,9 @@ \chapter{Introduction} Armed Bear Common Lisp (ABCL) is an implementation of Common Lisp that -runs on the Java Virtual Machine. It compiles to Java bytecode and -integrates with Java code and libraries in a seamless way: +runs on the Java Virtual Machine. It compiles Common Lisp to Java 5 +bytecode, providing the following integration methods for interfacing +with Java code and librariess: \begin{itemize} \item Lisp code can create Java objects and call their methods (see Section~\ref{sec:lisp-java}, page~\pageref{sec:lisp-java}). @@ -1262,12 +1263,17 @@ In December 2012, we we revised the implementation with the release of abcl-1.1.0 by adding (A)MOP. -\chapter{Appendix SYSTEM} +\appendix +\chapter{The SYSTEM Dictionary} + +The public interfaces in this package are subject to change with +ABCL 1.2. \include{system} -\chapter{Appendix JSS} +\chapter{The JSS Dictionary} +These public interfaces are provided by the JSS contrib. \include{jss} From mevenson at common-lisp.net Mon Dec 3 14:21:19 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 03 Dec 2012 06:21:19 -0800 Subject: [armedbear-cvs] r14286 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Mon Dec 3 06:21:18 2012 New Revision: 14286 Log: manual: Add MOP dictionary to appendix. Added: branches/1.1.x/doc/manual/mop.tex Modified: branches/1.1.x/doc/manual/abcl.tex branches/1.1.x/doc/manual/extensions.tex branches/1.1.x/doc/manual/grovel.lisp branches/1.1.x/doc/manual/system.tex Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Mon Dec 3 06:13:18 2012 (r14285) +++ branches/1.1.x/doc/manual/abcl.tex Mon Dec 3 06:21:18 2012 (r14286) @@ -1260,10 +1260,15 @@ released abcl-1.0.0. We released abcl-1.0.1 as a maintainence release on January 10, 2012. -In December 2012, we we revised the implementation with -the release of abcl-1.1.0 by adding (A)MOP. +In December 2012, we we revised the implementation by adding (A)MOP +with the release of abcl-1.1.0 . \appendix + +\chapter{The MOP Dictionary} + +\include{mop}o + \chapter{The SYSTEM Dictionary} The public interfaces in this package are subject to change with @@ -1277,6 +1282,7 @@ \include{jss} + \bibliography{abcl} \bibliographystyle{alpha} Modified: branches/1.1.x/doc/manual/extensions.tex ============================================================================== --- branches/1.1.x/doc/manual/extensions.tex Mon Dec 3 06:13:18 2012 (r14285) +++ branches/1.1.x/doc/manual/extensions.tex Mon Dec 3 06:21:18 2012 (r14286) @@ -1,993 +0,0 @@ -\paragraph{} -\label{EXTENSIONS:MOST-POSITIVE-JAVA-LONG} -\index{MOST-POSITIVE-JAVA-LONG} ---- Variable: \textbf{most-positive-java-long} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:DUMP-JAVA-STACK} -\index{DUMP-JAVA-STACK} ---- Function: \textbf{dump-java-stack} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MEMQL} -\index{MEMQL} ---- Function: \textbf{memql} [\textbf{extensions}] \textit{item list} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:DOUBLE-FLOAT-NEGATIVE-INFINITY} -\index{DOUBLE-FLOAT-NEGATIVE-INFINITY} ---- Variable: \textbf{double-float-negative-infinity} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*AUTOLOAD-VERBOSE*} -\index{*AUTOLOAD-VERBOSE*} ---- Variable: \textbf{*autoload-verbose*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-SLIME-INPUT-STREAM} -\index{MAKE-SLIME-INPUT-STREAM} ---- Function: \textbf{make-slime-input-stream} [\textbf{extensions}] \textit{function output-stream} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:URL-PATHNAME-FRAGMENT} -\index{URL-PATHNAME-FRAGMENT} ---- Function: \textbf{url-pathname-fragment} [\textbf{extensions}] \textit{p} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:NIL-VECTOR} -\index{NIL-VECTOR} ---- Class: \textbf{nil-vector} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOURCE-PATHNAME} -\index{SOURCE-PATHNAME} ---- Function: \textbf{source-pathname} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:URI-DECODE} -\index{URI-DECODE} ---- Function: \textbf{uri-decode} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SIMPLE-STRING-FILL} -\index{SIMPLE-STRING-FILL} ---- Function: \textbf{simple-string-fill} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MEMQ} -\index{MEMQ} ---- Function: \textbf{memq} [\textbf{extensions}] \textit{item list} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:URL-PATHNAME-SCHEME} -\index{URL-PATHNAME-SCHEME} ---- Function: \textbf{url-pathname-scheme} [\textbf{extensions}] \textit{p} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:TRULY-THE} -\index{TRULY-THE} ---- Special Operator: \textbf{truly-the} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:WRITE-TIMEOUT} -\index{WRITE-TIMEOUT} ---- Function: \textbf{write-timeout} [\textbf{extensions}] \textit{socket seconds} - -\begin{adjustwidth}{5em}{5em} -No-op setting of write timeout to SECONDS on SOCKET. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CDR} -\index{CDR} ---- Macro: \textbf{\%cdr} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SLIME-INPUT-STREAM} -\index{SLIME-INPUT-STREAM} ---- Class: \textbf{slime-input-stream} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-SOCKET} -\index{MAKE-SOCKET} ---- Function: \textbf{make-socket} [\textbf{extensions}] \textit{host port} - -\begin{adjustwidth}{5em}{5em} -Create a TCP socket for client communication to HOST on PORT. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*ENABLE-INLINE-EXPANSION*} -\index{*ENABLE-INLINE-EXPANSION*} ---- Variable: \textbf{*enable-inline-expansion*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAILBOX} -\index{MAILBOX} ---- Class: \textbf{mailbox} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:STRING-POSITION} -\index{STRING-POSITION} ---- Function: \textbf{string-position} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:PRECOMPILE} -\index{PRECOMPILE} ---- Function: \textbf{precompile} [\textbf{extensions}] \textit{name \&optional definition} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*SUPPRESS-COMPILER-WARNINGS*} -\index{*SUPPRESS-COMPILER-WARNINGS*} ---- Variable: \textbf{*suppress-compiler-warnings*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CADDR} -\index{CADDR} ---- Macro: \textbf{\%caddr} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*LISP-HOME*} -\index{*LISP-HOME*} ---- Variable: \textbf{*lisp-home*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*COMMAND-LINE-ARGUMENT-LIST*} -\index{*COMMAND-LINE-ARGUMENT-LIST*} ---- Variable: \textbf{*command-line-argument-list*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:FILE-DIRECTORY-P} -\index{FILE-DIRECTORY-P} ---- Function: \textbf{file-directory-p} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-DIALOG-PROMPT-STREAM} -\index{MAKE-DIALOG-PROMPT-STREAM} ---- Function: \textbf{make-dialog-prompt-stream} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*DISASSEMBLER*} -\index{*DISASSEMBLER*} ---- Variable: \textbf{*disassembler*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CLASSP} -\index{CLASSP} ---- Function: \textbf{classp} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-TEMP-DIRECTORY} -\index{MAKE-TEMP-DIRECTORY} ---- Function: \textbf{make-temp-directory} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -Create and return the pathname of a previously non-existent directory. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SET-FLOATING-POINT-MODES} -\index{SET-FLOATING-POINT-MODES} ---- Function: \textbf{set-floating-point-modes} [\textbf{extensions}] \textit{\&key traps} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*DEBUG-CONDITION*} -\index{*DEBUG-CONDITION*} ---- Variable: \textbf{*debug-condition*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:EXIT} -\index{EXIT} ---- Function: \textbf{exit} [\textbf{extensions}] \textit{\&key status} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOCKET-LOCAL-PORT} -\index{SOCKET-LOCAL-PORT} ---- Function: \textbf{socket-local-port} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Returns the local port number of the SOCKET. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*INSPECTOR-HOOK*} -\index{*INSPECTOR-HOOK*} ---- Variable: \textbf{*inspector-hook*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*REQUIRE-STACK-FRAME*} -\index{*REQUIRE-STACK-FRAME*} ---- Variable: \textbf{*require-stack-frame*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:PROBE-DIRECTORY} -\index{PROBE-DIRECTORY} ---- Function: \textbf{probe-directory} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CHAR-TO-UTF8} -\index{CHAR-TO-UTF8} ---- Function: \textbf{char-to-utf8} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:AUTOLOAD} -\index{AUTOLOAD} ---- Function: \textbf{autoload} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MUTEX} -\index{MUTEX} ---- Class: \textbf{mutex} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:URI-ENCODE} -\index{URI-ENCODE} ---- Function: \textbf{uri-encode} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:AUTOLOAD-MACRO} -\index{AUTOLOAD-MACRO} ---- Function: \textbf{autoload-macro} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOCKET-CLOSE} -\index{SOCKET-CLOSE} ---- Function: \textbf{socket-close} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Close the client SOCKET. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*ED-FUNCTIONS*} -\index{*ED-FUNCTIONS*} ---- Variable: \textbf{*ed-functions*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SPECIAL-VARIABLE-P} -\index{SPECIAL-VARIABLE-P} ---- Function: \textbf{special-variable-p} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:RESOLVE} -\index{RESOLVE} ---- Function: \textbf{resolve} [\textbf{extensions}] \textit{symbol} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CANCEL-FINALIZATION} -\index{CANCEL-FINALIZATION} ---- Function: \textbf{cancel-finalization} [\textbf{extensions}] \textit{object} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:UPTIME} -\index{UPTIME} ---- Function: \textbf{uptime} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:COMPILE-SYSTEM} -\index{COMPILE-SYSTEM} ---- Function: \textbf{compile-system} [\textbf{extensions}] \textit{\&key quit (zip t) (cls-ext *compile-file-class-extension*) (abcl-ext *compile-file-type*) output-path} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*LOAD-TRUENAME-FASL*} -\index{*LOAD-TRUENAME-FASL*} ---- Variable: \textbf{*load-truename-fasl*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOCKET-ACCEPT} -\index{SOCKET-ACCEPT} ---- Function: \textbf{socket-accept} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Block until able to return a new socket for handling a incoming request to the specified server SOCKET. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*WARN-ON-REDEFINITION*} -\index{*WARN-ON-REDEFINITION*} ---- Variable: \textbf{*warn-on-redefinition*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:URL-PATHNAME-AUTHORITY} -\index{URL-PATHNAME-AUTHORITY} ---- Function: \textbf{url-pathname-authority} [\textbf{extensions}] \textit{p} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:AUTOLOADP} -\index{AUTOLOADP} ---- Function: \textbf{autoloadp} [\textbf{extensions}] \textit{symbol} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-WEAK-REFERENCE} -\index{MAKE-WEAK-REFERENCE} ---- Function: \textbf{make-weak-reference} [\textbf{extensions}] \textit{obj} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-SLIME-OUTPUT-STREAM} -\index{MAKE-SLIME-OUTPUT-STREAM} ---- Function: \textbf{make-slime-output-stream} [\textbf{extensions}] \textit{function} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:FIXNUMP} -\index{FIXNUMP} ---- Function: \textbf{fixnump} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SINGLE-FLOAT-NEGATIVE-INFINITY} -\index{SINGLE-FLOAT-NEGATIVE-INFINITY} ---- Variable: \textbf{single-float-negative-infinity} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:QUIT} -\index{QUIT} ---- Function: \textbf{quit} [\textbf{extensions}] \textit{\&key status} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:JAR-PATHNAME} -\index{JAR-PATHNAME} ---- Class: \textbf{jar-pathname} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:ASSQL} -\index{ASSQL} ---- Function: \textbf{assql} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:FINALIZE} -\index{FINALIZE} ---- Function: \textbf{finalize} [\textbf{extensions}] \textit{object function} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CAR} -\index{CAR} ---- Macro: \textbf{\%car} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -NIL - -\paragraph{} -\label{EXTENSIONS:SIMPLE-STRING-SEARCH} -\index{SIMPLE-STRING-SEARCH} ---- Function: \textbf{simple-string-search} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:RUN-SHELL-COMMAND} -\index{RUN-SHELL-COMMAND} ---- Function: \textbf{run-shell-command} [\textbf{extensions}] \textit{command \&key directory (output *standard-output*)} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*SAVED-BACKTRACE*} -\index{*SAVED-BACKTRACE*} ---- Variable: \textbf{*saved-backtrace*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:COLLECT} -\index{COLLECT} ---- Macro: \textbf{collect} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:ARGLIST} -\index{ARGLIST} ---- Function: \textbf{arglist} [\textbf{extensions}] \textit{extended-function-designator} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:ADJOIN-EQL} -\index{ADJOIN-EQL} ---- Function: \textbf{adjoin-eql} [\textbf{extensions}] \textit{item list} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CHARPOS} -\index{CHARPOS} ---- Function: \textbf{charpos} [\textbf{extensions}] \textit{stream} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-TEMP-FILE} -\index{MAKE-TEMP-FILE} ---- Function: \textbf{make-temp-file} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -Create and return the pathname of a previously non-existent file. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*PRINT-STRUCTURE*} -\index{*PRINT-STRUCTURE*} ---- Variable: \textbf{*print-structure*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOCKET-PEER-ADDRESS} -\index{SOCKET-PEER-ADDRESS} ---- Function: \textbf{socket-peer-address} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Returns the peer address of the SOCKET as a dotted quad string. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:GC} -\index{GC} ---- Function: \textbf{gc} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:GETENV} -\index{GETENV} ---- Function: \textbf{getenv} [\textbf{extensions}] \textit{variable} - -\begin{adjustwidth}{5em}{5em} -Return the value of the environment VARIABLE if it exists, otherwise return NIL. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SERVER-SOCKET-CLOSE} -\index{SERVER-SOCKET-CLOSE} ---- Function: \textbf{server-socket-close} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Close the server SOCKET. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:WEAK-REFERENCE} -\index{WEAK-REFERENCE} ---- Class: \textbf{weak-reference} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:GET-FLOATING-POINT-MODES} -\index{GET-FLOATING-POINT-MODES} ---- Function: \textbf{get-floating-point-modes} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:WEAK-REFERENCE-VALUE} -\index{WEAK-REFERENCE-VALUE} ---- Function: \textbf{weak-reference-value} [\textbf{extensions}] \textit{obj} - -\begin{adjustwidth}{5em}{5em} -Returns two values, the first being the value of the weak ref,the second T if the reference is valid, or NIL if it hasbeen cleared. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SINGLE-FLOAT-POSITIVE-INFINITY} -\index{SINGLE-FLOAT-POSITIVE-INFINITY} ---- Variable: \textbf{single-float-positive-infinity} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:FEATUREP} -\index{FEATUREP} ---- Function: \textbf{featurep} [\textbf{extensions}] \textit{form} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:CADR} -\index{CADR} ---- Macro: \textbf{\%cadr} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:PATHNAME-URL-P} -\index{PATHNAME-URL-P} ---- Function: \textbf{pathname-url-p} [\textbf{extensions}] \textit{pathname} - -\begin{adjustwidth}{5em}{5em} -Predicate for whether PATHNAME references a URL. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:STRING-INPUT-STREAM-CURRENT} -\index{STRING-INPUT-STREAM-CURRENT} ---- Function: \textbf{string-input-stream-current} [\textbf{extensions}] \textit{stream} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MAKE-SERVER-SOCKET} -\index{MAKE-SERVER-SOCKET} ---- Function: \textbf{make-server-socket} [\textbf{extensions}] \textit{port} - -\begin{adjustwidth}{5em}{5em} -Create a TCP server socket listening for clients on PORT. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:INTERRUPT-LISP} -\index{INTERRUPT-LISP} ---- Function: \textbf{interrupt-lisp} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:INIT-GUI} -\index{INIT-GUI} ---- Function: \textbf{init-gui} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -Dummy function used to autoload this file -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:URL-PATHNAME-QUERY} -\index{URL-PATHNAME-QUERY} ---- Function: \textbf{url-pathname-query} [\textbf{extensions}] \textit{p} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOURCE-FILE-POSITION} -\index{SOURCE-FILE-POSITION} ---- Function: \textbf{source-file-position} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOCKET-PEER-PORT} -\index{SOCKET-PEER-PORT} ---- Function: \textbf{socket-peer-port} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Returns the peer port number of the given SOCKET. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:ASSQ} -\index{ASSQ} ---- Function: \textbf{assq} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOURCE} -\index{SOURCE} ---- Function: \textbf{source} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:NEQ} -\index{NEQ} ---- Function: \textbf{neq} [\textbf{extensions}] \textit{obj1 obj2} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:STRING-FIND} -\index{STRING-FIND} ---- Function: \textbf{string-find} [\textbf{extensions}] \textit{char string} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SOCKET-LOCAL-ADDRESS} -\index{SOCKET-LOCAL-ADDRESS} ---- Function: \textbf{socket-local-address} [\textbf{extensions}] \textit{socket} - -\begin{adjustwidth}{5em}{5em} -Returns the local address of the SOCKET as a dotted quad string. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:READ-TIMEOUT} -\index{READ-TIMEOUT} ---- Function: \textbf{read-timeout} [\textbf{extensions}] \textit{socket seconds} - -\begin{adjustwidth}{5em}{5em} -Time in SECONDS to set local implementation of 'SO\_RCVTIMEO' on SOCKET. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:PATHNAME-JAR-P} -\index{PATHNAME-JAR-P} ---- Function: \textbf{pathname-jar-p} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SHOW-RESTARTS} -\index{SHOW-RESTARTS} ---- Function: \textbf{show-restarts} [\textbf{extensions}] \textit{restarts stream} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*BATCH-MODE*} -\index{*BATCH-MODE*} ---- Variable: \textbf{*batch-mode*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*GUI-BACKEND*} -\index{*GUI-BACKEND*} ---- Variable: \textbf{*gui-backend*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:DOUBLE-FLOAT-POSITIVE-INFINITY} -\index{DOUBLE-FLOAT-POSITIVE-INFINITY} ---- Variable: \textbf{double-float-positive-infinity} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:STYLE-WARN} -\index{STYLE-WARN} ---- Function: \textbf{style-warn} [\textbf{extensions}] \textit{format-control \&rest format-arguments} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MOST-NEGATIVE-JAVA-LONG} -\index{MOST-NEGATIVE-JAVA-LONG} ---- Variable: \textbf{most-negative-java-long} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:SLIME-OUTPUT-STREAM} -\index{SLIME-OUTPUT-STREAM} ---- Class: \textbf{slime-output-stream} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:GET-SOCKET-STREAM} -\index{GET-SOCKET-STREAM} ---- Function: \textbf{get-socket-stream} [\textbf{extensions}] \textit{socket \&key (element-type (quote character)) (external-format default)} - -\begin{adjustwidth}{5em}{5em} -:ELEMENT-TYPE must be CHARACTER or (UNSIGNED-BYTE 8); the default is CHARACTER. -EXTERNAL-FORMAT must be of the same format as specified for OPEN. -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:URL-PATHNAME} -\index{URL-PATHNAME} ---- Class: \textbf{url-pathname} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:GETENV-ALL} -\index{GETENV-ALL} ---- Function: \textbf{getenv-all} [\textbf{extensions}] \textit{variable} - -\begin{adjustwidth}{5em}{5em} -Returns all environment variables as an alist containing (name . value) -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:*DEBUG-LEVEL*} -\index{*DEBUG-LEVEL*} ---- Variable: \textbf{*debug-level*} [\textbf{extensions}] \textit{} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - -\paragraph{} -\label{EXTENSIONS:MACROEXPAND-ALL} -\index{MACROEXPAND-ALL} ---- Function: \textbf{macroexpand-all} [\textbf{extensions}] \textit{form \&optional env} - -\begin{adjustwidth}{5em}{5em} -not-documented -\end{adjustwidth} - Modified: branches/1.1.x/doc/manual/grovel.lisp ============================================================================== --- branches/1.1.x/doc/manual/grovel.lisp Mon Dec 3 06:13:18 2012 (r14285) +++ branches/1.1.x/doc/manual/grovel.lisp Mon Dec 3 06:21:18 2012 (r14286) @@ -13,6 +13,10 @@ (defun texify-string (string &optional remove) (with-output-to-string (s) (loop for char across string + ;; when (string= char #\_) ;; XXX FIXME + ;; do (progn + ;; (write-char #\_ s) + ;; (write-char #\_ s)) do (if (find char '(#\& #\% #\#)) (unless remove (write-char #\\ s) Added: branches/1.1.x/doc/manual/mop.tex ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ branches/1.1.x/doc/manual/mop.tex Mon Dec 3 06:21:18 2012 (r14286) @@ -0,0 +1,793 @@ +\paragraph{} +\label{MOP:SPECIALIZER} +\index{SPECIALIZER} +--- Class: \textbf{specializer} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:DIRECT-SLOT-DEFINITION} +\index{DIRECT-SLOT-DEFINITION} +--- Class: \textbf{direct-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EFFECTIVE-SLOT-DEFINITION} +\index{EFFECTIVE-SLOT-DEFINITION} +--- Class: \textbf{effective-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-DIRECT-SLOT-DEFINITION} +\index{STANDARD-DIRECT-SLOT-DEFINITION} +--- Class: \textbf{standard-direct-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:MAP-DEPENDENTS} +\index{MAP-DEPENDENTS} +--- Generic Function: \textbf{map-dependents} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-FUNCTION} +\index{METHOD-FUNCTION} +--- Generic Function: \textbf{method-function} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-SUBCLASSES} +\index{CLASS-DIRECT-SUBCLASSES} +--- Generic Function: \textbf{class-direct-subclasses} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-LOCATION} +\index{SLOT-DEFINITION-LOCATION} +--- Generic Function: \textbf{slot-definition-location} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-SLOT-DEFINITION} +\index{STANDARD-SLOT-DEFINITION} +--- Class: \textbf{standard-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION} +\index{STANDARD-EFFECTIVE-SLOT-DEFINITION} +--- Class: \textbf{standard-effective-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-ALLOCATION} +\index{SLOT-DEFINITION-ALLOCATION} +--- Generic Function: \textbf{slot-definition-allocation} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FUNCALLABLE-STANDARD-INSTANCE-ACCESS} +\index{FUNCALLABLE-STANDARD-INSTANCE-ACCESS} +--- Function: \textbf{funcallable-standard-instance-access} [\textbf{mop}] \textit{instance location} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:DIRECT-SLOT-DEFINITION-CLASS} +\index{DIRECT-SLOT-DEFINITION-CLASS} +--- Generic Function: \textbf{direct-slot-definition-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-SLOTS} +\index{CLASS-DIRECT-SLOTS} +--- Generic Function: \textbf{class-direct-slots} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-CLASS-PRECEDENCE-LIST} +\index{COMPUTE-CLASS-PRECEDENCE-LIST} +--- Generic Function: \textbf{compute-class-precedence-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EXTRACT-SPECIALIZER-NAMES} +\index{EXTRACT-SPECIALIZER-NAMES} +--- Function: \textbf{extract-specializer-names} [\textbf{mop}] \textit{specialized-lambda-list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-METHODS} +\index{GENERIC-FUNCTION-METHODS} +--- Generic Function: \textbf{generic-function-methods} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DEFAULT-INITARGS} +\index{CLASS-DEFAULT-INITARGS} +--- Generic Function: \textbf{class-default-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-PRECEDENCE-LIST} +\index{CLASS-PRECEDENCE-LIST} +--- Generic Function: \textbf{class-precedence-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STANDARD-INSTANCE-ACCESS} +\index{STANDARD-INSTANCE-ACCESS} +--- Function: \textbf{standard-instance-access} [\textbf{system}] \textit{instance location} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION} +\index{SET-FUNCALLABLE-INSTANCE-FUNCTION} +--- Function: \textbf{set-funcallable-instance-function} [\textbf{mop}] \textit{funcallable-instance function} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-DECLARATIONS} +\index{GENERIC-FUNCTION-DECLARATIONS} +--- Generic Function: \textbf{generic-function-declarations} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ENSURE-GENERIC-FUNCTION-USING-CLASS} +\index{ENSURE-GENERIC-FUNCTION-USING-CLASS} +--- Generic Function: \textbf{ensure-generic-function-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EQL-SPECIALIZER-OBJECT} +\index{EQL-SPECIALIZER-OBJECT} +--- Function: \textbf{eql-specializer-object} [\textbf{mop}] \textit{eql-specializer} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ENSURE-CLASS-USING-CLASS} +\index{ENSURE-CLASS-USING-CLASS} +--- Generic Function: \textbf{ensure-class-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-READERS} +\index{SLOT-DEFINITION-READERS} +--- Generic Function: \textbf{slot-definition-readers} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-DISCRIMINATING-FUNCTION} +\index{COMPUTE-DISCRIMINATING-FUNCTION} +--- Generic Function: \textbf{compute-discriminating-function} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FIND-METHOD-COMBINATION} +\index{FIND-METHOD-COMBINATION} +--- Generic Function: \textbf{find-method-combination} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:REMOVE-DIRECT-METHOD} +\index{REMOVE-DIRECT-METHOD} +--- Generic Function: \textbf{remove-direct-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:REMOVE-DEPENDENT} +\index{REMOVE-DEPENDENT} +--- Generic Function: \textbf{remove-dependent} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-ACCESSOR-METHOD} +\index{STANDARD-ACCESSOR-METHOD} +--- Class: \textbf{standard-accessor-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-INITFORM} +\index{SLOT-DEFINITION-INITFORM} +--- Generic Function: \textbf{slot-definition-initform} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:WRITER-METHOD-CLASS} +\index{WRITER-METHOD-CLASS} +--- Generic Function: \textbf{writer-method-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EXTRACT-LAMBDA-LIST} +\index{EXTRACT-LAMBDA-LIST} +--- Function: \textbf{extract-lambda-list} [\textbf{mop}] \textit{specialized-lambda-list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-LAMBDA-LIST} +\index{METHOD-LAMBDA-LIST} +--- Generic Function: \textbf{method-lambda-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-SPECIALIZERS} +\index{METHOD-SPECIALIZERS} +--- Generic Function: \textbf{method-specializers} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ADD-DEPENDENT} +\index{ADD-DEPENDENT} +--- Generic Function: \textbf{add-dependent} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:UPDATE-DEPENDENT} +\index{UPDATE-DEPENDENT} +--- Generic Function: \textbf{update-dependent} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION} +\index{SLOT-DEFINITION} +--- Class: \textbf{slot-definition} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-FINALIZED-P} +\index{CLASS-FINALIZED-P} +--- Generic Function: \textbf{class-finalized-p} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:INTERN-EQL-SPECIALIZER} +\index{INTERN-EQL-SPECIALIZER} +--- Function: \textbf{intern-eql-specializer} [\textbf{mop}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-READER-METHOD} +\index{STANDARD-READER-METHOD} +--- Class: \textbf{standard-reader-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-EFFECTIVE-METHOD} +\index{COMPUTE-EFFECTIVE-METHOD} +--- Generic Function: \textbf{compute-effective-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-LAMBDA-LIST} +\index{GENERIC-FUNCTION-LAMBDA-LIST} +--- Generic Function: \textbf{generic-function-lambda-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{COMMON-LISP:METHOD-QUALIFIERS} +\index{METHOD-QUALIFIERS} +--- Generic Function: \textbf{method-qualifiers} [\textbf{common-lisp}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:VALIDATE-SUPERCLASS} +\index{VALIDATE-SUPERCLASS} +--- Generic Function: \textbf{validate-superclass} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +This generic function is called to determine whether the class + superclass is suitable for use as a superclass of class. +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-TYPE} +\index{SLOT-DEFINITION-TYPE} +--- Generic Function: \textbf{slot-definition-type} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ACCESSOR-METHOD-SLOT-DEFINITION} +\index{ACCESSOR-METHOD-SLOT-DEFINITION} +--- Generic Function: \textbf{accessor-method-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EFFECTIVE-SLOT-DEFINITION-CLASS} +\index{EFFECTIVE-SLOT-DEFINITION-CLASS} +--- Generic Function: \textbf{effective-slot-definition-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-WRITERS} +\index{SLOT-DEFINITION-WRITERS} +--- Generic Function: \textbf{slot-definition-writers} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-VALUE-USING-CLASS} +\index{SLOT-VALUE-USING-CLASS} +--- Generic Function: \textbf{slot-value-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-GENERIC-FUNCTION} +\index{METHOD-GENERIC-FUNCTION} +--- Generic Function: \textbf{method-generic-function} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SPECIALIZER-DIRECT-METHODS} +\index{SPECIALIZER-DIRECT-METHODS} +--- Generic Function: \textbf{specializer-direct-methods} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-PROTOTYPE} +\index{CLASS-PROTOTYPE} +--- Generic Function: \textbf{class-prototype} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-WRITER-METHOD} +\index{STANDARD-WRITER-METHOD} +--- Class: \textbf{standard-writer-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-DEFAULT-INITARGS} +\index{CLASS-DIRECT-DEFAULT-INITARGS} +--- Generic Function: \textbf{class-direct-default-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FUNCALLABLE-STANDARD-CLASS} +\index{FUNCALLABLE-STANDARD-CLASS} +--- Class: \textbf{funcallable-standard-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SPECIALIZER-DIRECT-GENERIC-FUNCTIONS} +\index{SPECIALIZER-DIRECT-GENERIC-FUNCTIONS} +--- Generic Function: \textbf{specializer-direct-generic-functions} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-BOUNDP-USING-CLASS} +\index{SLOT-BOUNDP-USING-CLASS} +--- Generic Function: \textbf{slot-boundp-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-DEFAULT-INITARGS} +\index{COMPUTE-DEFAULT-INITARGS} +--- Generic Function: \textbf{compute-default-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FORWARD-REFERENCED-CLASS} +\index{FORWARD-REFERENCED-CLASS} +--- Class: \textbf{forward-referenced-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-METHOD-COMBINATION} +\index{GENERIC-FUNCTION-METHOD-COMBINATION} +--- Generic Function: \textbf{generic-function-method-combination} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-APPLICABLE-METHODS-USING-CLASSES} +\index{COMPUTE-APPLICABLE-METHODS-USING-CLASSES} +--- Generic Function: \textbf{compute-applicable-methods-using-classes} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METAOBJECT} +\index{METAOBJECT} +--- Class: \textbf{metaobject} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CANONICALIZE-DIRECT-SUPERCLASSES} +\index{CANONICALIZE-DIRECT-SUPERCLASSES} +--- Function: \textbf{canonicalize-direct-superclasses} [\textbf{mop}] \textit{direct-superclasses} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ADD-DIRECT-SUBCLASS} +\index{ADD-DIRECT-SUBCLASS} +--- Generic Function: \textbf{add-direct-subclass} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ENSURE-CLASS} +\index{ENSURE-CLASS} +--- Function: \textbf{ensure-class} [\textbf{mop}] \textit{name \&rest all-keys \&key \&allow-other-keys} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-METHOD-CLASS} +\index{GENERIC-FUNCTION-METHOD-CLASS} +--- Generic Function: \textbf{generic-function-method-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:DEFGENERIC} +\index{DEFGENERIC} +--- Function: \textbf{\%defgeneric} [\textbf{mop}] \textit{function-name \&rest all-keys} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EQL-SPECIALIZER} +\index{EQL-SPECIALIZER} +--- Class: \textbf{eql-specializer} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:READER-METHOD-CLASS} +\index{READER-METHOD-CLASS} +--- Generic Function: \textbf{reader-method-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-NAME} +\index{SLOT-DEFINITION-NAME} +--- Generic Function: \textbf{slot-definition-name} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-MAKUNBOUND-USING-CLASS} +\index{SLOT-MAKUNBOUND-USING-CLASS} +--- Generic Function: \textbf{slot-makunbound-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ADD-DIRECT-METHOD} +\index{ADD-DIRECT-METHOD} +--- Generic Function: \textbf{add-direct-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:MAKE-METHOD-LAMBDA} +\index{MAKE-METHOD-LAMBDA} +--- Generic Function: \textbf{make-method-lambda} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{COMMON-LISP:COMPUTE-APPLICABLE-METHODS} +\index{COMPUTE-APPLICABLE-METHODS} +--- Generic Function: \textbf{compute-applicable-methods} [\textbf{common-lisp}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-INITFUNCTION} +\index{SLOT-DEFINITION-INITFUNCTION} +--- Generic Function: \textbf{slot-definition-initfunction} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-EFFECTIVE-SLOT-DEFINITION} +\index{COMPUTE-EFFECTIVE-SLOT-DEFINITION} +--- Generic Function: \textbf{compute-effective-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +\index{GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +--- Generic Function: \textbf{generic-function-argument-precedence-order} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-NAME} +\index{GENERIC-FUNCTION-NAME} +--- Generic Function: \textbf{generic-function-name} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:REMOVE-DIRECT-SUBCLASS} +\index{REMOVE-DIRECT-SUBCLASS} +--- Generic Function: \textbf{remove-direct-subclass} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-SUPERCLASSES} +\index{CLASS-DIRECT-SUPERCLASSES} +--- Generic Function: \textbf{class-direct-superclasses} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-SLOTS} +\index{COMPUTE-SLOTS} +--- Generic Function: \textbf{compute-slots} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{COMMON-LISP:STANDARD-METHOD} +\index{STANDARD-METHOD} +--- Class: \textbf{standard-method} [\textbf{common-lisp}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FINALIZE-INHERITANCE} +\index{FINALIZE-INHERITANCE} +--- Generic Function: \textbf{finalize-inheritance} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-SLOTS} +\index{CLASS-SLOTS} +--- Generic Function: \textbf{class-slots} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-INITARGS} +\index{SLOT-DEFINITION-INITARGS} +--- Generic Function: \textbf{slot-definition-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FUNCALLABLE-STANDARD-OBJECT} +\index{FUNCALLABLE-STANDARD-OBJECT} +--- Class: \textbf{funcallable-standard-object} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + Modified: branches/1.1.x/doc/manual/system.tex ============================================================================== --- branches/1.1.x/doc/manual/system.tex Mon Dec 3 06:13:18 2012 (r14285) +++ branches/1.1.x/doc/manual/system.tex Mon Dec 3 06:21:18 2012 (r14286) @@ -1232,7 +1232,8 @@ --- Function: \textbf{zip} [\textbf{system}] \textit{pathname pathnames \&optional topdir} \begin{adjustwidth}{5em}{5em} -not-documented +Creates a zip archive at PATHNAME whose entries enumerated via the list of PATHNAMES. +If the optional TOPDIR argument is specified, the archive will preserve the hierarchy of PATHNAMES relative to TOPDIR. Without TOPDIR, there will be no sub-directories in the archive, i.e. it will be flat. \end{adjustwidth} \paragraph{} From mevenson at common-lisp.net Mon Dec 3 14:31:58 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 03 Dec 2012 06:31:58 -0800 Subject: [armedbear-cvs] r14287 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Mon Dec 3 06:31:56 2012 New Revision: 14287 Log: manual: didn't quite get the Preface, but RUN-PROGRAM is back. Modified: branches/1.1.x/doc/manual/abcl.tex branches/1.1.x/doc/manual/extensions.tex Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Mon Dec 3 06:21:18 2012 (r14286) +++ branches/1.1.x/doc/manual/abcl.tex Mon Dec 3 06:31:56 2012 (r14287) @@ -19,7 +19,9 @@ \tableofcontents %%Preface to the second edition, abcl-1.1.0. -\section{Preface to the Second Edition} + +\subsection{Preface to the Second Edition} + ABCL 1.1 now contains (A)MOP. We hope you enjoy! --The Mgmt. \chapter{Introduction} Modified: branches/1.1.x/doc/manual/extensions.tex ============================================================================== --- branches/1.1.x/doc/manual/extensions.tex Mon Dec 3 06:21:18 2012 (r14286) +++ branches/1.1.x/doc/manual/extensions.tex Mon Dec 3 06:31:56 2012 (r14287) @@ -0,0 +1,1152 @@ +\paragraph{} +\label{EXTENSIONS:COMPILE-FILE-IF-NEEDED} +\index{COMPILE-FILE-IF-NEEDED} +--- Function: \textbf{compile-file-if-needed} [\textbf{extensions}] \textit{input-file \&rest allargs \&key force-compile \&allow-other-keys} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MOST-POSITIVE-JAVA-LONG} +\index{MOST-POSITIVE-JAVA-LONG} +--- Variable: \textbf{most-positive-java-long} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:DUMP-JAVA-STACK} +\index{DUMP-JAVA-STACK} +--- Function: \textbf{dump-java-stack} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MEMQL} +\index{MEMQL} +--- Function: \textbf{memql} [\textbf{extensions}] \textit{item list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:DOUBLE-FLOAT-NEGATIVE-INFINITY} +\index{DOUBLE-FLOAT-NEGATIVE-INFINITY} +--- Variable: \textbf{double-float-negative-infinity} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:GROVEL-JAVA-DEFINITIONS} +\index{GROVEL-JAVA-DEFINITIONS} +--- Function: \textbf{grovel-java-definitions} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*AUTOLOAD-VERBOSE*} +\index{*AUTOLOAD-VERBOSE*} +--- Variable: \textbf{*autoload-verbose*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAKE-SLIME-INPUT-STREAM} +\index{MAKE-SLIME-INPUT-STREAM} +--- Function: \textbf{make-slime-input-stream} [\textbf{extensions}] \textit{function output-stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:URL-PATHNAME-FRAGMENT} +\index{URL-PATHNAME-FRAGMENT} +--- Function: \textbf{url-pathname-fragment} [\textbf{extensions}] \textit{p} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-KILL} +\index{PROCESS-KILL} +--- Function: \textbf{process-kill} [\textbf{extensions}] \textit{process} + +\begin{adjustwidth}{5em}{5em} +Kills the process. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:NIL-VECTOR} +\index{NIL-VECTOR} +--- Class: \textbf{nil-vector} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOURCE-PATHNAME} +\index{SOURCE-PATHNAME} +--- Function: \textbf{source-pathname} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:URI-DECODE} +\index{URI-DECODE} +--- Function: \textbf{uri-decode} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SIMPLE-STRING-FILL} +\index{SIMPLE-STRING-FILL} +--- Function: \textbf{simple-string-fill} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MEMQ} +\index{MEMQ} +--- Function: \textbf{memq} [\textbf{extensions}] \textit{item list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:URL-PATHNAME-SCHEME} +\index{URL-PATHNAME-SCHEME} +--- Function: \textbf{url-pathname-scheme} [\textbf{extensions}] \textit{p} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:TRULY-THE} +\index{TRULY-THE} +--- Special Operator: \textbf{truly-the} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CDR} +\index{CDR} +--- Macro: \textbf{\%cdr} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SLIME-INPUT-STREAM} +\index{SLIME-INPUT-STREAM} +--- Class: \textbf{slime-input-stream} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAKE-SOCKET} +\index{MAKE-SOCKET} +--- Function: \textbf{make-socket} [\textbf{extensions}] \textit{host port} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*ENABLE-INLINE-EXPANSION*} +\index{*ENABLE-INLINE-EXPANSION*} +--- Variable: \textbf{*enable-inline-expansion*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-INPUT} +\index{PROCESS-INPUT} +--- Function: \textbf{process-input} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAILBOX} +\index{MAILBOX} +--- Class: \textbf{mailbox} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:STRING-POSITION} +\index{STRING-POSITION} +--- Function: \textbf{string-position} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PRECOMPILE} +\index{PRECOMPILE} +--- Function: \textbf{precompile} [\textbf{extensions}] \textit{name \&optional definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*SUPPRESS-COMPILER-WARNINGS*} +\index{*SUPPRESS-COMPILER-WARNINGS*} +--- Variable: \textbf{*suppress-compiler-warnings*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS} +\index{PROCESS} +--- Class: \textbf{process} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CADDR} +\index{CADDR} +--- Macro: \textbf{\%caddr} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SIMPLE-SEARCH} +\index{SIMPLE-SEARCH} +--- Function: \textbf{simple-search} [\textbf{extensions}] \textit{sequence1 sequence2} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*LISP-HOME*} +\index{*LISP-HOME*} +--- Variable: \textbf{*lisp-home*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*COMMAND-LINE-ARGUMENT-LIST*} +\index{*COMMAND-LINE-ARGUMENT-LIST*} +--- Variable: \textbf{*command-line-argument-list*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:FILE-DIRECTORY-P} +\index{FILE-DIRECTORY-P} +--- Function: \textbf{file-directory-p} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAKE-DIALOG-PROMPT-STREAM} +\index{MAKE-DIALOG-PROMPT-STREAM} +--- Function: \textbf{make-dialog-prompt-stream} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CLASSP} +\index{CLASSP} +--- Function: \textbf{classp} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*DISASSEMBLER*} +\index{*DISASSEMBLER*} +--- Variable: \textbf{*disassembler*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SET-FLOATING-POINT-MODES} +\index{SET-FLOATING-POINT-MODES} +--- Function: \textbf{set-floating-point-modes} [\textbf{extensions}] \textit{\&key traps} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*DEBUG-CONDITION*} +\index{*DEBUG-CONDITION*} +--- Variable: \textbf{*debug-condition*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:EXIT} +\index{EXIT} +--- Function: \textbf{exit} [\textbf{extensions}] \textit{\&key status} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-ERROR} +\index{PROCESS-ERROR} +--- Function: \textbf{process-error} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOCKET-LOCAL-PORT} +\index{SOCKET-LOCAL-PORT} +--- Function: \textbf{socket-local-port} [\textbf{extensions}] \textit{socket} + +\begin{adjustwidth}{5em}{5em} +Returns the local port number of the given socket. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-ALIVE-P} +\index{PROCESS-ALIVE-P} +--- Function: \textbf{process-alive-p} [\textbf{extensions}] \textit{process} + +\begin{adjustwidth}{5em}{5em} +Return t if process is still alive, nil otherwise. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*INSPECTOR-HOOK*} +\index{*INSPECTOR-HOOK*} +--- Variable: \textbf{*inspector-hook*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*REQUIRE-STACK-FRAME*} +\index{*REQUIRE-STACK-FRAME*} +--- Variable: \textbf{*require-stack-frame*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROBE-DIRECTORY} +\index{PROBE-DIRECTORY} +--- Function: \textbf{probe-directory} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CHAR-TO-UTF8} +\index{CHAR-TO-UTF8} +--- Function: \textbf{char-to-utf8} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:AUTOLOAD} +\index{AUTOLOAD} +--- Function: \textbf{autoload} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MUTEX} +\index{MUTEX} +--- Class: \textbf{mutex} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:URI-ENCODE} +\index{URI-ENCODE} +--- Function: \textbf{uri-encode} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:AUTOLOAD-MACRO} +\index{AUTOLOAD-MACRO} +--- Function: \textbf{autoload-macro} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOCKET-CLOSE} +\index{SOCKET-CLOSE} +--- Function: \textbf{socket-close} [\textbf{extensions}] \textit{socket} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:UPTIME} +\index{UPTIME} +--- Function: \textbf{uptime} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*ED-FUNCTIONS*} +\index{*ED-FUNCTIONS*} +--- Variable: \textbf{*ed-functions*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:COMPILE-SYSTEM} +\index{COMPILE-SYSTEM} +--- Function: \textbf{compile-system} [\textbf{extensions}] \textit{\&key quit (zip t) output-path} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*LOAD-TRUENAME-FASL*} +\index{*LOAD-TRUENAME-FASL*} +--- Variable: \textbf{*load-truename-fasl*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SPECIAL-VARIABLE-P} +\index{SPECIAL-VARIABLE-P} +--- Function: \textbf{special-variable-p} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOCKET-ACCEPT} +\index{SOCKET-ACCEPT} +--- Function: \textbf{socket-accept} [\textbf{extensions}] \textit{socket} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*WARN-ON-REDEFINITION*} +\index{*WARN-ON-REDEFINITION*} +--- Variable: \textbf{*warn-on-redefinition*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:URL-PATHNAME-AUTHORITY} +\index{URL-PATHNAME-AUTHORITY} +--- Function: \textbf{url-pathname-authority} [\textbf{extensions}] \textit{p} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:AUTOLOADP} +\index{AUTOLOADP} +--- Function: \textbf{autoloadp} [\textbf{extensions}] \textit{symbol} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAKE-WEAK-REFERENCE} +\index{MAKE-WEAK-REFERENCE} +--- Function: \textbf{make-weak-reference} [\textbf{extensions}] \textit{obj} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:RESOLVE} +\index{RESOLVE} +--- Function: \textbf{resolve} [\textbf{extensions}] \textit{symbol} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CANCEL-FINALIZATION} +\index{CANCEL-FINALIZATION} +--- Function: \textbf{cancel-finalization} [\textbf{extensions}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAKE-SLIME-OUTPUT-STREAM} +\index{MAKE-SLIME-OUTPUT-STREAM} +--- Function: \textbf{make-slime-output-stream} [\textbf{extensions}] \textit{function} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:RUN-PROGRAM} +\index{RUN-PROGRAM} +--- Function: \textbf{run-program} [\textbf{extensions}] \textit{program args \&key environment (wait t)} + +\begin{adjustwidth}{5em}{5em} +Creates a new process running the the PROGRAM. +ARGS are a list of strings to be passed to the program as arguments. + +For no arguments, use nil which means that just the name of the +program is passed as arg 0. + +Returns a process structure containing the JAVA-OBJECT wrapped Process +object, and the PROCESS-INPUT, PROCESS-OUTPUT, and PROCESS-ERROR streams. + +c.f. http://download.oracle.com/javase/6/docs/api/java/lang/Process.html + +Notes about Unix environments (as in the :environment): + + * The ABCL implementation of run-program, like SBCL, Perl and many + other programs, copies the Unix environment by default. + + * Running Unix programs from a setuid process, or in any other + situation where the Unix environment is under the control of + someone else, is a mother lode of security problems. If you are + contemplating doing this, read about it first. (The Perl + community has a lot of good documentation about this and other + security issues in script-like programs.) + +The \&key arguments have the following meanings: + +:environment + An alist of STRINGs (name . value) describing the new + environment. The default is to copy the environment of the current + process. + +:wait + If non-NIL, which is the default, wait until the created process + finishes. If NIL, continue running Lisp until the program + finishes. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:FIXNUMP} +\index{FIXNUMP} +--- Function: \textbf{fixnump} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SINGLE-FLOAT-NEGATIVE-INFINITY} +\index{SINGLE-FLOAT-NEGATIVE-INFINITY} +--- Variable: \textbf{single-float-negative-infinity} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:QUIT} +\index{QUIT} +--- Function: \textbf{quit} [\textbf{extensions}] \textit{\&key status} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:INTERNAL-COMPILER-ERROR} +\index{INTERNAL-COMPILER-ERROR} +--- Function: \textbf{internal-compiler-error} [\textbf{extensions}] \textit{format-control \&rest format-arguments} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:JAR-PATHNAME} +\index{JAR-PATHNAME} +--- Class: \textbf{jar-pathname} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{EXTENSIONS:SIMPLE-STRING-SEARCH} +\index{SIMPLE-STRING-SEARCH} +--- Function: \textbf{simple-string-search} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:ASSQL} +\index{ASSQL} +--- Function: \textbf{assql} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:FINALIZE} +\index{FINALIZE} +--- Function: \textbf{finalize} [\textbf{extensions}] \textit{object function} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:RUN-SHELL-COMMAND} +\index{RUN-SHELL-COMMAND} +--- Function: \textbf{run-shell-command} [\textbf{extensions}] \textit{command \&key directory (output *standard-output*)} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*SAVED-BACKTRACE*} +\index{*SAVED-BACKTRACE*} +--- Variable: \textbf{*saved-backtrace*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CAR} +\index{CAR} +--- Macro: \textbf{\%car} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:COLLECT} +\index{COLLECT} +--- Macro: \textbf{collect} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:ARGLIST} +\index{ARGLIST} +--- Function: \textbf{arglist} [\textbf{extensions}] \textit{extended-function-designator} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:ADJOIN-EQL} +\index{ADJOIN-EQL} +--- Function: \textbf{adjoin-eql} [\textbf{extensions}] \textit{item list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CHARPOS} +\index{CHARPOS} +--- Function: \textbf{charpos} [\textbf{extensions}] \textit{stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAKE-TEMP-FILE} +\index{MAKE-TEMP-FILE} +--- Function: \textbf{make-temp-file} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:DESCRIBE-COMPILER-POLICY} +\index{DESCRIBE-COMPILER-POLICY} +--- Function: \textbf{describe-compiler-policy} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*PRINT-STRUCTURE*} +\index{*PRINT-STRUCTURE*} +--- Variable: \textbf{*print-structure*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOCKET-PEER-ADDRESS} +\index{SOCKET-PEER-ADDRESS} +--- Function: \textbf{socket-peer-address} [\textbf{extensions}] \textit{socket} + +\begin{adjustwidth}{5em}{5em} +Returns the peer address of the given socket as a dotted quad string. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:GC} +\index{GC} +--- Function: \textbf{gc} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:GETENV} +\index{GETENV} +--- Function: \textbf{getenv} [\textbf{extensions}] \textit{variable} + +\begin{adjustwidth}{5em}{5em} +Return the value of the environment VARIABLE if it exists, otherwise return NIL. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SERVER-SOCKET-CLOSE} +\index{SERVER-SOCKET-CLOSE} +--- Function: \textbf{server-socket-close} [\textbf{extensions}] \textit{socket} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:WEAK-REFERENCE} +\index{WEAK-REFERENCE} +--- Class: \textbf{weak-reference} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:GET-FLOATING-POINT-MODES} +\index{GET-FLOATING-POINT-MODES} +--- Function: \textbf{get-floating-point-modes} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:WEAK-REFERENCE-VALUE} +\index{WEAK-REFERENCE-VALUE} +--- Function: \textbf{weak-reference-value} [\textbf{extensions}] \textit{obj} + +\begin{adjustwidth}{5em}{5em} +Returns two values, the first being the value of the weak ref,the second T if the reference is valid, or NIL if it hasbeen cleared. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SINGLE-FLOAT-POSITIVE-INFINITY} +\index{SINGLE-FLOAT-POSITIVE-INFINITY} +--- Variable: \textbf{single-float-positive-infinity} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:FEATUREP} +\index{FEATUREP} +--- Function: \textbf{featurep} [\textbf{extensions}] \textit{form} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:CADR} +\index{CADR} +--- Macro: \textbf{\%cadr} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PATHNAME-URL-P} +\index{PATHNAME-URL-P} +--- Function: \textbf{pathname-url-p} [\textbf{extensions}] \textit{pathname} + +\begin{adjustwidth}{5em}{5em} +Predicate for whether PATHNAME references a URL. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:STRING-INPUT-STREAM-CURRENT} +\index{STRING-INPUT-STREAM-CURRENT} +--- Function: \textbf{string-input-stream-current} [\textbf{extensions}] \textit{stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MAKE-SERVER-SOCKET} +\index{MAKE-SERVER-SOCKET} +--- Function: \textbf{make-server-socket} [\textbf{extensions}] \textit{port} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:INTERRUPT-LISP} +\index{INTERRUPT-LISP} +--- Function: \textbf{interrupt-lisp} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:AVER} +\index{AVER} +--- Macro: \textbf{aver} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:INIT-GUI} +\index{INIT-GUI} +--- Function: \textbf{init-gui} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Dummy function used to autoload this file +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:URL-PATHNAME-QUERY} +\index{URL-PATHNAME-QUERY} +--- Function: \textbf{url-pathname-query} [\textbf{extensions}] \textit{p} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-EXIT-CODE} +\index{PROCESS-EXIT-CODE} +--- Function: \textbf{process-exit-code} [\textbf{extensions}] \textit{instance} + +\begin{adjustwidth}{5em}{5em} +The exit code of a process. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOURCE-FILE-POSITION} +\index{SOURCE-FILE-POSITION} +--- Function: \textbf{source-file-position} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOCKET-PEER-PORT} +\index{SOCKET-PEER-PORT} +--- Function: \textbf{socket-peer-port} [\textbf{extensions}] \textit{socket} + +\begin{adjustwidth}{5em}{5em} +Returns the peer port number of the given socket. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:ASSQ} +\index{ASSQ} +--- Function: \textbf{assq} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOURCE} +\index{SOURCE} +--- Function: \textbf{source} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SOCKET-LOCAL-ADDRESS} +\index{SOCKET-LOCAL-ADDRESS} +--- Function: \textbf{socket-local-address} [\textbf{extensions}] \textit{socket} + +\begin{adjustwidth}{5em}{5em} +Returns the local address of the given socket as a dotted quad string. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:NEQ} +\index{NEQ} +--- Function: \textbf{neq} [\textbf{extensions}] \textit{obj1 obj2} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:STRING-FIND} +\index{STRING-FIND} +--- Function: \textbf{string-find} [\textbf{extensions}] \textit{char string} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PATHNAME-JAR-P} +\index{PATHNAME-JAR-P} +--- Function: \textbf{pathname-jar-p} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-WAIT} +\index{PROCESS-WAIT} +--- Function: \textbf{process-wait} [\textbf{extensions}] \textit{process} + +\begin{adjustwidth}{5em}{5em} +Wait for process to quit running for some reason. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SHOW-RESTARTS} +\index{SHOW-RESTARTS} +--- Function: \textbf{show-restarts} [\textbf{extensions}] \textit{restarts stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*BATCH-MODE*} +\index{*BATCH-MODE*} +--- Variable: \textbf{*batch-mode*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-P} +\index{PROCESS-P} +--- Function: \textbf{process-p} [\textbf{extensions}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*GUI-BACKEND*} +\index{*GUI-BACKEND*} +--- Variable: \textbf{*gui-backend*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:DOUBLE-FLOAT-POSITIVE-INFINITY} +\index{DOUBLE-FLOAT-POSITIVE-INFINITY} +--- Variable: \textbf{double-float-positive-infinity} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:STYLE-WARN} +\index{STYLE-WARN} +--- Function: \textbf{style-warn} [\textbf{extensions}] \textit{format-control \&rest format-arguments} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MOST-NEGATIVE-JAVA-LONG} +\index{MOST-NEGATIVE-JAVA-LONG} +--- Variable: \textbf{most-negative-java-long} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:SLIME-OUTPUT-STREAM} +\index{SLIME-OUTPUT-STREAM} +--- Class: \textbf{slime-output-stream} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:GET-SOCKET-STREAM} +\index{GET-SOCKET-STREAM} +--- Function: \textbf{get-socket-stream} [\textbf{extensions}] \textit{socket \&key (element-type (quote character)) (external-format default)} + +\begin{adjustwidth}{5em}{5em} +:ELEMENT-TYPE must be CHARACTER or (UNSIGNED-BYTE 8); the default is CHARACTER. +EXTERNAL-FORMAT must be of the same format as specified for OPEN. +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PROCESS-OUTPUT} +\index{PROCESS-OUTPUT} +--- Function: \textbf{process-output} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:URL-PATHNAME} +\index{URL-PATHNAME} +--- Class: \textbf{url-pathname} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:COMPILER-UNSUPPORTED-FEATURE-ERROR} +\index{COMPILER-UNSUPPORTED-FEATURE-ERROR} +--- Class: \textbf{compiler-unsupported-feature-error} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:*DEBUG-LEVEL*} +\index{*DEBUG-LEVEL*} +--- Variable: \textbf{*debug-level*} [\textbf{extensions}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:COMPILER-ERROR} +\index{COMPILER-ERROR} +--- Function: \textbf{compiler-error} [\textbf{extensions}] \textit{format-control \&rest format-arguments} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:MACROEXPAND-ALL} +\index{MACROEXPAND-ALL} +--- Function: \textbf{macroexpand-all} [\textbf{extensions}] \textit{form \&optional env} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + From mevenson at common-lisp.net Mon Dec 3 14:43:12 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 03 Dec 2012 06:43:12 -0800 Subject: [armedbear-cvs] r14288 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Mon Dec 3 06:43:07 2012 New Revision: 14288 Log: manual: kludge layout with hard spaces for command line options. Modified: branches/1.1.x/doc/manual/abcl.tex Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Mon Dec 3 06:31:56 2012 (r14287) +++ branches/1.1.x/doc/manual/abcl.tex Mon Dec 3 06:43:07 2012 (r14288) @@ -164,14 +164,14 @@ ABCL supports the following command line options: \begin{description} -\item[\texttt{--help}] displays a help message. -\item[\texttt{--noinform}] Suppresses the printing of startup information and banner. -\item[\texttt{--noinit}] suppresses the loading of the \verb+~/.abclrc+ startup file. -\item[\texttt{--nosystem}] suppresses loading the \texttt{system.lisp} customization file. -\item[\texttt{--eval FORM}] evaluates FORM before initializing the REPL. -\item[\texttt{--load FILE}] loads the file FILE before initializing the REPL. -\item[\texttt{--load-system-file FILE}] loads the system file FILE before initializing the REPL. -\item[\texttt{--batch}] evaluates forms specified by arguments and in +\item[\texttt{ --help}] displays a help message. +\item[\texttt{ --noinform}] Suppresses the printing of startup information and banner. +\item[\texttt{ --noinit}] suppresses the loading of the \verb+~/.abclrc+ startup file. +\item[\texttt{ --nosystem}] suppresses loading the \texttt{system.lisp} customization file. +\item[\texttt{ --eval FORM}] evaluates FORM before initializing the REPL. +\item[\texttt{ --load FILE}] loads the file FILE before initializing the REPL. +\item[\texttt{ --load-system-file FILE}] loads the system file FILE before initializing the REPL. +\item[\texttt{ --batch}] evaluates forms specified by arguments and in the intialization file \verb+~/.abclrc+, and then exits without starting a REPL. \end{description} From rschlatte at common-lisp.net Tue Dec 4 16:36:41 2012 From: rschlatte at common-lisp.net (rschlatte at common-lisp.net) Date: Tue, 04 Dec 2012 08:36:41 -0800 Subject: [armedbear-cvs] r14289 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: rschlatte Date: Tue Dec 4 08:36:39 2012 New Revision: 14289 Log: Don't shortcut add-method for subclasses of standard-generic-function - Fixes #276 - Reported by Pascal Costanza Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/clos.lisp Mon Dec 3 06:43:07 2012 (r14288) +++ trunk/abcl/src/org/armedbear/lisp/clos.lisp Tue Dec 4 08:36:39 2012 (r14289) @@ -1718,7 +1718,7 @@ ;; Remove methods defined by previous DEFGENERIC forms, as ;; specified by CLHS, 7.7 (Macro DEFGENERIC). (dolist (method (generic-function-initial-methods gf)) - (if (typep gf 'standard-generic-function) + (if (eq (class-of gf) +the-standard-generic-function-class+) (progn (std-remove-method gf method) (map-dependents gf @@ -2125,7 +2125,9 @@ (if (eq (generic-function-method-class gf) +the-standard-method-class+) (apply #'make-instance-standard-method gf all-keys) (apply #'make-instance (generic-function-method-class gf) all-keys)))) - (if (eq (generic-function-method-class gf) +the-standard-method-class+) + (if (and + (eq (generic-function-method-class gf) +the-standard-method-class+) + (eq (class-of gf) +the-standard-generic-function-class+)) (progn (std-add-method gf method) (map-dependents gf From mevenson at common-lisp.net Tue Dec 4 17:00:00 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 04 Dec 2012 09:00:00 -0800 Subject: [armedbear-cvs] r14290 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Tue Dec 4 08:59:59 2012 New Revision: 14290 Log: abcl-1.1.x: Backport r14289. Don't shortcut add-method for subclasses of standard-generic-function - Fixes #276 - Reported by Pascal Costanza Modified: branches/1.1.x/src/org/armedbear/lisp/clos.lisp Modified: branches/1.1.x/src/org/armedbear/lisp/clos.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/clos.lisp Tue Dec 4 08:36:39 2012 (r14289) +++ branches/1.1.x/src/org/armedbear/lisp/clos.lisp Tue Dec 4 08:59:59 2012 (r14290) @@ -1718,7 +1718,7 @@ ;; Remove methods defined by previous DEFGENERIC forms, as ;; specified by CLHS, 7.7 (Macro DEFGENERIC). (dolist (method (generic-function-initial-methods gf)) - (if (typep gf 'standard-generic-function) + (if (eq (class-of gf) +the-standard-generic-function-class+) (progn (std-remove-method gf method) (map-dependents gf @@ -2125,7 +2125,9 @@ (if (eq (generic-function-method-class gf) +the-standard-method-class+) (apply #'make-instance-standard-method gf all-keys) (apply #'make-instance (generic-function-method-class gf) all-keys)))) - (if (eq (generic-function-method-class gf) +the-standard-method-class+) + (if (and + (eq (generic-function-method-class gf) +the-standard-method-class+) + (eq (class-of gf) +the-standard-generic-function-class+)) (progn (std-add-method gf method) (map-dependents gf From mevenson at common-lisp.net Tue Dec 4 17:16:00 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 04 Dec 2012 09:16:00 -0800 Subject: [armedbear-cvs] r14291 - branches/1.1.x Message-ID: Author: mevenson Date: Tue Dec 4 09:16:00 2012 New Revision: 14291 Log: build: always delete intermediate "version" artifact. Modified: branches/1.1.x/build.xml Modified: branches/1.1.x/build.xml ============================================================================== --- branches/1.1.x/build.xml Tue Dec 4 08:59:59 2012 (r14290) +++ branches/1.1.x/build.xml Tue Dec 4 09:16:00 2012 (r14291) @@ -376,6 +376,7 @@ + From mevenson at common-lisp.net Tue Dec 4 21:06:12 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 04 Dec 2012 13:06:12 -0800 Subject: [armedbear-cvs] r14292 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Tue Dec 4 13:06:12 2012 New Revision: 14292 Log: manual: spellcheck and line-editing. Modified: branches/1.1.x/doc/manual/abcl.bib branches/1.1.x/doc/manual/abcl.tex Modified: branches/1.1.x/doc/manual/abcl.bib ============================================================================== --- branches/1.1.x/doc/manual/abcl.bib Tue Dec 4 09:16:00 2012 (r14291) +++ branches/1.1.x/doc/manual/abcl.bib Tue Dec 4 13:06:12 2012 (r14292) @@ -4,7 +4,7 @@ howpublished = {\url{http://java.sun.com/developer/onlineTraining/protocolhandlers/}}, month = aug, year = 2000, - note = {Last accessed Jan 25, 2012}} + note = {Last accessed Jan 25, 2012}} % no longer resolving 2012-12-04 @Misc{quicklisp, author = {Beane, Zach}, Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Tue Dec 4 09:16:00 2012 (r14291) +++ branches/1.1.x/doc/manual/abcl.tex Tue Dec 4 13:06:12 2012 (r14292) @@ -29,7 +29,7 @@ Armed Bear Common Lisp (ABCL) is an implementation of Common Lisp that runs on the Java Virtual Machine. It compiles Common Lisp to Java 5 bytecode, providing the following integration methods for interfacing -with Java code and librariess: +with Java code and libraries: \begin{itemize} \item Lisp code can create Java objects and call their methods (see Section~\ref{sec:lisp-java}, page~\pageref{sec:lisp-java}). @@ -66,7 +66,7 @@ rather arcane sounding deviation from conformance is so that the result of a merge won't fill in a DEVICE with the wrong "default device for the host" in the sense of the fourth paragraph in the - [CLHS description of MERGE-PATHNAMES][2] (the paragraph beginning + CLHS description of MERGE-PATHNAMES (see in \cite{CLHS} the paragraph beginning "If the PATHNAME explicitly specifies a host and not a device?"). A future version of the implementation may return to conformance by using the \code{HOST} value to reflect the type explicitly. @@ -136,7 +136,7 @@ \texttt{abcl.jar} or possibly something like \texttt{abcl-1.1.0.jar} if using a versioned package on the local filesystem from your system vendor. This jar file can be executed from the command line to obtain a -REPL\footnote{Read-Eval Print Loop, a Lisp commandline}, viz: +REPL\footnote{Read-Eval Print Loop, a Lisp command-line}, viz: \begin{listing-shell} cmd$ java -jar abcl.jar @@ -172,7 +172,7 @@ \item[\texttt{ --load FILE}] loads the file FILE before initializing the REPL. \item[\texttt{ --load-system-file FILE}] loads the system file FILE before initializing the REPL. \item[\texttt{ --batch}] evaluates forms specified by arguments and in - the intialization file \verb+~/.abclrc+, and then exits without + the initialization file \verb+~/.abclrc+, and then exits without starting a REPL. \end{description} @@ -213,17 +213,19 @@ of Java objects, manipulation of instance and static fields on Java objects, and construction of new Java objects. -When calling Java routines, some values will automatically be converted -by the FFI\footnote{Foreign Function Interface, the term for the part of - a Lisp implementation that implements calling code written in other - languages.} from Lisp values to Java values. These conversions -typically apply to strings, integers and floats. Other values need to be -converted to their Java equivalents by the programmer before calling the -Java object method. Java values returned to Lisp are also generally -converted back to their Lisp counterparts. Some operators make an -exception to this rule and do not perform any conversion; those are the -``raw'' counterparts of certain FFI functions and are recognizable by -their name ending with \code{-RAW}. +When calling Java routines, some values will automatically be +converted by the FFI\footnote{Foreign Function Interface, is the term + of art for the part of a Lisp implementation which implements + calling code written in other languages, typically normalized to the + local C compiler calling conventions.} from Lisp values to Java +values. These conversions typically apply to strings, integers and +floats. Other values need to be converted to their Java equivalents by +the programmer before calling the Java object method. Java values +returned to Lisp are also generally converted back to their Lisp +counterparts. Some operators make an exception to this rule and do not +perform any conversion; those are the ``raw'' counterparts of certain +FFI functions and are recognizable by their name ending with +\code{-RAW}. \subsection{Low-level Java API} @@ -738,6 +740,11 @@ programmer to pass an interface-implementation object which will in turn be passed to the \code{jmake-proxy} generic function. +\subsection{Implementation of Java classes in Lisp} + +See \code{JAVA:JNEW-RUNTIME-CLASS} on \ref{JAVA:JNEW-RUNTIME-CLASS}. + + \chapter{Implementation Dependent Extensions} As outlined by the CLHS ANSI conformance guidelines, we document the @@ -761,6 +768,10 @@ (the value of the special variable \code{JAVA:*CLASSLOADER*}. It has no effect on Java code outside ABCL. +\subsection{Creating a synthetic Java Class at Runtime} + +See \code{JAVA:JNEW-RUNTIME-CLASS} on \ref{JAVA:JNEW-RUNTIME-CLASS}. + % include autogen docs for the JAVA package. \include{java} @@ -804,32 +815,36 @@ \section{Pathname} -We implement an extension to the Pathname that allows for the -description and retrieval of resources named in a +We implement an extension to the \code{CL:PATHNAME} that allows for +the description and retrieval of resources named in a \textsc{URI} \footnote{A \textsc{URI} is essentially a superset of - what is commonly understood as a \textsc{URL} We sometimesuse the + what is commonly understood as a \textsc{URL} We sometime suse the term URL as shorthand in describing the URL Pathnames, even though the corresponding encoding is more akin to a URI as described in RFC3986 \cite{rfc3986}.} scheme that the \textsc{JVM} -``understands''. Support is built-in to comprehend the ``http'' and -``https'' implementations but additional protocol handlers may be -installed at runtime by having \textsc{JVM} symbols present in the -sun.net.protocol.dynamic pacakge. See \cite{maso2000} for more -details. - -\textsc{ABCL} has created specializations of the ANSI Pathname object to -enable to use of \textsc{URI}s to address dynamically loaded resources for the -JVM. A \code{URL-PATHNAME} has a corresponding \textsc{URI} whose canonical -representation is defined to be the \code{NAMESTRING} of the Pathname. - -% -\begin{verbatim} +``understands''. By definition, support is built-in into the JVM to +access the ``http'' and ``https'' schemes but additional protocol +handlers may be installed at runtime by having \textsc{JVM} symbols +present in the sun.net.protocol.dynamic pacakge. See \cite{maso2000} +for more details. + +\textsc{ABCL} has created specializations of the ANSI +\code{CL:PATHNAME} object to enable to use of \textsc{URI}s to address +dynamically loaded resources for the JVM. The \code{EXT:URL-PATHNAME} +specialization. has a corresponding \textsc{URI} whose canonical +representation is defined to be the \code{NAMESTRING} of the +Pathname. The \code{EXT:JAR-PATHNAME} extension further specializes +the the \code{EXT:URL-PATHNAME} to provide access to components of zip +archives. -# RDF description of type hierarchy +% RDF description of type hierarchy % TODO Render via some LaTeX mode for graphviz? - - a . - a . +\begin{verbatim} + @prefix ext: . + @prefix cl: . + + a . + a . a . \end{verbatim} @@ -839,8 +854,9 @@ \label{EXTENSIONS:JAR-PATHNAME} \index{JAR-PATHNAME} -Both \code{EXT:URL-PATHNAME} and \code{EXT:JAR-PATHNAME} may be used anywhere -a \code{CL:PATHNAME} is accepted with the following caveats: +Both the \code{EXT:URL-PATHNAME} and \code{EXT:JAR-PATHNAME} objects +may be used anywhere a \code{CL:PATHNAME} is accepted with the +following caveats: \begin{itemize} @@ -848,9 +864,10 @@ cannot be the target of write operations. \index{URI} -\item No canonicalization is performed on the underlying \textsc{URI} - (i.e. the implementation does not attempt to compute the current - name of the representing resource unless it is requested to be +\item Any results of canonicalization procesures performed on the + underlying \textsc{URI} are discarded between resolutions (i.e. the + implementation does not attempt to cache the results of current name + resolution of the representing resource unless it is requested to be resolved.) Upon resolution, any cannoicalization procedures followed in resolving the resource (e.g. following redirects) are discarded. Users may programatically initiate a new, local @@ -858,8 +875,8 @@ \code{EXT:URL-PATHNAME} object. Depending on the reliablity and properties of your local \textsc{REST} infrastructure, these results may not necessarily be idempotent over time\footnote {See - \cite{evenson2011} for the draft of the publication of the technical - details}. + \cite{evenson2011} for the draft of the publication of the + technical details}. \end{itemize} @@ -874,32 +891,36 @@ will load and execute the Quicklisp setup code. -The implementation currently breaks ANSI conformance by allowing the -types able to be READ for the DEVICE to return a possible CONS of -PATHNAME objects. %% citation from CLHS needed. - -In order to ``smooth over'' the bit about types being READ from -PATHNAME components, we extend the semantics for the usual PATHNAME -merge semantics when *DEFAULT-PATHNAME-DEFAULTS* contains a -\code{JAR-PATHNAME}. +The implementation currently breaks \textsc{ANSI} conformance by allowing the +types able to be READ for the DEVICE to return a possible \code{CONS} of +\code{CL:PATHNAME} objects. %% citation from CLHS needed. + +In order to ``smooth over'' the bit about types being \code{CL:READ} from +\code{CL:PATHNAME} components, we extend the semantics for the usual PATHNAME +merge semantics when \code{*DEFAULT-PATHNAME-DEFAULTS*} contains a +\code{EXT:JAR-PATHNAME}. %See \ref{_:quicklisp} on page \pageref{_:quicklisp}. \subsubsection{Implementation} The implementation of these extensions stores all the additional -information in the PATHNAME object itself in ways that while strictly +information in the \code{CL:PATHNAME} object itself in ways that while strictly speaking are conformant, nonetheless may trip up libraries that don't expect the following: \begin{itemize} \item \code{DEVICE} can be either a string denoting a drive letter - under DOS or a list of exactly one or two elements. If - \code{DEVICE} is a list, it denotes a \code{JAR-PATHNAME}, with the entries - containing \code{PATHNAME} objects which describe the outer and (possibley) - locations of the jar archive. + under \textsc{DOS} or a list of exactly one or two elements. If + \code{DEVICE} is a list, it denotes a \code{EXT:JAR-PATHNAME}, with + the entries containing \code{CL:PATHNAME} objects which describe the + outer and (possibly inner) locations of the jar + archive \footnote{The case of inner and outer + \code{EXT:EJAR-PATHNAME} arises when zip archives themselves + contain zip archives which is the case when the ABCL fasl is + included in the abcl.jar zip archive.}. -\item A \code{URL-PATHNAME} always has a \code{HOST} component that is a +\item A \code{EXT:URL-PATHNAME} always has a \code{HOST} component that is a property list. The values of the \code{HOST} property list are always character strings. The allowed keys have the following meanings: \begin{description} @@ -910,7 +931,6 @@ \item[:FRAGMENT] The fragment portion of the \textsc{URI} \end{description} - \item In order to encapsulate the implementation decisions for these meanings, the following functions provide a setf-able API for reading and writing such values: \code{URL-PATHNAME-QUERY}, @@ -947,6 +967,8 @@ abstractions on the standard Java collection classes as defined by the \code{java.util.List} contract. +%% an Example of using java.util.Lisp in Lisp would be nice + This extension is not automatically loaded by the implementation. It may be loaded via: @@ -1119,9 +1141,9 @@ %dynamically loaded. -The following \textsc{ASDF} components are added: \code{JAR-FILE}, -\code{JAR-DIRECTORY}, \code{CLASS-FILE-DIRECTORY} and \code{MVN}. - +When loaded, abcl-asdf adds the following objects to \textsc{ASDF}: +\code{JAR-FILE}, \code{JAR-DIRECTORY}, \code{CLASS-FILE-DIRECTORY} and +\code{MVN}, exporting them (and others) as public symbols. \subsection{Referencing Maven Artifacts via ASDF} @@ -1200,13 +1222,14 @@ To one used to the more universal syntax of Lisp pairs upon which the definition of read and compile time macros is quite -natural \footnote{See Graham's ``On Lisp'' http://lib.store.yahoo.net/lib/paulgraham/onlisp.pdf.}, the Java syntax available to -the Java programmer may be said to suck. To alleviate this situation, -the JSS contrib introduces the \code{SHARPSIGN-DOUBLE-QUOTE} -(\code{\#"}) reader macro, which allows the the specification of the -name of invoking function as the first element of the relevant s-expr -which tends to be more congruent to how Lisp programmers seem to be -wired to think. +natural \footnote{See Graham's ``On Lisp'' + http://lib.store.yahoo.net/lib/paulgraham/onlisp.pdf.}, the Java +syntax available to the Java programmer may be said to suck. To +alleviate this situation, the JSS contrib introduces the +\code{SHARPSIGN-DOUBLE-QUOTE} (\code{\#"}) reader macro, which allows +the the specification of the name of invoking function as the first +element of the relevant s-expr which tends to be more congruent to how +Lisp programmers seem to be wired to think. While quite useful, we don't expect that the JSS contrib will be the last experiment in wrangling Java from Common Lisp. @@ -1229,6 +1252,11 @@ Some more information on jss can be found in its documentation at \url{http://svn.common-lisp.net/armedbear/trunk/abcl/contrib/jss/README.markdown} +\section{jfli} +\label{section:jfli} + +The contrib contains a pure-Java version of JFLI. + \section{asdf-install} The asdf-install contrib provides an implementation of ASDF-INSTALL. @@ -1262,8 +1290,8 @@ released abcl-1.0.0. We released abcl-1.0.1 as a maintainence release on January 10, 2012. -In December 2012, we we revised the implementation by adding (A)MOP -with the release of abcl-1.1.0 . +In December 2012, we revised the implementation by adding (A)MOP +with the release of abcl-1.1.0. \appendix From rschlatte at common-lisp.net Wed Dec 5 15:15:26 2012 From: rschlatte at common-lisp.net (rschlatte at common-lisp.net) Date: Wed, 05 Dec 2012 07:15:26 -0800 Subject: [armedbear-cvs] r14293 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: rschlatte Date: Wed Dec 5 07:15:24 2012 New Revision: 14293 Log: Don't clobber class objects when re-initializing. - Also remove double-initialization via shared-initialize + one of intialize-instance / reinitialize-instance. - Fixes #277 - Reported by Pascal Costanza Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/clos.lisp Tue Dec 4 13:06:12 2012 (r14292) +++ trunk/abcl/src/org/armedbear/lisp/clos.lisp Wed Dec 5 07:15:24 2012 (r14293) @@ -865,16 +865,18 @@ ; class canonicalized-slot) ; canonicalized-slot)) +(defun canonicalize-direct-superclass-list (class direct-superclasses) + (cond (direct-superclasses) + ((subtypep (class-of class) +the-funcallable-standard-class+) + (list +the-funcallable-standard-object-class+)) + ((subtypep (class-of class) +the-standard-class+) + (list +the-standard-object-class+)))) + (defun std-after-initialization-for-classes (class &key direct-superclasses direct-slots direct-default-initargs &allow-other-keys) - (let ((supers (cond (direct-superclasses) - ((subtypep (class-of class) - +the-funcallable-standard-class+) - (list +the-funcallable-standard-object-class+)) - ((subtypep (class-of class) +the-standard-class+) - (list +the-standard-object-class+))))) + (let ((supers (canonicalize-direct-superclass-list class direct-superclasses))) (setf (class-direct-superclasses class) supers) (dolist (superclass supers) (add-direct-subclass superclass class))) @@ -3781,24 +3783,6 @@ &rest initargs) (std-shared-initialize instance slot-names initargs)) -(defmethod shared-initialize :after ((instance standard-class) slot-names - &key direct-superclasses - direct-slots direct-default-initargs - &allow-other-keys) - (std-after-initialization-for-classes - instance :direct-superclasses direct-superclasses - :direct-slots direct-slots - :direct-default-initargs direct-default-initargs)) - -(defmethod shared-initialize :after ((instance funcallable-standard-class) - slot-names &key direct-superclasses - direct-slots direct-default-initargs - &allow-other-keys) - (std-after-initialization-for-classes - instance :direct-superclasses direct-superclasses - :direct-slots direct-slots - :direct-default-initargs direct-default-initargs)) - (defmethod shared-initialize ((slot slot-definition) slot-names &rest args &key name initargs initform initfunction @@ -3934,24 +3918,48 @@ (class-direct-superclasses class))) (add-direct-subclass superclass class))) -(defmethod reinitialize-instance :after ((class standard-class) &rest all-keys) +(defun std-after-reinitialization-for-classes (class + &rest all-keys + &key (direct-superclasses nil direct-superclasses-p) + (direct-slots nil direct-slots-p) + (direct-default-initargs nil direct-default-initargs-p) + &allow-other-keys) (remhash class *make-instance-initargs-cache*) (remhash class *reinitialize-instance-initargs-cache*) (%make-instances-obsolete class) (setf (class-finalized-p class) nil) - ;; KLUDGE (rudi 2012-06-17) this calls add-direct-subclass again - (apply #'std-after-initialization-for-classes class all-keys) + (when direct-superclasses-p + (let* ((old-supers (class-direct-superclasses class)) + (new-supers (canonicalize-direct-superclass-list + class direct-superclasses))) + (setf (class-direct-superclasses class) new-supers) + (dolist (old-superclass (set-difference old-supers new-supers)) + (remove-direct-subclass old-superclass class)) + (dolist (new-superclass (set-difference new-supers old-supers)) + (add-direct-subclass new-superclass class)))) + (when direct-slots-p + ;; FIXME: maybe remove old reader and writer methods? + (let ((slots (mapcar #'(lambda (slot-properties) + (apply #'make-direct-slot-definition class slot-properties)) + direct-slots))) + (setf (class-direct-slots class) slots) + (dolist (direct-slot slots) + (dolist (reader (slot-definition-readers direct-slot)) + (add-reader-method class reader direct-slot)) + (dolist (writer (slot-definition-writers direct-slot)) + (add-writer-method class writer direct-slot))))) + (when direct-default-initargs-p + (setf (class-direct-default-initargs class) direct-default-initargs)) + (maybe-finalize-class-subtree class) (map-dependents class #'(lambda (dep) (update-dependent class dep all-keys)))) +(defmethod reinitialize-instance :after ((class standard-class) + &rest all-keys) + (apply #'std-after-reinitialization-for-classes class all-keys)) + (defmethod reinitialize-instance :after ((class funcallable-standard-class) &rest all-keys) - (remhash class *make-instance-initargs-cache*) - (remhash class *reinitialize-instance-initargs-cache*) - (%make-instances-obsolete class) - (setf (class-finalized-p class) nil) - ;; KLUDGE (rudi 2012-06-17) this calls add-direct-subclass again - (apply #'std-after-initialization-for-classes class all-keys) - (map-dependents class #'(lambda (dep) (update-dependent class dep all-keys)))) + (apply #'std-after-reinitialization-for-classes class all-keys)) (defmethod reinitialize-instance :after ((gf standard-generic-function) &rest all-keys) From mevenson at common-lisp.net Thu Dec 6 07:06:37 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Wed, 05 Dec 2012 23:06:37 -0800 Subject: [armedbear-cvs] r14294 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Wed Dec 5 23:06:36 2012 New Revision: 14294 Log: Backport r14293: Don't clobber class objects when re-initializing. - Also remove double-initialization via shared-initialize + one of intialize-instance / reinitialize-instance. - Fixes #277 - Reported by Pascal Costanza Modified: branches/1.1.x/src/org/armedbear/lisp/clos.lisp Modified: branches/1.1.x/src/org/armedbear/lisp/clos.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/clos.lisp Wed Dec 5 07:15:24 2012 (r14293) +++ branches/1.1.x/src/org/armedbear/lisp/clos.lisp Wed Dec 5 23:06:36 2012 (r14294) @@ -865,16 +865,18 @@ ; class canonicalized-slot) ; canonicalized-slot)) +(defun canonicalize-direct-superclass-list (class direct-superclasses) + (cond (direct-superclasses) + ((subtypep (class-of class) +the-funcallable-standard-class+) + (list +the-funcallable-standard-object-class+)) + ((subtypep (class-of class) +the-standard-class+) + (list +the-standard-object-class+)))) + (defun std-after-initialization-for-classes (class &key direct-superclasses direct-slots direct-default-initargs &allow-other-keys) - (let ((supers (cond (direct-superclasses) - ((subtypep (class-of class) - +the-funcallable-standard-class+) - (list +the-funcallable-standard-object-class+)) - ((subtypep (class-of class) +the-standard-class+) - (list +the-standard-object-class+))))) + (let ((supers (canonicalize-direct-superclass-list class direct-superclasses))) (setf (class-direct-superclasses class) supers) (dolist (superclass supers) (add-direct-subclass superclass class))) @@ -3781,24 +3783,6 @@ &rest initargs) (std-shared-initialize instance slot-names initargs)) -(defmethod shared-initialize :after ((instance standard-class) slot-names - &key direct-superclasses - direct-slots direct-default-initargs - &allow-other-keys) - (std-after-initialization-for-classes - instance :direct-superclasses direct-superclasses - :direct-slots direct-slots - :direct-default-initargs direct-default-initargs)) - -(defmethod shared-initialize :after ((instance funcallable-standard-class) - slot-names &key direct-superclasses - direct-slots direct-default-initargs - &allow-other-keys) - (std-after-initialization-for-classes - instance :direct-superclasses direct-superclasses - :direct-slots direct-slots - :direct-default-initargs direct-default-initargs)) - (defmethod shared-initialize ((slot slot-definition) slot-names &rest args &key name initargs initform initfunction @@ -3934,24 +3918,48 @@ (class-direct-superclasses class))) (add-direct-subclass superclass class))) -(defmethod reinitialize-instance :after ((class standard-class) &rest all-keys) +(defun std-after-reinitialization-for-classes (class + &rest all-keys + &key (direct-superclasses nil direct-superclasses-p) + (direct-slots nil direct-slots-p) + (direct-default-initargs nil direct-default-initargs-p) + &allow-other-keys) (remhash class *make-instance-initargs-cache*) (remhash class *reinitialize-instance-initargs-cache*) (%make-instances-obsolete class) (setf (class-finalized-p class) nil) - ;; KLUDGE (rudi 2012-06-17) this calls add-direct-subclass again - (apply #'std-after-initialization-for-classes class all-keys) + (when direct-superclasses-p + (let* ((old-supers (class-direct-superclasses class)) + (new-supers (canonicalize-direct-superclass-list + class direct-superclasses))) + (setf (class-direct-superclasses class) new-supers) + (dolist (old-superclass (set-difference old-supers new-supers)) + (remove-direct-subclass old-superclass class)) + (dolist (new-superclass (set-difference new-supers old-supers)) + (add-direct-subclass new-superclass class)))) + (when direct-slots-p + ;; FIXME: maybe remove old reader and writer methods? + (let ((slots (mapcar #'(lambda (slot-properties) + (apply #'make-direct-slot-definition class slot-properties)) + direct-slots))) + (setf (class-direct-slots class) slots) + (dolist (direct-slot slots) + (dolist (reader (slot-definition-readers direct-slot)) + (add-reader-method class reader direct-slot)) + (dolist (writer (slot-definition-writers direct-slot)) + (add-writer-method class writer direct-slot))))) + (when direct-default-initargs-p + (setf (class-direct-default-initargs class) direct-default-initargs)) + (maybe-finalize-class-subtree class) (map-dependents class #'(lambda (dep) (update-dependent class dep all-keys)))) +(defmethod reinitialize-instance :after ((class standard-class) + &rest all-keys) + (apply #'std-after-reinitialization-for-classes class all-keys)) + (defmethod reinitialize-instance :after ((class funcallable-standard-class) &rest all-keys) - (remhash class *make-instance-initargs-cache*) - (remhash class *reinitialize-instance-initargs-cache*) - (%make-instances-obsolete class) - (setf (class-finalized-p class) nil) - ;; KLUDGE (rudi 2012-06-17) this calls add-direct-subclass again - (apply #'std-after-initialization-for-classes class all-keys) - (map-dependents class #'(lambda (dep) (update-dependent class dep all-keys)))) + (apply #'std-after-reinitialization-for-classes class all-keys)) (defmethod reinitialize-instance :after ((gf standard-generic-function) &rest all-keys) From mevenson at common-lisp.net Thu Dec 6 07:11:39 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Wed, 05 Dec 2012 23:11:39 -0800 Subject: [armedbear-cvs] r14295 - branches/1.1.x/contrib/jfli Message-ID: Author: mevenson Date: Wed Dec 5 23:11:38 2012 New Revision: 14295 Log: jfli: use MOP::ENSURE-CLASS. Reported by Carlos Ungil. Modified: branches/1.1.x/contrib/jfli/jfli.lisp Modified: branches/1.1.x/contrib/jfli/jfli.lisp ============================================================================== --- branches/1.1.x/contrib/jfli/jfli.lisp Wed Dec 5 23:06:36 2012 (r14294) +++ branches/1.1.x/contrib/jfli/jfli.lisp Wed Dec 5 23:11:38 2012 (r14295) @@ -363,7 +363,7 @@ (unless (and class (subtypep class 'standard-object)) (setf class #+abcl - (sys::ensure-class class-sym :direct-superclasses (mapcar #'(lambda (c) (find-class (class-symbol c))) supers)))) + (mop::ensure-class class-sym :direct-superclasses (mapcar #'(lambda (c) (find-class (class-symbol c))) supers)))) (setf (get class-sym :ensured) t) class)))) From mevenson at common-lisp.net Thu Dec 6 09:24:17 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 01:24:17 -0800 Subject: [armedbear-cvs] r14296 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Thu Dec 6 01:23:15 2012 New Revision: 14296 Log: Constrain the logic for when CL:REQUIRE pushes symbols to CL:*MODULES*. A REQUIRE of ABCL-CONTRIB for an instance of the implementation that cannot locate the contrib binary artifact as being in the same directory as the location of the ABCL system jar by SYS:FIND-SYSTEM-JAR now raises an error. Fixes #275. Modified: trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp trunk/abcl/src/org/armedbear/lisp/require.lisp Modified: trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp Wed Dec 5 23:11:38 2012 (r14295) +++ trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp Thu Dec 6 01:23:15 2012 (r14296) @@ -2,10 +2,9 @@ (require :asdf) -;;; TODO possibly allow customization in system.lisp? (defun find-system-jar () + "Return the pathname of the system jar, one of `abcl.jar` or `abcl-m.n.p.jar` or `abcl-m.n.p-something.jar`." (flet ((match-system-jar (p) - "Match `abcl.jar` or `abcl-1.0.1.jar` or `abcl-1.0.1-something.jar`" (and (pathnamep p) (equal (pathname-type p) "jar") (java:jstatic "matches" @@ -27,7 +26,8 @@ Initialized via SYSTEM:FIND-CONTRIB") (defun find-contrib (&key (verbose nil)) -"Attempt to find the ABCL contrib jar and add its contents to ASDF." + "Attempt to find the ABCL contrib jar and add its contents to ASDF. +Returns the pathname of the contrib if it can be found." (unless *abcl-contrib* (unless *abcl-jar* (setf *abcl-jar* (find-system-jar))) @@ -50,7 +50,7 @@ (push asdf-directory asdf:*central-registry*) (format verbose "~&Added ~A to ASDF.~&" asdf-directory)))) *abcl-contrib*) - (format verbose "Failed to find abcl-contrib at '~A'." abcl-contrib)))))) + (error "Failed to find abcl-contrib at '~A'." abcl-contrib)))))) (when (find-contrib :verbose t) (provide :abcl-contrib)) Modified: trunk/abcl/src/org/armedbear/lisp/require.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/require.lisp Wed Dec 5 23:11:38 2012 (r14295) +++ trunk/abcl/src/org/armedbear/lisp/require.lisp Thu Dec 6 01:23:15 2012 (r14296) @@ -56,16 +56,23 @@ (defun require (module-name &optional pathnames) (unless (member (string module-name) *modules* :test #'string=) (let ((saved-modules (copy-list *modules*))) - (cond (pathnames - (unless (listp pathnames) (setf pathnames (list pathnames))) - (dolist (x pathnames) - (load x)) - (provide module-name)) - (t - (if (some (lambda (p) (funcall p module-name)) + (cond +;;; Since these are files packaged with the system we ensure that +;;; PROVIDE has been called unless the module has other dependencies +;;; that must be satisfied to be loaded, which is currently only the +;;; case with 'abcl-contrib'. + (pathnames + (unless (listp pathnames) (setf pathnames (list pathnames))) + (dolist (x pathnames) + (load x)) + (unless (string-equal module-name "abcl-contrib") + (provide module-name))) +;;; Responsibility for actually calling PROVIDE up to module provider +;;; function + (t + (unless (some (lambda (p) (funcall p module-name)) (append (list #'module-provide-system) - sys::*module-provider-functions*)) - (provide module-name) ;; Shouldn't hurt - (error "Don't know how to ~S ~A." 'require module-name)))) + sys::*module-provider-functions*)) + (error "Don't know how to ~S ~A." 'require module-name)))) (set-difference *modules* saved-modules)))) From mevenson at common-lisp.net Thu Dec 6 09:27:57 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 01:27:57 -0800 Subject: [armedbear-cvs] r14297 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Thu Dec 6 01:26:37 2012 New Revision: 14297 Log: Backport r14296. Constrain the logic for when CL:REQUIRE pushes symbols to CL:*MODULES*. A REQUIRE of ABCL-CONTRIB for an instance of the implementation that cannot locate the contrib binary artifact as being in the same directory as the location of the ABCL system jar by SYS:FIND-SYSTEM-JAR now raises an error. Fixes #275. Modified: branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp branches/1.1.x/src/org/armedbear/lisp/require.lisp Modified: branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp Thu Dec 6 01:23:15 2012 (r14296) +++ branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp Thu Dec 6 01:26:37 2012 (r14297) @@ -2,10 +2,9 @@ (require :asdf) -;;; TODO possibly allow customization in system.lisp? (defun find-system-jar () + "Return the pathname of the system jar, one of `abcl.jar` or `abcl-m.n.p.jar` or `abcl-m.n.p-something.jar`." (flet ((match-system-jar (p) - "Match `abcl.jar` or `abcl-1.0.1.jar` or `abcl-1.0.1-something.jar`" (and (pathnamep p) (equal (pathname-type p) "jar") (java:jstatic "matches" @@ -27,7 +26,8 @@ Initialized via SYSTEM:FIND-CONTRIB") (defun find-contrib (&key (verbose nil)) -"Attempt to find the ABCL contrib jar and add its contents to ASDF." + "Attempt to find the ABCL contrib jar and add its contents to ASDF. +Returns the pathname of the contrib if it can be found." (unless *abcl-contrib* (unless *abcl-jar* (setf *abcl-jar* (find-system-jar))) @@ -50,7 +50,7 @@ (push asdf-directory asdf:*central-registry*) (format verbose "~&Added ~A to ASDF.~&" asdf-directory)))) *abcl-contrib*) - (format verbose "Failed to find abcl-contrib at '~A'." abcl-contrib)))))) + (error "Failed to find abcl-contrib at '~A'." abcl-contrib)))))) (when (find-contrib :verbose t) (provide :abcl-contrib)) Modified: branches/1.1.x/src/org/armedbear/lisp/require.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/require.lisp Thu Dec 6 01:23:15 2012 (r14296) +++ branches/1.1.x/src/org/armedbear/lisp/require.lisp Thu Dec 6 01:26:37 2012 (r14297) @@ -56,16 +56,23 @@ (defun require (module-name &optional pathnames) (unless (member (string module-name) *modules* :test #'string=) (let ((saved-modules (copy-list *modules*))) - (cond (pathnames - (unless (listp pathnames) (setf pathnames (list pathnames))) - (dolist (x pathnames) - (load x)) - (provide module-name)) - (t - (if (some (lambda (p) (funcall p module-name)) + (cond +;;; Since these are files packaged with the system we ensure that +;;; PROVIDE has been called unless the module has other dependencies +;;; that must be satisfied to be loaded, which is currently only the +;;; case with 'abcl-contrib'. + (pathnames + (unless (listp pathnames) (setf pathnames (list pathnames))) + (dolist (x pathnames) + (load x)) + (unless (string-equal module-name "abcl-contrib") + (provide module-name))) +;;; Responsibility for actually calling PROVIDE up to module provider +;;; function + (t + (unless (some (lambda (p) (funcall p module-name)) (append (list #'module-provide-system) - sys::*module-provider-functions*)) - (provide module-name) ;; Shouldn't hurt - (error "Don't know how to ~S ~A." 'require module-name)))) + sys::*module-provider-functions*)) + (error "Don't know how to ~S ~A." 'require module-name)))) (set-difference *modules* saved-modules)))) From mevenson at common-lisp.net Thu Dec 6 09:31:57 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 01:31:57 -0800 Subject: [armedbear-cvs] r14298 - trunk/abcl/contrib/jfli Message-ID: Author: mevenson Date: Thu Dec 6 01:31:50 2012 New Revision: 14298 Log: Forward port r14295 | mevenson | 2012-12-06 08:11:38 +0100 (Thu, 06 Dec 2012) | 3 lines jfli: use MOP::ENSURE-CLASS. Modified: trunk/abcl/contrib/jfli/jfli.lisp Modified: trunk/abcl/contrib/jfli/jfli.lisp ============================================================================== --- trunk/abcl/contrib/jfli/jfli.lisp Thu Dec 6 01:26:37 2012 (r14297) +++ trunk/abcl/contrib/jfli/jfli.lisp Thu Dec 6 01:31:50 2012 (r14298) @@ -363,7 +363,7 @@ (unless (and class (subtypep class 'standard-object)) (setf class #+abcl - (sys::ensure-class class-sym :direct-superclasses (mapcar #'(lambda (c) (find-class (class-symbol c))) supers)))) + (mop::ensure-class class-sym :direct-superclasses (mapcar #'(lambda (c) (find-class (class-symbol c))) supers)))) (setf (get class-sym :ensured) t) class)))) From mevenson at common-lisp.net Thu Dec 6 09:47:26 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 01:47:26 -0800 Subject: [armedbear-cvs] r14299 - trunk/abcl Message-ID: Author: mevenson Date: Thu Dec 6 01:47:26 2012 New Revision: 14299 Log: build: Use parallel GC in abcl.properties template. Modified: trunk/abcl/abcl.properties.in Modified: trunk/abcl/abcl.properties.in ============================================================================== --- trunk/abcl/abcl.properties.in Thu Dec 6 01:31:50 2012 (r14298) +++ trunk/abcl/abcl.properties.in Thu Dec 6 01:47:26 2012 (r14299) @@ -16,7 +16,7 @@ ## java.options sets the Java options in the abcl wrapper scripts # Reasonable defaults for circa-2012, ORCL JVM implementations -java.options=-d64 -XX:+CMSClassUnloadingEnabled -XX:MaxPermSize=1g +java.options=-d64 -XX:+CMSClassUnloadingEnabled -XX:MaxPermSize=1g -XX:+UseConcMarkSweepGC # See # http://www.oracle.com/technetwork/java/javase/tech/vmoptions-jsp-140102.html From mevenson at common-lisp.net Thu Dec 6 10:24:43 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 02:24:43 -0800 Subject: [armedbear-cvs] r14300 - in branches/1.1.x: . doc/manual src/org/armedbear/lisp Message-ID: Author: mevenson Date: Thu Dec 6 02:24:43 2012 New Revision: 14300 Log: 1.1.x: now produces abcl-1.1.0-rc-3 artifacts. Modified: branches/1.1.x/abcl.rdf branches/1.1.x/doc/manual/abcl.tex branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Thu Dec 6 01:47:26 2012 (r14299) +++ branches/1.1.x/abcl.rdf Thu Dec 6 02:24:43 2012 (r14300) @@ -11,10 +11,13 @@ <> rdfs:seeAlso . @prefix dc: . -<> dc:modified "03-DEC-2012" . +<> dc:modified "06-DEC-2012" . <> dc:version "abcl-1.1.0" . -<> abcl:releaseCandidate "rc-2" . +<> abcl:releaseCandidate "rc-3" . + +<> rdfs:seeAlso . +<> rdfs:seeAlso . a doap:Project ; @@ -31,11 +34,13 @@ doap:license [ dc:license , ; - ] . + ] . doap:Project rdfs:seeAlso , , . - \ No newline at end of file +<> doap:packages + abcl:abcl-contrib ; + rdfs:seeAlso . Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Thu Dec 6 01:47:26 2012 (r14299) +++ branches/1.1.x/doc/manual/abcl.tex Thu Dec 6 02:24:43 2012 (r14300) @@ -10,7 +10,7 @@ \title{Armed Bear Common Lisp User Manual} \date{Version 1.1.0\\ \smallskip -December 3, 2012} +December 5, 2012} \author{Mark Evenson \and Erik H\"{u}lsmann \and Rudolf Schlatte \and Alessio Stalla \and Ville Voutilainen} Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Thu Dec 6 01:47:26 2012 (r14299) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Thu Dec 6 02:24:43 2012 (r14300) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0-rc-2"; + static final String baseVersion = "1.1.0-rc-3"; static void init() { try { From mevenson at common-lisp.net Thu Dec 6 20:17:25 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 12:17:25 -0800 Subject: [armedbear-cvs] r14301 - in branches/1.1.x: . contrib contrib/abcl-asdf contrib/asdf-install contrib/asdf-jar contrib/jfli contrib/jss contrib/mvn contrib/quicklisp Message-ID: Author: mevenson Date: Thu Dec 6 12:17:24 2012 New Revision: 14301 Log: doc: Start annotating all the places we need to change things with RDF. Do TODO: grovel through the source tree to find all textual lines containing probable RDF statements. Modified: branches/1.1.x/abcl.rdf branches/1.1.x/contrib/README.markdown branches/1.1.x/contrib/abcl-asdf/README.markdown branches/1.1.x/contrib/abcl-asdf/abcl-asdf.asd branches/1.1.x/contrib/asdf-install/asdf-install.asd branches/1.1.x/contrib/asdf-jar/README.markdown branches/1.1.x/contrib/asdf-jar/asdf-jar.asd branches/1.1.x/contrib/jfli/README branches/1.1.x/contrib/jfli/jfli.asd branches/1.1.x/contrib/jss/README.markdown branches/1.1.x/contrib/jss/jss.asd branches/1.1.x/contrib/mvn/jna.asd branches/1.1.x/contrib/quicklisp/quicklisp-abcl.asd Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/abcl.rdf Thu Dec 6 12:17:24 2012 (r14301) @@ -1,6 +1,10 @@ # -*- Mode: n3 -*- - at prefix abcl: . + at prefix abcl: . +<> + abcl:is "W3C Turtle RDF serializations format" ; + abcl:tag . + @prefix doap: . @prefix rdf: . @prefix rdfs: . @@ -11,30 +15,99 @@ <> rdfs:seeAlso . @prefix dc: . -<> dc:modified "06-DEC-2012" . - -<> dc:version "abcl-1.1.0" . -<> abcl:releaseCandidate "rc-3" . +<> + abcl:tag ; + dc:identifier ; + doap:language "Common Lisp" ; + dc:created "01-JAN-2004" ; + dc:modified "06-DEC-2012" ; + + dc:version "abcl-1.1.0" ; + abcl:releaseCandidate "rc-3" . + +<> + rdfs:seeAlso ; + rdfs:seeAlso . -<> rdfs:seeAlso . -<> rdfs:seeAlso . + at prefix dc: . - + a doap:Project ; doap:label "Armed Bear Common Lisp" ; doap:download ; - doap:shortname "ABCL" ; - doap:contributors """( ehu easye v-ille astalla rudi peter)""" . - + dc:abstract "An implementation of ANSI Common Lisp that runs on the JVM." ; + doap:shortname "ABCL" ; + abcl:contributors """ehu easye v-ille astalla rudi peter""" . + + + doap:language "Common Lisp" . + +<> [ + + a rdf:Bag; + rdf:_1 "Java"; + rdf:_2 "Ant"; + rdf:_3 "Bourne Shell Script"; + rdf:_4"Windows Batch Script" +] . + + + + dc:contributor [ + a rdf:Alt; + rdf:_1 _:ehu ; + rdf:_2 _:easye ; + rdf:_3 _:ville ; + rdf:_4 _:astala ; + rdf:_5 _:rudi +] . + + doap:language "Common Lisp", "Java", "Ant", "Bourne Shell Script", "Windows Batch Script" . - - doap:license [ - dc:license , - ; - ] . +_:user dc:identifier ; + rdf:label "V-ille" . + + + rdfs:seeAlso . + +<> doap:license [ + dc:license ; + dc:license ; + + rdfs:seeAlso ; + dc:licenseDocument ; + dc:licenseDocument ; +] . + +doap:Project rdfs:seeAlso [ + a rdf:Bag; + rdf:_1 ; + rdf:_2 ; + rdf:_3 ; + dc:source abcl:tag ; + dc:Software [ + a rdf:Bag; + rdf:_1 ; + rdf:_2 + ] ; +] . + +<> abcl:provides ; + rdfs:seeAlso . + +<> dc:Standard ; + rdfs:seeAlso [ + a rdf:Bag ; + rdf:_1 ; + rdf:_2 "ANSI+INCITS+226-1994+(R2004).pdf" + ] ; + dc:abstract + "ANSI INCITS 226-1994 (R2004) American National Standard for Programming Language Common LISP (X3J13)" . + +<> rdfs:seeAlso . doap:Project rdfs:seeAlso , Modified: branches/1.1.x/contrib/README.markdown ============================================================================== --- branches/1.1.x/contrib/README.markdown Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/README.markdown Thu Dec 6 12:17:24 2012 (r14301) @@ -14,37 +14,49 @@ asdf-jar - Package ASDF system definitions into JVM artifacts for distribution + Package ASDF system definitions into JVM artifacts for + distribution jss A higher-order, more Lisp oriented interface for constructing Lisp interfaces to existing binary code libraries available for the JVM - built on the primitives provided by the JAVA package. + built on the primitives provided by the JAVA package. Used in the + [lsw2][] Semantic Web package for dealing with OWL2 ontologies in + RDF(S) and other notations. + +[lsw2]: http://code.google.com/p/lsw2/ jfli - The "original" higher-order JVM interop descended from Rich + The "original" higher-order JVM interface descended from Rich Hickey's work on the JVM before Clojure. This implementation currently uses a fork of the public [JFLI][] API that uses the java interop of the ABCL JAVA package instead of the JNI - interface. + interface. [jfli]: http://sourceforge.net/projects/jfli/ + +quicklisp-abcl + + Stub for loading Quicklisp from main repository if not locally + present. Must currently be invoked with the force option: + CL-USER> (asdf:load-system :quicklisp-abcl :force t) mvn ---- - -A collection of various useful JVM artifacts downloaded and cached by -the Aether Maven connector. Requires the maven-3.0.3 executable "mvn" -(or "mvn.bat" under MSFT Windows) to be in the current processes's path. - -jna - Cache, from the network if necessary, the jna-3.4.0.jar in - the current JVM process, allowing the bootstrapping of - dynamically linking to shared executables on the host platform. + A collection of various useful JVM artifacts downloaded and cached by + the Aether Maven connector. Requires the maven-3.0.3 executable "mvn" + (or "mvn.bat" under MSFT Windows) to be in the current processes's + path. + + mvn currently includes only the single artifact: + + jna + Cache, from the network if necessary, the jna-3.4.0.jar in + the current JVM process, allowing the bootstrapping of + dynamically linking to shared executables on the host platform. Deprecated @@ -56,7 +68,7 @@ Deprecated, use Quicklisp from the REPL via - CL-USER> (load "https://beta.quicklisp.org/quicklisp.lisp") + CL-USER> (load "http://beta.quicklisp.org/quicklisp.lisp") instead. @@ -64,7 +76,8 @@ Mark Created: 2011-09-11 -Revised: 2012-11-28 +Revised: 2012-12-06 +<> abcl:documents . Modified: branches/1.1.x/contrib/abcl-asdf/README.markdown ============================================================================== --- branches/1.1.x/contrib/abcl-asdf/README.markdown Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/abcl-asdf/README.markdown Thu Dec 6 12:17:24 2012 (r14301) @@ -3,9 +3,9 @@ To use: - CL-USER> (require 'abcl-contrib) + CL-USER> (require :abcl-contrib) - CL-USER> (require 'abcl-asdf) + CL-USER> (require :abcl-asdf) ABCL specific contributions to ASDF system definition mainly concerned @@ -42,16 +42,16 @@ We define an API within the ASDF package consisting of the following ASDF classes derived from ASDF:COMPONENT: -JAR-DIRECTORY, JAR-FILE, and CLASS-FILE-DIRECTORY for JVM artifacts -that have a currently valid pathname representation (i.e. they exist -on the local filesystem). - -The MVN and IRI classes descend from ASDF-COMPONENT, but do not -directly have a filesystem location. - -The IRI component is currently unused, but serves as a point to base -the inheritance of the MVN component while allowing other forms of -uri-like resources to be encapsulated in the future. + JAR-DIRECTORY, JAR-FILE, and CLASS-FILE-DIRECTORY for JVM artifacts + that have a currently valid pathname representation (i.e. they exist + on the local filesystem). + + The MVN and IRI classes descend from ASDF-COMPONENT, but do not + directly have a filesystem location. + + The IRI component is currently unused, but serves as a point to base + the inheritance of the MVN component while allowing other forms of + uri-like resources to be encapsulated in the future. The MVN component should specifiy a [Maven URI][1] as its PATH. A Maven URI has the form "GROUP-ID/ARTIFACT-ID/VERSION" which specifies @@ -164,5 +164,5 @@ Mark Created: 2011-01-01 - Revised: 2012-11-28 + Revised: 2012-12-06 Modified: branches/1.1.x/contrib/abcl-asdf/abcl-asdf.asd ============================================================================== --- branches/1.1.x/contrib/abcl-asdf/abcl-asdf.asd Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/abcl-asdf/abcl-asdf.asd Thu Dec 6 12:17:24 2012 (r14301) @@ -2,7 +2,8 @@ (asdf:defsystem :abcl-asdf :author "Mark Evenson" - :version "1.0.0" + :version "1.1.0" + :description "<> asdf:defsystem " :depends-on (jss) :components ((:module packages :pathname "" Modified: branches/1.1.x/contrib/asdf-install/asdf-install.asd ============================================================================== --- branches/1.1.x/contrib/asdf-install/asdf-install.asd Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/asdf-install/asdf-install.asd Thu Dec 6 12:17:24 2012 (r14301) @@ -13,6 +13,7 @@ #+:sbcl :depends-on #+:sbcl (sb-bsd-sockets) :version "0.6.10.2" + :description "<> asdf:defsystem " :author "Dan Barlow , Edi Weitz and many others. See the file COPYRIGHT for more details." :maintainer "Gary Warren King " :components ((:file "defpackage") Modified: branches/1.1.x/contrib/asdf-jar/README.markdown ============================================================================== --- branches/1.1.x/contrib/asdf-jar/README.markdown Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/asdf-jar/README.markdown Thu Dec 6 12:17:24 2012 (r14301) @@ -1,10 +1,6 @@ ASDF-JAR ======== - Mark Evenson - Created: 20-JUN-2011 - Modified: 20-JUN-2011 - ASDF-JAR provides a system for packaging ASDF systems into jar archives for ABCL. Given a running ABCL image with loadable ASDF systems the code in this package will recursively package all the @@ -57,3 +53,10 @@ Setting CL:*LOAD-VERBOSE* will allow one to verify that the subsequent load is indeed coming from the jar. + +# Colophon + +Mark Evenson +Created: 20-JUN-2011 +Modified: 20-JUN-2011 +<> abcl:documents . Modified: branches/1.1.x/contrib/asdf-jar/asdf-jar.asd ============================================================================== --- branches/1.1.x/contrib/asdf-jar/asdf-jar.asd Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/asdf-jar/asdf-jar.asd Thu Dec 6 12:17:24 2012 (r14301) @@ -4,6 +4,7 @@ (defsystem :asdf-jar :author "Mark Evenson" :version "0.2.1" + :description "<> asdf:defsystem :components ((:module base :pathname "" :components ((:file "asdf-jar") Modified: branches/1.1.x/contrib/jfli/README ============================================================================== --- branches/1.1.x/contrib/jfli/README Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/jfli/README Thu Dec 6 12:17:24 2012 (r14301) @@ -34,3 +34,6 @@ Please send (ABCL-specific) bug reports, suggestions, examples, and whatever else you can think of, to asimon at math.bme.hu. +# Colophon + +<> abcl:documents . Modified: branches/1.1.x/contrib/jfli/jfli.asd ============================================================================== --- branches/1.1.x/contrib/jfli/jfli.asd Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/jfli/jfli.asd Thu Dec 6 12:17:24 2012 (r14301) @@ -4,9 +4,9 @@ :version "0.2.0" :components ((:file "jfli"))) - -;;; Requires integration with +;;; Requires integration with IntelliJ IDEA editor (free download) (asdf:defsystem jfli-intellij-tests :version "0.1.0" + :description "<> asdf:defsystem ." :components ((:module test :components ((:file "yanking"))))) Modified: branches/1.1.x/contrib/jss/README.markdown ============================================================================== --- branches/1.1.x/contrib/jss/README.markdown Thu Dec 6 02:24:43 2012 (r14300) +++ branches/1.1.x/contrib/jss/README.markdown Thu Dec 6 12:17:24 2012 (r14301) @@ -133,5 +133,7 @@ <> dc:created "2005" ; dc:author "Mark "; - revised: "29-JAN-2012" . + dc:revised "06-DEC-2012" ; + <> abcl:documents asdf:defsystem asdf:defsystem " :version "0.2.0" - :description "Convenience stubs to load locally installed Quicklisp." -;; #+nil::defsystem-depends-on (abcl-asdf) :components nil) + ;; #+nil::needs-abcl-asdf((:iri "http://beta.quicklisp.org/quicklisp.lisp")) ;; #+nil::in-order-to ((asdf:compile-op (ql::install))) ;;; FIXME tickle the internal Quicklisp setup From mevenson at common-lisp.net Thu Dec 6 20:17:36 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 12:17:36 -0800 Subject: [armedbear-cvs] r14302 - branches/1.1.x/doc/manual Message-ID: Author: mevenson Date: Thu Dec 6 12:17:35 2012 New Revision: 14302 Log: doc: abcl-1.1.0-rc-3 version of the manual. Modified: branches/1.1.x/doc/manual/abcl.tex Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Thu Dec 6 12:17:24 2012 (r14301) +++ branches/1.1.x/doc/manual/abcl.tex Thu Dec 6 12:17:35 2012 (r14302) @@ -825,7 +825,7 @@ ``understands''. By definition, support is built-in into the JVM to access the ``http'' and ``https'' schemes but additional protocol handlers may be installed at runtime by having \textsc{JVM} symbols -present in the sun.net.protocol.dynamic pacakge. See \cite{maso2000} +present in the sun.net.protocol.dynamic package. See \cite{maso2000} for more details. \textsc{ABCL} has created specializations of the ANSI @@ -868,7 +868,7 @@ underlying \textsc{URI} are discarded between resolutions (i.e. the implementation does not attempt to cache the results of current name resolution of the representing resource unless it is requested to be - resolved.) Upon resolution, any cannoicalization procedures + resolved.) Upon resolution, any canoicalization procedures followed in resolving the resource (e.g. following redirects) are discarded. Users may programatically initiate a new, local computation by applying the \code{CL:TRUENAME} function to a @@ -882,7 +882,7 @@ The implementation of \code{EXT:URL-PATHNAME} allows the \textsc{ABCL} user to dynamically load code from the network. For example, -Quicklisp (\cite{quicklisp}) may be completely installed from the REPL +Quicklisp (\cite{quicklisp}) may be completely installed from the \textsc{REPL} as the single form: \begin{listing-lisp} @@ -892,7 +892,7 @@ will load and execute the Quicklisp setup code. The implementation currently breaks \textsc{ANSI} conformance by allowing the -types able to be READ for the DEVICE to return a possible \code{CONS} of +types able to be \code{CL:READ} for the \var{DEVICE} to return a possible \code{CONS} of \code{CL:PATHNAME} objects. %% citation from CLHS needed. In order to ``smooth over'' the bit about types being \code{CL:READ} from @@ -1038,8 +1038,8 @@ bit characters to the Lisp reader\footnote{This represents a compromise with contemporary in 2011 32bit hosting architecures for which we wish to make text processing efficient. Should the User - require more control over UNICODE processing we recommend Edi Weisz' - excellent work with FLEXI-STREAMS which we fully support}, namely we + require more control over \textsc{UNICODE} processing we recommend Edi Weisz' + excellent work with \textsc|{FLEXI-STREAMS} which we fully support}, namely we allow a sequences of the form \verb~#\U~\emph{\texttt{xxxx}} to be processed by the reader as character whose code is specified by the hexadecimal digits \emph{\texttt{xxxx}}. The hexadecimal sequence may be one to four digits @@ -1098,8 +1098,9 @@ \section{JSS optionally extends the Reader} The JSS contrib consitutes an additional, optional extension to the -reader in the definition of the \#\" reader macro. See section -\ref{section:jss} on page \pageref{section:jss} for more information. +reader in the definition of the \code{SHARPSIGN-DOUBLE-QUOTE} +(``\#\"'') reader macro. See section \ref{section:jss} on page +\pageref{section:jss} for more information. \section{ASDF} @@ -1309,8 +1310,8 @@ \chapter{The JSS Dictionary} These public interfaces are provided by the JSS contrib. -\include{jss} +\include{jss} \bibliography{abcl} From mevenson at common-lisp.net Thu Dec 6 21:01:45 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 13:01:45 -0800 Subject: [armedbear-cvs] r14303 - branches/1.1.x Message-ID: Author: mevenson Date: Thu Dec 6 13:01:44 2012 New Revision: 14303 Log: doc: Remove reference to abcl-1.1.0-dev in README. Modified: branches/1.1.x/README branches/1.1.x/abcl.rdf Modified: branches/1.1.x/README ============================================================================== --- branches/1.1.x/README Thu Dec 6 12:17:35 2012 (r14302) +++ branches/1.1.x/README Thu Dec 6 13:01:44 2012 (r14303) @@ -186,7 +186,7 @@ ### Tests -ABCL 1.1.0-dev now fails only 1[4-6] out of 21708 total tests in the ANSI CL +ABCL 1.1.0 now fails only 1[4-6] out of 21708 total tests in the ANSI CL test suite (derived from the tests originally written for GCL). Maxima's test suite runs without failures. Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Thu Dec 6 12:17:35 2012 (r14302) +++ branches/1.1.x/abcl.rdf Thu Dec 6 13:01:44 2012 (r14303) @@ -22,12 +22,23 @@ dc:created "01-JAN-2004" ; dc:modified "06-DEC-2012" ; +<<<<<<< local +<> dc:version "abcl-1.1.0" . +<> a abcl:releaseCandidate "rc-3" . +======= dc:version "abcl-1.1.0" ; abcl:releaseCandidate "rc-3" . +>>>>>>> other +<<<<<<< local +<> rdfs:seeAlso . +<> rdfs:seeAlso . +<> rdfs:seeAlso . +======= <> rdfs:seeAlso ; rdfs:seeAlso . +>>>>>>> other @prefix dc: . From mevenson at common-lisp.net Thu Dec 6 21:17:24 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 13:17:24 -0800 Subject: [armedbear-cvs] r14304 - in trunk/abcl: . doc/manual Message-ID: Author: mevenson Date: Thu Dec 6 13:17:23 2012 New Revision: 14304 Log: doc: bring trunk to status of RC2 minus abcl-1.1.0 specific text. Added: trunk/abcl/doc/manual/jss.tex trunk/abcl/doc/manual/mop.tex trunk/abcl/doc/manual/system.tex Modified: trunk/abcl/README trunk/abcl/abcl.rdf trunk/abcl/doc/manual/Makefile trunk/abcl/doc/manual/abcl.bib trunk/abcl/doc/manual/abcl.tex Modified: trunk/abcl/README ============================================================================== --- trunk/abcl/README Thu Dec 6 13:01:44 2012 (r14303) +++ trunk/abcl/README Thu Dec 6 13:17:23 2012 (r14304) @@ -50,7 +50,7 @@ which should result in output like the following - Armed Bear Common Lisp 1.1.0-dev + Armed Bear Common Lisp 1.2.0 Java 1.6.0_21 Sun Microsystems Inc. Java HotSpot(TM) Client VM Low-level initialization completed in 0.3 seconds. @@ -186,7 +186,7 @@ ### Tests -ABCL 1.2.0-dev now fails only 1[2-4] out of 21708 total tests in the ANSI CL +ABCL 1.2.0 now fails only 1[4-6] out of 21708 total tests in the ANSI CL test suite (derived from the tests originally written for GCL). Maxima's test suite runs without failures. Modified: trunk/abcl/abcl.rdf ============================================================================== --- trunk/abcl/abcl.rdf Thu Dec 6 13:01:44 2012 (r14303) +++ trunk/abcl/abcl.rdf Thu Dec 6 13:17:23 2012 (r14304) @@ -1,6 +1,10 @@ # -*- Mode: n3 -*- - at prefix abcl: . + at prefix abcl: . +<> + abcl:is "W3C Turtle RDF serializations format" ; + abcl:tag . + @prefix doap: . @prefix rdf: . @prefix rdfs: . @@ -11,30 +15,106 @@ <> rdfs:seeAlso . @prefix dc: . -<> dc:modified "01-DEC-2012" . +<> + abcl:tag ; + dc:identifier ; + doap:language "Common Lisp" ; + dc:created "01-JAN-2004" ; + dc:modified "06-DEC-2012" ; + +<> dc:version "abcl-1.2.0" . +<> a abcl:release "dev" . + +<> + rdfs:seeAlso ; + rdfs:seeAlso ; + rdfs:seeAlso . -<> dc:version "abcl-1.2-dev" . + at prefix dc: . - + a doap:Project ; doap:label "Armed Bear Common Lisp" ; doap:download ; - doap:shortname "ABCL" ; - doap:contributors """( ehu easye v-ille astalla rudi peter)""" . - + dc:abstract "An implementation of ANSI Common Lisp that runs on the JVM." ; + doap:shortname "ABCL" ; + abcl:contributors """ehu easye v-ille astalla rudi peter""" . + + + doap:language "Common Lisp" . + +<> [ + + a rdf:Bag; + rdf:_1 "Java"; + rdf:_2 "Ant"; + rdf:_3 "Bourne Shell Script"; + rdf:_4"Windows Batch Script" +] . + + + + dc:contributor [ + a rdf:Alt; + rdf:_1 _:ehu ; + rdf:_2 _:easye ; + rdf:_3 _:ville ; + rdf:_4 _:astala ; + rdf:_5 _:rudi +] . + + doap:language "Common Lisp", "Java", "Ant", "Bourne Shell Script", "Windows Batch Script" . - - doap:license [ - dc:license , - ; - ] . +_:user dc:identifier ; + rdf:label "V-ille" . + + + rdfs:seeAlso . + +<> doap:license [ + dc:license ; + dc:license ; + + rdfs:seeAlso ; + dc:licenseDocument ; + dc:licenseDocument ; +] . + +doap:Project rdfs:seeAlso [ + a rdf:Bag; + rdf:_1 ; + rdf:_2 ; + rdf:_3 ; + dc:source abcl:tag ; + dc:Software [ + a rdf:Bag; + rdf:_1 ; + rdf:_2 + ] ; +] . + +<> abcl:provides ; + rdfs:seeAlso . + +<> dc:Standard ; + rdfs:seeAlso [ + a rdf:Bag ; + rdf:_1 ; + rdf:_2 "ANSI+INCITS+226-1994+(R2004).pdf" + ] ; + dc:abstract + "ANSI INCITS 226-1994 (R2004) American National Standard for Programming Language Common LISP (X3J13)" . + +<> rdfs:seeAlso . doap:Project rdfs:seeAlso , , . - \ No newline at end of file +<> doap:packages + abcl:abcl-contrib ; + rdfs:seeAlso . Modified: trunk/abcl/doc/manual/Makefile ============================================================================== --- trunk/abcl/doc/manual/Makefile Thu Dec 6 13:01:44 2012 (r14303) +++ trunk/abcl/doc/manual/Makefile Thu Dec 6 13:17:23 2012 (r14304) @@ -8,8 +8,18 @@ pdflatex abcl.tex pdflatex abcl.tex +#ABCL = abcl +ABCL = ../../abcl +#ABCL = /Users/evenson/work/abcl-1.1.x/abcl + +# XXX TODO 1) use more compact iterated form, 2) pare down to using --noinit grovel: - abcl --batch --noinform --load "grovel.lisp" --eval '(progn (grovel-docstrings-as-tex (find-package :java)) (grovel-docstrings-as-tex (find-package :extensions)) (grovel-docstrings-as-tex (find-package :threads)))' + $(ABCL) --batch --noinform --load "grovel.lisp" \ + --eval '(grovel-docstrings-as-tex (find-package :java)' \ + --eval '(grovel-docstrings-as-tex (find-package :extensions))' \ + --eval '(grovel-docstrings-as-tex (find-package :threads))' \ + --eval '(grovel-docstrings-as-tex (find-package :system))' \ + --eval '(progn (require :abcl-contrib) (require :jss) (grovel-docstrings-as-tex (find-package :jss)))' clean: rm -f *.aux *.bbl *.blg *.idx *.ilg *.ind *.log *.out *.toc abcl.pdf Modified: trunk/abcl/doc/manual/abcl.bib ============================================================================== --- trunk/abcl/doc/manual/abcl.bib Thu Dec 6 13:01:44 2012 (r14303) +++ trunk/abcl/doc/manual/abcl.bib Thu Dec 6 13:17:23 2012 (r14304) @@ -4,7 +4,7 @@ howpublished = {\url{http://java.sun.com/developer/onlineTraining/protocolhandlers/}}, month = aug, year = 2000, - note = {Last accessed Jan 25, 2012}} + note = {Last accessed Jan 25, 2012}} % no longer resolving 2012-12-04 @Misc{quicklisp, author = {Beane, Zach}, Modified: trunk/abcl/doc/manual/abcl.tex ============================================================================== --- trunk/abcl/doc/manual/abcl.tex Thu Dec 6 13:01:44 2012 (r14303) +++ trunk/abcl/doc/manual/abcl.tex Thu Dec 6 13:17:23 2012 (r14304) @@ -8,10 +8,9 @@ \begin{document} \title{Armed Bear Common Lisp User Manual} -\date{Version 1.2\\ -DRAFT +\date{Version 1.1.0\\ \smallskip -December 01, 2012} +December 5, 2012} \author{Mark Evenson \and Erik H\"{u}lsmann \and Rudolf Schlatte \and Alessio Stalla \and Ville Voutilainen} @@ -19,14 +18,18 @@ \tableofcontents -%%\chapter{Preface} %%Preface to the second edition, abcl-1.1.0. +\subsection{Preface to the Second Edition} + +ABCL 1.1 now contains (A)MOP. We hope you enjoy! --The Mgmt. + \chapter{Introduction} Armed Bear Common Lisp (ABCL) is an implementation of Common Lisp that -runs on the Java Virtual Machine. It compiles to Java bytecode and -integrates with Java code and libraries in a seamless way: +runs on the Java Virtual Machine. It compiles Common Lisp to Java 5 +bytecode, providing the following integration methods for interfacing +with Java code and libraries: \begin{itemize} \item Lisp code can create Java objects and call their methods (see Section~\ref{sec:lisp-java}, page~\pageref{sec:lisp-java}). @@ -63,7 +66,7 @@ rather arcane sounding deviation from conformance is so that the result of a merge won't fill in a DEVICE with the wrong "default device for the host" in the sense of the fourth paragraph in the - [CLHS description of MERGE-PATHNAMES][2] (the paragraph beginning + CLHS description of MERGE-PATHNAMES (see in \cite{CLHS} the paragraph beginning "If the PATHNAME explicitly specifies a host and not a device?"). A future version of the implementation may return to conformance by using the \code{HOST} value to reflect the type explicitly. @@ -93,8 +96,6 @@ allowed by \textsc{ANSI}}, the inability to inspect local variables in a given call frame, and the inability to resume a halted computation at an arbitrarily selected call frame. -\item An incomplete implementation of a proper metaobject protocol - (c.f. the (A)MOP specification~\cite{AMOP, AMOPspec}) \item Incomplete streams abstraction, in that \textsc{ABCL} needs suitable abstraction between ANSI and Gray streams. The streams could be optimized to the JVM NIO abstractions at great profit for binary @@ -135,7 +136,7 @@ \texttt{abcl.jar} or possibly something like \texttt{abcl-1.1.0.jar} if using a versioned package on the local filesystem from your system vendor. This jar file can be executed from the command line to obtain a -REPL\footnote{Read-Eval Print Loop, a Lisp commandline}, viz: +REPL\footnote{Read-Eval Print Loop, a Lisp command-line}, viz: \begin{listing-shell} cmd$ java -jar abcl.jar @@ -163,15 +164,15 @@ ABCL supports the following command line options: \begin{description} -\item[\texttt{--help}] displays a help message. -\item[\texttt{--noinform}] Suppresses the printing of startup information and banner. -\item[\texttt{--noinit}] suppresses the loading of the \verb+~/.abclrc+ startup file. -\item[\texttt{--nosystem}] suppresses loading the \texttt{system.lisp} customization file. -\item[\texttt{--eval FORM}] evaluates FORM before initializing the REPL. -\item[\texttt{--load FILE}] loads the file FILE before initializing the REPL. -\item[\texttt{--load-system-file FILE}] loads the system file FILE before initializing the REPL. -\item[\texttt{--batch}] evaluates forms specified by arguments and in - the intialization file \verb+~/.abclrc+, and then exits without +\item[\texttt{ --help}] displays a help message. +\item[\texttt{ --noinform}] Suppresses the printing of startup information and banner. +\item[\texttt{ --noinit}] suppresses the loading of the \verb+~/.abclrc+ startup file. +\item[\texttt{ --nosystem}] suppresses loading the \texttt{system.lisp} customization file. +\item[\texttt{ --eval FORM}] evaluates FORM before initializing the REPL. +\item[\texttt{ --load FILE}] loads the file FILE before initializing the REPL. +\item[\texttt{ --load-system-file FILE}] loads the system file FILE before initializing the REPL. +\item[\texttt{ --batch}] evaluates forms specified by arguments and in + the initialization file \verb+~/.abclrc+, and then exits without starting a REPL. \end{description} @@ -212,17 +213,19 @@ of Java objects, manipulation of instance and static fields on Java objects, and construction of new Java objects. -When calling Java routines, some values will automatically be converted -by the FFI\footnote{Foreign Function Interface, the term for the part of - a Lisp implementation that implements calling code written in other - languages.} from Lisp values to Java values. These conversions -typically apply to strings, integers and floats. Other values need to be -converted to their Java equivalents by the programmer before calling the -Java object method. Java values returned to Lisp are also generally -converted back to their Lisp counterparts. Some operators make an -exception to this rule and do not perform any conversion; those are the -``raw'' counterparts of certain FFI functions and are recognizable by -their name ending with \code{-RAW}. +When calling Java routines, some values will automatically be +converted by the FFI\footnote{Foreign Function Interface, is the term + of art for the part of a Lisp implementation which implements + calling code written in other languages, typically normalized to the + local C compiler calling conventions.} from Lisp values to Java +values. These conversions typically apply to strings, integers and +floats. Other values need to be converted to their Java equivalents by +the programmer before calling the Java object method. Java values +returned to Lisp are also generally converted back to their Lisp +counterparts. Some operators make an exception to this rule and do not +perform any conversion; those are the ``raw'' counterparts of certain +FFI functions and are recognizable by their name ending with +\code{-RAW}. \subsection{Low-level Java API} @@ -737,6 +740,11 @@ programmer to pass an interface-implementation object which will in turn be passed to the \code{jmake-proxy} generic function. +\subsection{Implementation of Java classes in Lisp} + +See \code{JAVA:JNEW-RUNTIME-CLASS} on \ref{JAVA:JNEW-RUNTIME-CLASS}. + + \chapter{Implementation Dependent Extensions} As outlined by the CLHS ANSI conformance guidelines, we document the @@ -760,6 +768,10 @@ (the value of the special variable \code{JAVA:*CLASSLOADER*}. It has no effect on Java code outside ABCL. +\subsection{Creating a synthetic Java Class at Runtime} + +See \code{JAVA:JNEW-RUNTIME-CLASS} on \ref{JAVA:JNEW-RUNTIME-CLASS}. + % include autogen docs for the JAVA package. \include{java} @@ -803,32 +815,36 @@ \section{Pathname} -We implement an extension to the Pathname that allows for the -description and retrieval of resources named in a +We implement an extension to the \code{CL:PATHNAME} that allows for +the description and retrieval of resources named in a \textsc{URI} \footnote{A \textsc{URI} is essentially a superset of - what is commonly understood as a \textsc{URL} We sometimesuse the + what is commonly understood as a \textsc{URL} We sometime suse the term URL as shorthand in describing the URL Pathnames, even though the corresponding encoding is more akin to a URI as described in RFC3986 \cite{rfc3986}.} scheme that the \textsc{JVM} -``understands''. Support is built-in to comprehend the ``http'' and -``https'' implementations but additional protocol handlers may be -installed at runtime by having \textsc{JVM} symbols present in the -sun.net.protocol.dynamic pacakge. See \cite{maso2000} for more -details. - -\textsc{ABCL} has created specializations of the ANSI Pathname object to -enable to use of \textsc{URI}s to address dynamically loaded resources for the -JVM. A \code{URL-PATHNAME} has a corresponding \textsc{URI} whose canonical -representation is defined to be the \code{NAMESTRING} of the Pathname. +``understands''. By definition, support is built-in into the JVM to +access the ``http'' and ``https'' schemes but additional protocol +handlers may be installed at runtime by having \textsc{JVM} symbols +present in the sun.net.protocol.dynamic package. See \cite{maso2000} +for more details. + +\textsc{ABCL} has created specializations of the ANSI +\code{CL:PATHNAME} object to enable to use of \textsc{URI}s to address +dynamically loaded resources for the JVM. The \code{EXT:URL-PATHNAME} +specialization. has a corresponding \textsc{URI} whose canonical +representation is defined to be the \code{NAMESTRING} of the +Pathname. The \code{EXT:JAR-PATHNAME} extension further specializes +the the \code{EXT:URL-PATHNAME} to provide access to components of zip +archives. -% -\begin{verbatim} - -# RDF description of type hierarchy +% RDF description of type hierarchy % TODO Render via some LaTeX mode for graphviz? - - a . - a . +\begin{verbatim} + @prefix ext: . + @prefix cl: . + + a . + a . a . \end{verbatim} @@ -838,8 +854,9 @@ \label{EXTENSIONS:JAR-PATHNAME} \index{JAR-PATHNAME} -Both \code{EXT:URL-PATHNAME} and \code{EXT:JAR-PATHNAME} may be used anywhere -a \code{CL:PATHNAME} is accepted with the following caveats: +Both the \code{EXT:URL-PATHNAME} and \code{EXT:JAR-PATHNAME} objects +may be used anywhere a \code{CL:PATHNAME} is accepted with the +following caveats: \begin{itemize} @@ -847,24 +864,25 @@ cannot be the target of write operations. \index{URI} -\item No canonicalization is performed on the underlying \textsc{URI} - (i.e. the implementation does not attempt to compute the current - name of the representing resource unless it is requested to be - resolved.) Upon resolution, any cannoicalization procedures +\item Any results of canonicalization procesures performed on the + underlying \textsc{URI} are discarded between resolutions (i.e. the + implementation does not attempt to cache the results of current name + resolution of the representing resource unless it is requested to be + resolved.) Upon resolution, any canoicalization procedures followed in resolving the resource (e.g. following redirects) are discarded. Users may programatically initiate a new, local computation by applying the \code{CL:TRUENAME} function to a \code{EXT:URL-PATHNAME} object. Depending on the reliablity and properties of your local \textsc{REST} infrastructure, these results may not necessarily be idempotent over time\footnote {See - \cite{evenson2011} for the draft of the publication of the technical - details}. + \cite{evenson2011} for the draft of the publication of the + technical details}. \end{itemize} The implementation of \code{EXT:URL-PATHNAME} allows the \textsc{ABCL} user to dynamically load code from the network. For example, -Quicklisp (\cite{quicklisp}) may be completely installed from the REPL +Quicklisp (\cite{quicklisp}) may be completely installed from the \textsc{REPL} as the single form: \begin{listing-lisp} @@ -873,32 +891,36 @@ will load and execute the Quicklisp setup code. -The implementation currently breaks ANSI conformance by allowing the -types able to be READ for the DEVICE to return a possible CONS of -PATHNAME objects. %% citation from CLHS needed. - -In order to ``smooth over'' the bit about types being READ from -PATHNAME components, we extend the semantics for the usual PATHNAME -merge semantics when *DEFAULT-PATHNAME-DEFAULTS* contains a -\code{JAR-PATHNAME}. +The implementation currently breaks \textsc{ANSI} conformance by allowing the +types able to be \code{CL:READ} for the \var{DEVICE} to return a possible \code{CONS} of +\code{CL:PATHNAME} objects. %% citation from CLHS needed. + +In order to ``smooth over'' the bit about types being \code{CL:READ} from +\code{CL:PATHNAME} components, we extend the semantics for the usual PATHNAME +merge semantics when \code{*DEFAULT-PATHNAME-DEFAULTS*} contains a +\code{EXT:JAR-PATHNAME}. %See \ref{_:quicklisp} on page \pageref{_:quicklisp}. \subsubsection{Implementation} The implementation of these extensions stores all the additional -information in the PATHNAME object itself in ways that while strictly +information in the \code{CL:PATHNAME} object itself in ways that while strictly speaking are conformant, nonetheless may trip up libraries that don't expect the following: \begin{itemize} \item \code{DEVICE} can be either a string denoting a drive letter - under DOS or a list of exactly one or two elements. If - \code{DEVICE} is a list, it denotes a \code{JAR-PATHNAME}, with the entries - containing \code{PATHNAME} objects which describe the outer and (possibley) - locations of the jar archive. + under \textsc{DOS} or a list of exactly one or two elements. If + \code{DEVICE} is a list, it denotes a \code{EXT:JAR-PATHNAME}, with + the entries containing \code{CL:PATHNAME} objects which describe the + outer and (possibly inner) locations of the jar + archive \footnote{The case of inner and outer + \code{EXT:EJAR-PATHNAME} arises when zip archives themselves + contain zip archives which is the case when the ABCL fasl is + included in the abcl.jar zip archive.}. -\item A \code{URL-PATHNAME} always has a \code{HOST} component that is a +\item A \code{EXT:URL-PATHNAME} always has a \code{HOST} component that is a property list. The values of the \code{HOST} property list are always character strings. The allowed keys have the following meanings: \begin{description} @@ -909,7 +931,6 @@ \item[:FRAGMENT] The fragment portion of the \textsc{URI} \end{description} - \item In order to encapsulate the implementation decisions for these meanings, the following functions provide a setf-able API for reading and writing such values: \code{URL-PATHNAME-QUERY}, @@ -946,6 +967,8 @@ abstractions on the standard Java collection classes as defined by the \code{java.util.List} contract. +%% an Example of using java.util.Lisp in Lisp would be nice + This extension is not automatically loaded by the implementation. It may be loaded via: @@ -1015,8 +1038,8 @@ bit characters to the Lisp reader\footnote{This represents a compromise with contemporary in 2011 32bit hosting architecures for which we wish to make text processing efficient. Should the User - require more control over UNICODE processing we recommend Edi Weisz' - excellent work with FLEXI-STREAMS which we fully support}, namely we + require more control over \textsc{UNICODE} processing we recommend Edi Weisz' + excellent work with \textsc|{FLEXI-STREAMS} which we fully support}, namely we allow a sequences of the form \verb~#\U~\emph{\texttt{xxxx}} to be processed by the reader as character whose code is specified by the hexadecimal digits \emph{\texttt{xxxx}}. The hexadecimal sequence may be one to four digits @@ -1054,7 +1077,10 @@ \item \code{mvn} These systems name common JVM artifacts from the distributed pom.xml graph of Maven Aether: \begin{enumerate} - \item \code{jna} Dynamically load 'jna.jar' version 3.4.0 from the network. + \item \code{jna} Dynamically load 'jna.jar' version 3.5.1 + from the network \footnote{This loading can be inhibited + if, at runtime, the Java class corresponding + ``:classname'' clause of the system defition is present.} \end{enumerate} \item \code{quicklisp-abcl} (Not working) boot a local Quicklisp installation via the ASDF:IRI type introduced bia ABCL-ASDF. @@ -1072,12 +1098,13 @@ \section{JSS optionally extends the Reader} The JSS contrib consitutes an additional, optional extension to the -reader in the definition of the \#\" reader macro. See section -\ref{section:jss} on page \pageref{section:jss} for more information. +reader in the definition of the \code{SHARPSIGN-DOUBLE-QUOTE} +(``\#\"'') reader macro. See section \ref{section:jss} on page +\pageref{section:jss} for more information. \section{ASDF} -asdf-2.25 (see \cite{asdf}) is packaged as core component of ABCL, +asdf-2.26.6 (see \cite{asdf}) is packaged as core component of ABCL, but not initialized by default, as it relies on the CLOS subsystem which can take a bit of time to start \footnote{While this time is ``merely'' on the order of seconds for contemporary 2011 machines, @@ -1115,9 +1142,9 @@ %dynamically loaded. -The following \textsc{ASDF} components are added: \code{JAR-FILE}, -\code{JAR-DIRECTORY}, \code{CLASS-FILE-DIRECTORY} and \code{MVN}. - +When loaded, abcl-asdf adds the following objects to \textsc{ASDF}: +\code{JAR-FILE}, \code{JAR-DIRECTORY}, \code{CLASS-FILE-DIRECTORY} and +\code{MVN}, exporting them (and others) as public symbols. \subsection{Referencing Maven Artifacts via ASDF} @@ -1196,13 +1223,14 @@ To one used to the more universal syntax of Lisp pairs upon which the definition of read and compile time macros is quite -natural \footnote{See Graham's ``On Lisp'' http://lib.store.yahoo.net/lib/paulgraham/onlisp.pdf.}, the Java syntax available to -the Java programmer may be said to suck. To alleviate this situation, -the JSS contrib introduces the \code{SHARPSIGN-DOUBLE-QUOTE} -(\code{\#"}) reader macro, which allows the the specification of the -name of invoking function as the first element of the relevant s-expr -which tends to be more congruent to how Lisp programmers seem to be -wired to think. +natural \footnote{See Graham's ``On Lisp'' + http://lib.store.yahoo.net/lib/paulgraham/onlisp.pdf.}, the Java +syntax available to the Java programmer may be said to suck. To +alleviate this situation, the JSS contrib introduces the +\code{SHARPSIGN-DOUBLE-QUOTE} (\code{\#"}) reader macro, which allows +the the specification of the name of invoking function as the first +element of the relevant s-expr which tends to be more congruent to how +Lisp programmers seem to be wired to think. While quite useful, we don't expect that the JSS contrib will be the last experiment in wrangling Java from Common Lisp. @@ -1225,6 +1253,11 @@ Some more information on jss can be found in its documentation at \url{http://svn.common-lisp.net/armedbear/trunk/abcl/contrib/jss/README.markdown} +\section{jfli} +\label{section:jfli} + +The contrib contains a pure-Java version of JFLI. + \section{asdf-install} The asdf-install contrib provides an implementation of ASDF-INSTALL. @@ -1258,8 +1291,28 @@ released abcl-1.0.0. We released abcl-1.0.1 as a maintainence release on January 10, 2012. -In October 2012, we revised the implementation with the release of -abcl-1.1.0 and accumulated changes to this manual. +In December 2012, we revised the implementation by adding (A)MOP +with the release of abcl-1.1.0. + +\appendix + +\chapter{The MOP Dictionary} + +\include{mop}o + +\chapter{The SYSTEM Dictionary} + +The public interfaces in this package are subject to change with +ABCL 1.2. + +\include{system} + +\chapter{The JSS Dictionary} + +These public interfaces are provided by the JSS contrib. + +\include{jss} + \bibliography{abcl} \bibliographystyle{alpha} Added: trunk/abcl/doc/manual/jss.tex ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ trunk/abcl/doc/manual/jss.tex Thu Dec 6 13:17:23 2012 (r14304) @@ -0,0 +1,230 @@ +\paragraph{} +\label{JSS:HASHMAP-TO-HASHTABLE} +\index{HASHMAP-TO-HASHTABLE} +--- Function: \textbf{hashmap-to-hashtable} [\textbf{jss}] \textit{hashmap \&rest rest \&key (keyfun (function identity)) (valfun (function identity)) (invert? NIL) table \&allow-other-keys} + +\begin{adjustwidth}{5em}{5em} +Converts the a HASHMAP reference to a java.util.HashMap object to a Lisp hashtable. + +The REST paramter specifies arguments to the underlying MAKE-HASH-TABLE call. + +KEYFUN and VALFUN specifies functions to be run on the keys and values +of the HASHMAP right before they are placed in the hashtable. + +If INVERT? is non-nil than reverse the keys and values in the resulting hashtable. +\end{adjustwidth} + +\paragraph{} +\label{JSS:FIND-JAVA-CLASS} +\index{FIND-JAVA-CLASS} +--- Function: \textbf{find-java-class} [\textbf{jss}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:INVOKE-ADD-IMPORTS} +\index{INVOKE-ADD-IMPORTS} +--- Macro: \textbf{invoke-add-imports} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{JSS:JAVA-CLASS-METHOD-NAMES} +\index{JAVA-CLASS-METHOD-NAMES} +--- Function: \textbf{java-class-method-names} [\textbf{jss}] \textit{class \&optional stream} + +\begin{adjustwidth}{5em}{5em} +Return a list of the public methods encapsulated by the JVM CLASS. + +If STREAM non-nil, output a verbose description to the named output stream. + +CLASS may either be a string naming a fully qualified JVM class in dot +notation, or a symbol resolved against all class entries in the +current classpath. +\end{adjustwidth} + +\paragraph{} +\label{JSS:*DO-AUTO-IMPORTS*} +\index{*DO-AUTO-IMPORTS*} +--- Variable: \textbf{*do-auto-imports*} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Whether to automatically introspect all Java classes on the classpath when JSS is loaded. +\end{adjustwidth} + +\paragraph{} +\label{JSS:NEW} +\index{NEW} +--- Function: \textbf{new} [\textbf{jss}] \textit{class-name \&rest args} + +\begin{adjustwidth}{5em}{5em} +Invoke the Java constructor for CLASS-NAME with ARGS. + +CLASS-NAME may either be a symbol or a string according to the usual JSS conventions. +\end{adjustwidth} + +\paragraph{} +\label{JSS:LIST-TO-LIST} +\index{LIST-TO-LIST} +--- Function: \textbf{list-to-list} [\textbf{jss}] \textit{list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:JARRAY-TO-LIST} +\index{JARRAY-TO-LIST} +--- Function: \textbf{jarray-to-list} [\textbf{jss}] \textit{jarray} + +\begin{adjustwidth}{5em}{5em} +Convert the Java array named by JARRARY into a Lisp list. +\end{adjustwidth} + +\paragraph{} +\label{JSS:SET-TO-LIST} +\index{SET-TO-LIST} +--- Function: \textbf{set-to-list} [\textbf{jss}] \textit{set} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:SET-JAVA-FIELD} +\index{SET-JAVA-FIELD} +--- Function: \textbf{set-java-field} [\textbf{jss}] \textit{object field value \&optional (try-harder *running-in-osgi*)} + +\begin{adjustwidth}{5em}{5em} +Set the FIELD of OBJECT to VALUE. +If OBJECT is a symbol, it names a dot qualified Java class to look for +a static FIELD. If OBJECT is an instance of java:java-object, the +associated is used to look up the static FIELD. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JCLASS-ALL-INTERFACES} +\index{JCLASS-ALL-INTERFACES} +--- Function: \textbf{jclass-all-interfaces} [\textbf{jss}] \textit{class} + +\begin{adjustwidth}{5em}{5em} +Return a list of interfaces the class implements +\end{adjustwidth} + +\paragraph{} +\label{JSS:WITH-CONSTANT-SIGNATURE} +\index{WITH-CONSTANT-SIGNATURE} +--- Macro: \textbf{with-constant-signature} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:GET-JAVA-FIELD} +\index{GET-JAVA-FIELD} +--- Function: \textbf{get-java-field} [\textbf{jss}] \textit{object field \&optional (try-harder *running-in-osgi*)} + +\begin{adjustwidth}{5em}{5em} +Get the value of the FIELD contained in OBJECT. +If OBJECT is a symbol it names a dot qualified static FIELD. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JLIST-TO-LIST} +\index{JLIST-TO-LIST} +--- Function: \textbf{jlist-to-list} [\textbf{jss}] \textit{list} + +\begin{adjustwidth}{5em}{5em} +Convert a LIST implementing java.util.List to a Lisp list. +\end{adjustwidth} + +\paragraph{} +\label{JSS:ITERABLE-TO-LIST} +\index{ITERABLE-TO-LIST} +--- Function: \textbf{iterable-to-list} [\textbf{jss}] \textit{iterable} + +\begin{adjustwidth}{5em}{5em} +Return the items contained the java.lang.Iterable ITERABLE as a list. +\end{adjustwidth} + +\paragraph{} +\label{JSS:*CL-USER-COMPATIBILITY*} +\index{*CL-USER-COMPATIBILITY*} +--- Variable: \textbf{*cl-user-compatibility*} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Whether backwards compatibility with JSS's use of CL-USER has been enabled. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JCMN} +\index{JCMN} +--- Function: \textbf{jcmn} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:CLASSFILES-IMPORT} +\index{CLASSFILES-IMPORT} +--- Function: \textbf{classfiles-import} [\textbf{jss}] \textit{directory} + +\begin{adjustwidth}{5em}{5em} +Load all Java classes recursively contained under DIRECTORY in the current process. +\end{adjustwidth} + +\paragraph{} +\label{JSS:JAPROPOS} +\index{JAPROPOS} +--- Function: \textbf{japropos} [\textbf{jss}] \textit{string} + +\begin{adjustwidth}{5em}{5em} +Output the names of all Java class names loaded in the current process which match STRING.. +\end{adjustwidth} + +\paragraph{} +\label{JSS:VECTOR-TO-LIST} +\index{VECTOR-TO-LIST} +--- Function: \textbf{vector-to-list} [\textbf{jss}] \textit{vector} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{JSS:INVOKE-RESTARGS} +\index{INVOKE-RESTARGS} +--- Function: \textbf{invoke-restargs} [\textbf{jss}] \textit{method object args \&optional (raw? NIL)} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{JSS:JAR-IMPORT} +\index{JAR-IMPORT} +--- Function: \textbf{jar-import} [\textbf{jss}] \textit{file} + +\begin{adjustwidth}{5em}{5em} +Import all the Java classes contained in the pathname FILE into the JSS dynamic lookup cache. +\end{adjustwidth} + +\paragraph{} +\label{JSS:ENSURE-COMPATIBILITY} +\index{ENSURE-COMPATIBILITY} +--- Function: \textbf{ensure-compatibility} [\textbf{jss}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Ensure backwards compatibility with JSS's use of CL-USER. +\end{adjustwidth} + Added: trunk/abcl/doc/manual/mop.tex ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ trunk/abcl/doc/manual/mop.tex Thu Dec 6 13:17:23 2012 (r14304) @@ -0,0 +1,793 @@ +\paragraph{} +\label{MOP:SPECIALIZER} +\index{SPECIALIZER} +--- Class: \textbf{specializer} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:DIRECT-SLOT-DEFINITION} +\index{DIRECT-SLOT-DEFINITION} +--- Class: \textbf{direct-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EFFECTIVE-SLOT-DEFINITION} +\index{EFFECTIVE-SLOT-DEFINITION} +--- Class: \textbf{effective-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-DIRECT-SLOT-DEFINITION} +\index{STANDARD-DIRECT-SLOT-DEFINITION} +--- Class: \textbf{standard-direct-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:MAP-DEPENDENTS} +\index{MAP-DEPENDENTS} +--- Generic Function: \textbf{map-dependents} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-FUNCTION} +\index{METHOD-FUNCTION} +--- Generic Function: \textbf{method-function} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-SUBCLASSES} +\index{CLASS-DIRECT-SUBCLASSES} +--- Generic Function: \textbf{class-direct-subclasses} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-LOCATION} +\index{SLOT-DEFINITION-LOCATION} +--- Generic Function: \textbf{slot-definition-location} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-SLOT-DEFINITION} +\index{STANDARD-SLOT-DEFINITION} +--- Class: \textbf{standard-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION} +\index{STANDARD-EFFECTIVE-SLOT-DEFINITION} +--- Class: \textbf{standard-effective-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-ALLOCATION} +\index{SLOT-DEFINITION-ALLOCATION} +--- Generic Function: \textbf{slot-definition-allocation} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FUNCALLABLE-STANDARD-INSTANCE-ACCESS} +\index{FUNCALLABLE-STANDARD-INSTANCE-ACCESS} +--- Function: \textbf{funcallable-standard-instance-access} [\textbf{mop}] \textit{instance location} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:DIRECT-SLOT-DEFINITION-CLASS} +\index{DIRECT-SLOT-DEFINITION-CLASS} +--- Generic Function: \textbf{direct-slot-definition-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-SLOTS} +\index{CLASS-DIRECT-SLOTS} +--- Generic Function: \textbf{class-direct-slots} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-CLASS-PRECEDENCE-LIST} +\index{COMPUTE-CLASS-PRECEDENCE-LIST} +--- Generic Function: \textbf{compute-class-precedence-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EXTRACT-SPECIALIZER-NAMES} +\index{EXTRACT-SPECIALIZER-NAMES} +--- Function: \textbf{extract-specializer-names} [\textbf{mop}] \textit{specialized-lambda-list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-METHODS} +\index{GENERIC-FUNCTION-METHODS} +--- Generic Function: \textbf{generic-function-methods} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DEFAULT-INITARGS} +\index{CLASS-DEFAULT-INITARGS} +--- Generic Function: \textbf{class-default-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-PRECEDENCE-LIST} +\index{CLASS-PRECEDENCE-LIST} +--- Generic Function: \textbf{class-precedence-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STANDARD-INSTANCE-ACCESS} +\index{STANDARD-INSTANCE-ACCESS} +--- Function: \textbf{standard-instance-access} [\textbf{system}] \textit{instance location} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION} +\index{SET-FUNCALLABLE-INSTANCE-FUNCTION} +--- Function: \textbf{set-funcallable-instance-function} [\textbf{mop}] \textit{funcallable-instance function} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-DECLARATIONS} +\index{GENERIC-FUNCTION-DECLARATIONS} +--- Generic Function: \textbf{generic-function-declarations} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ENSURE-GENERIC-FUNCTION-USING-CLASS} +\index{ENSURE-GENERIC-FUNCTION-USING-CLASS} +--- Generic Function: \textbf{ensure-generic-function-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EQL-SPECIALIZER-OBJECT} +\index{EQL-SPECIALIZER-OBJECT} +--- Function: \textbf{eql-specializer-object} [\textbf{mop}] \textit{eql-specializer} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ENSURE-CLASS-USING-CLASS} +\index{ENSURE-CLASS-USING-CLASS} +--- Generic Function: \textbf{ensure-class-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-READERS} +\index{SLOT-DEFINITION-READERS} +--- Generic Function: \textbf{slot-definition-readers} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-DISCRIMINATING-FUNCTION} +\index{COMPUTE-DISCRIMINATING-FUNCTION} +--- Generic Function: \textbf{compute-discriminating-function} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FIND-METHOD-COMBINATION} +\index{FIND-METHOD-COMBINATION} +--- Generic Function: \textbf{find-method-combination} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:REMOVE-DIRECT-METHOD} +\index{REMOVE-DIRECT-METHOD} +--- Generic Function: \textbf{remove-direct-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:REMOVE-DEPENDENT} +\index{REMOVE-DEPENDENT} +--- Generic Function: \textbf{remove-dependent} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-ACCESSOR-METHOD} +\index{STANDARD-ACCESSOR-METHOD} +--- Class: \textbf{standard-accessor-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-INITFORM} +\index{SLOT-DEFINITION-INITFORM} +--- Generic Function: \textbf{slot-definition-initform} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:WRITER-METHOD-CLASS} +\index{WRITER-METHOD-CLASS} +--- Generic Function: \textbf{writer-method-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EXTRACT-LAMBDA-LIST} +\index{EXTRACT-LAMBDA-LIST} +--- Function: \textbf{extract-lambda-list} [\textbf{mop}] \textit{specialized-lambda-list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-LAMBDA-LIST} +\index{METHOD-LAMBDA-LIST} +--- Generic Function: \textbf{method-lambda-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-SPECIALIZERS} +\index{METHOD-SPECIALIZERS} +--- Generic Function: \textbf{method-specializers} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ADD-DEPENDENT} +\index{ADD-DEPENDENT} +--- Generic Function: \textbf{add-dependent} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:UPDATE-DEPENDENT} +\index{UPDATE-DEPENDENT} +--- Generic Function: \textbf{update-dependent} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION} +\index{SLOT-DEFINITION} +--- Class: \textbf{slot-definition} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-FINALIZED-P} +\index{CLASS-FINALIZED-P} +--- Generic Function: \textbf{class-finalized-p} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:INTERN-EQL-SPECIALIZER} +\index{INTERN-EQL-SPECIALIZER} +--- Function: \textbf{intern-eql-specializer} [\textbf{mop}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-READER-METHOD} +\index{STANDARD-READER-METHOD} +--- Class: \textbf{standard-reader-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-EFFECTIVE-METHOD} +\index{COMPUTE-EFFECTIVE-METHOD} +--- Generic Function: \textbf{compute-effective-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-LAMBDA-LIST} +\index{GENERIC-FUNCTION-LAMBDA-LIST} +--- Generic Function: \textbf{generic-function-lambda-list} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{COMMON-LISP:METHOD-QUALIFIERS} +\index{METHOD-QUALIFIERS} +--- Generic Function: \textbf{method-qualifiers} [\textbf{common-lisp}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:VALIDATE-SUPERCLASS} +\index{VALIDATE-SUPERCLASS} +--- Generic Function: \textbf{validate-superclass} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +This generic function is called to determine whether the class + superclass is suitable for use as a superclass of class. +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-TYPE} +\index{SLOT-DEFINITION-TYPE} +--- Generic Function: \textbf{slot-definition-type} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ACCESSOR-METHOD-SLOT-DEFINITION} +\index{ACCESSOR-METHOD-SLOT-DEFINITION} +--- Generic Function: \textbf{accessor-method-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EFFECTIVE-SLOT-DEFINITION-CLASS} +\index{EFFECTIVE-SLOT-DEFINITION-CLASS} +--- Generic Function: \textbf{effective-slot-definition-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-WRITERS} +\index{SLOT-DEFINITION-WRITERS} +--- Generic Function: \textbf{slot-definition-writers} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-VALUE-USING-CLASS} +\index{SLOT-VALUE-USING-CLASS} +--- Generic Function: \textbf{slot-value-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METHOD-GENERIC-FUNCTION} +\index{METHOD-GENERIC-FUNCTION} +--- Generic Function: \textbf{method-generic-function} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SPECIALIZER-DIRECT-METHODS} +\index{SPECIALIZER-DIRECT-METHODS} +--- Generic Function: \textbf{specializer-direct-methods} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-PROTOTYPE} +\index{CLASS-PROTOTYPE} +--- Generic Function: \textbf{class-prototype} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:STANDARD-WRITER-METHOD} +\index{STANDARD-WRITER-METHOD} +--- Class: \textbf{standard-writer-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-DEFAULT-INITARGS} +\index{CLASS-DIRECT-DEFAULT-INITARGS} +--- Generic Function: \textbf{class-direct-default-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FUNCALLABLE-STANDARD-CLASS} +\index{FUNCALLABLE-STANDARD-CLASS} +--- Class: \textbf{funcallable-standard-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SPECIALIZER-DIRECT-GENERIC-FUNCTIONS} +\index{SPECIALIZER-DIRECT-GENERIC-FUNCTIONS} +--- Generic Function: \textbf{specializer-direct-generic-functions} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-BOUNDP-USING-CLASS} +\index{SLOT-BOUNDP-USING-CLASS} +--- Generic Function: \textbf{slot-boundp-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-DEFAULT-INITARGS} +\index{COMPUTE-DEFAULT-INITARGS} +--- Generic Function: \textbf{compute-default-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FORWARD-REFERENCED-CLASS} +\index{FORWARD-REFERENCED-CLASS} +--- Class: \textbf{forward-referenced-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-METHOD-COMBINATION} +\index{GENERIC-FUNCTION-METHOD-COMBINATION} +--- Generic Function: \textbf{generic-function-method-combination} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-APPLICABLE-METHODS-USING-CLASSES} +\index{COMPUTE-APPLICABLE-METHODS-USING-CLASSES} +--- Generic Function: \textbf{compute-applicable-methods-using-classes} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:METAOBJECT} +\index{METAOBJECT} +--- Class: \textbf{metaobject} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CANONICALIZE-DIRECT-SUPERCLASSES} +\index{CANONICALIZE-DIRECT-SUPERCLASSES} +--- Function: \textbf{canonicalize-direct-superclasses} [\textbf{mop}] \textit{direct-superclasses} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ADD-DIRECT-SUBCLASS} +\index{ADD-DIRECT-SUBCLASS} +--- Generic Function: \textbf{add-direct-subclass} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ENSURE-CLASS} +\index{ENSURE-CLASS} +--- Function: \textbf{ensure-class} [\textbf{mop}] \textit{name \&rest all-keys \&key \&allow-other-keys} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-METHOD-CLASS} +\index{GENERIC-FUNCTION-METHOD-CLASS} +--- Generic Function: \textbf{generic-function-method-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:DEFGENERIC} +\index{DEFGENERIC} +--- Function: \textbf{\%defgeneric} [\textbf{mop}] \textit{function-name \&rest all-keys} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:EQL-SPECIALIZER} +\index{EQL-SPECIALIZER} +--- Class: \textbf{eql-specializer} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:READER-METHOD-CLASS} +\index{READER-METHOD-CLASS} +--- Generic Function: \textbf{reader-method-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-NAME} +\index{SLOT-DEFINITION-NAME} +--- Generic Function: \textbf{slot-definition-name} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-MAKUNBOUND-USING-CLASS} +\index{SLOT-MAKUNBOUND-USING-CLASS} +--- Generic Function: \textbf{slot-makunbound-using-class} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:ADD-DIRECT-METHOD} +\index{ADD-DIRECT-METHOD} +--- Generic Function: \textbf{add-direct-method} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:MAKE-METHOD-LAMBDA} +\index{MAKE-METHOD-LAMBDA} +--- Generic Function: \textbf{make-method-lambda} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{COMMON-LISP:COMPUTE-APPLICABLE-METHODS} +\index{COMPUTE-APPLICABLE-METHODS} +--- Generic Function: \textbf{compute-applicable-methods} [\textbf{common-lisp}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-INITFUNCTION} +\index{SLOT-DEFINITION-INITFUNCTION} +--- Generic Function: \textbf{slot-definition-initfunction} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-EFFECTIVE-SLOT-DEFINITION} +\index{COMPUTE-EFFECTIVE-SLOT-DEFINITION} +--- Generic Function: \textbf{compute-effective-slot-definition} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +\index{GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +--- Generic Function: \textbf{generic-function-argument-precedence-order} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:GENERIC-FUNCTION-NAME} +\index{GENERIC-FUNCTION-NAME} +--- Generic Function: \textbf{generic-function-name} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:REMOVE-DIRECT-SUBCLASS} +\index{REMOVE-DIRECT-SUBCLASS} +--- Generic Function: \textbf{remove-direct-subclass} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-DIRECT-SUPERCLASSES} +\index{CLASS-DIRECT-SUPERCLASSES} +--- Generic Function: \textbf{class-direct-superclasses} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:COMPUTE-SLOTS} +\index{COMPUTE-SLOTS} +--- Generic Function: \textbf{compute-slots} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{COMMON-LISP:STANDARD-METHOD} +\index{STANDARD-METHOD} +--- Class: \textbf{standard-method} [\textbf{common-lisp}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FINALIZE-INHERITANCE} +\index{FINALIZE-INHERITANCE} +--- Generic Function: \textbf{finalize-inheritance} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:CLASS-SLOTS} +\index{CLASS-SLOTS} +--- Generic Function: \textbf{class-slots} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:SLOT-DEFINITION-INITARGS} +\index{SLOT-DEFINITION-INITARGS} +--- Generic Function: \textbf{slot-definition-initargs} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{MOP:FUNCALLABLE-STANDARD-OBJECT} +\index{FUNCALLABLE-STANDARD-OBJECT} +--- Class: \textbf{funcallable-standard-object} [\textbf{mop}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + Added: trunk/abcl/doc/manual/system.tex ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ trunk/abcl/doc/manual/system.tex Thu Dec 6 13:17:23 2012 (r14304) @@ -0,0 +1,1384 @@ +\paragraph{} +\label{SYSTEM:LOGICAL-PATHNAME-P} +\index{LOGICAL-PATHNAME-P} +--- Function: \textbf{logical-pathname-p} [\textbf{system}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +Returns true if OBJECT is of type logical-pathname; otherwise, returns false. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-READERS} +\index{SLOT-DEFINITION-READERS} +--- Function: \textbf{\%slot-definition-readers} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILER-MACROEXPAND} +\index{COMPILER-MACROEXPAND} +--- Function: \textbf{compiler-macroexpand} [\textbf{system}] \textit{form \&optional env} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-INITIAL-METHODS} +\index{SET-GENERIC-FUNCTION-INITIAL-METHODS} +--- Function: \textbf{set-generic-function-initial-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-READERS} +\index{SET-SLOT-DEFINITION-READERS} +--- Function: \textbf{set-slot-definition-readers} [\textbf{system}] \textit{slot-definition readers} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-INITFORM} +\index{SET-SLOT-DEFINITION-INITFORM} +--- Function: \textbf{set-slot-definition-initform} [\textbf{system}] \textit{slot-definition initform} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-DOCUMENTATION} +\index{GENERIC-FUNCTION-DOCUMENTATION} +--- Function: \textbf{generic-function-documentation} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:NSTRING-CAPITALIZE} +\index{NSTRING-CAPITALIZE} +--- Function: \textbf{\%nstring-capitalize} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-FINALIZED-P} +\index{CLASS-FINALIZED-P} +--- Function: \textbf{\%class-finalized-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENVIRONMENT-ADD-MACRO-DEFINITION} +\index{ENVIRONMENT-ADD-MACRO-DEFINITION} +--- Function: \textbf{environment-add-macro-definition} [\textbf{system}] \textit{environment name expander} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAMBDA-NAME} +\index{LAMBDA-NAME} +--- Function: \textbf{lambda-name} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-SLOT-VALUE} +\index{STD-SLOT-VALUE} +--- Function: \textbf{std-slot-value} [\textbf{system}] \textit{instance slot-name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-INSTANCE-CLASS} +\index{STD-INSTANCE-CLASS} +--- Function: \textbf{std-instance-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-SLOT-DEFINITION} +\index{MAKE-SLOT-DEFINITION} +--- Function: \textbf{make-slot-definition} [\textbf{system}] \textit{\&optional class} + +\begin{adjustwidth}{5em}{5em} +Cannot be called with user-defined subclasses of standard-slot-definition. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:WRITE-VECTOR-UNSIGNED-BYTE-8} +\index{WRITE-VECTOR-UNSIGNED-BYTE-8} +--- Function: \textbf{write-vector-unsigned-byte-8} [\textbf{system}] \textit{vector stream start end} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:NOTINLINE-P} +\index{NOTINLINE-P} +--- Function: \textbf{notinline-p} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:VECTOR-DELETE-EQL} +\index{VECTOR-DELETE-EQL} +--- Function: \textbf{vector-delete-eql} [\textbf{system}] \textit{item vector} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PACKAGE-SYMBOLS} +\index{PACKAGE-SYMBOLS} +--- Function: \textbf{package-symbols} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-DIRECT-SUBCLASSES} +\index{SET-CLASS-DIRECT-SUBCLASSES} +--- Function: \textbf{\%set-class-direct-subclasses} [\textbf{system}] \textit{class direct-subclasses} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DEFCONST} +\index{DEFCONST} +--- Macro: \textbf{defconst} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILE-FILE-IF-NEEDED} +\index{COMPILE-FILE-IF-NEEDED} +--- Function: \textbf{compile-file-if-needed} [\textbf{system}] \textit{input-file \&rest allargs \&key force-compile \&allow-other-keys} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PUTHASH} +\index{PUTHASH} +--- Function: \textbf{puthash} [\textbf{system}] \textit{key hash-table new-value \&optional default} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRUCTURE-SET} +\index{STRUCTURE-SET} +--- Function: \textbf{structure-set} [\textbf{system}] \textit{instance index new-value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-LAYOUT} +\index{MAKE-LAYOUT} +--- Function: \textbf{make-layout} [\textbf{system}] \textit{class instance-slots class-slots} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING/=} +\index{STRING/=} +--- Function: \textbf{\%string/=} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DELETE-EQ} +\index{DELETE-EQ} +--- Function: \textbf{delete-eq} [\textbf{system}] \textit{item sequence} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SINGLE-FLOAT-BITS} +\index{SINGLE-FLOAT-BITS} +--- Function: \textbf{single-float-bits} [\textbf{system}] \textit{float} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+KEYWORD-PACKAGE+} +\index{+KEYWORD-PACKAGE+} +--- Variable: \textbf{+keyword-package+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-KILL} +\index{PROCESS-KILL} +--- Function: \textbf{process-kill} [\textbf{system}] \textit{process} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAYOUT-LENGTH} +\index{LAYOUT-LENGTH} +--- Function: \textbf{layout-length} [\textbf{system}] \textit{layout} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENVIRONMENT} +\index{ENVIRONMENT} +--- Class: \textbf{environment} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-METHOD-CLASS} +\index{GENERIC-FUNCTION-METHOD-CLASS} +--- Function: \textbf{\%generic-function-method-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LIST-DELETE-EQL} +\index{LIST-DELETE-EQL} +--- Function: \textbf{list-delete-eql} [\textbf{system}] \textit{item list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ASET} +\index{ASET} +--- Function: \textbf{aset} [\textbf{system}] \textit{array subscripts new-element} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*COMPILE-FILE-TYPE*} +\index{*COMPILE-FILE-TYPE*} +--- Variable: \textbf{*compile-file-type*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+CL-PACKAGE+} +\index{+CL-PACKAGE+} +--- Variable: \textbf{+cl-package+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-SUBCLASSES} +\index{CLASS-DIRECT-SUBCLASSES} +--- Function: \textbf{\%class-direct-subclasses} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GF-REQUIRED-ARGS} +\index{GF-REQUIRED-ARGS} +--- Function: \textbf{gf-required-args} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SCHAR} +\index{SET-SCHAR} +--- Function: \textbf{set-schar} [\textbf{system}] \textit{string index character} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-FILL-POINTER-OUTPUT-STREAM} +\index{MAKE-FILL-POINTER-OUTPUT-STREAM} +--- Function: \textbf{make-fill-pointer-output-stream} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-CAPITALIZE} +\index{STRING-CAPITALIZE} +--- Function: \textbf{\%string-capitalize} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INLINE-EXPANSION} +\index{INLINE-EXPANSION} +--- Function: \textbf{inline-expansion} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*SOURCE-POSITION*} +\index{*SOURCE-POSITION*} +--- Variable: \textbf{*source-position*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SYMBOL-MACRO-P} +\index{SYMBOL-MACRO-P} +--- Function: \textbf{symbol-macro-p} [\textbf{system}] \textit{value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DOUBLE-FLOAT-HIGH-BITS} +\index{DOUBLE-FLOAT-HIGH-BITS} +--- Function: \textbf{double-float-high-bits} [\textbf{system}] \textit{float} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+FIXNUM-TYPE+} +\index{+FIXNUM-TYPE+} +--- Variable: \textbf{+fixnum-type+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FDEFINITION-BLOCK-NAME} +\index{FDEFINITION-BLOCK-NAME} +--- Function: \textbf{fdefinition-block-name} [\textbf{system}] \textit{function-name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:EXPAND-INLINE} +\index{EXPAND-INLINE} +--- Function: \textbf{expand-inline} [\textbf{system}] \textit{form expansion} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FUNCTION-RESULT-TYPE} +\index{FUNCTION-RESULT-TYPE} +--- Function: \textbf{function-result-type} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENVIRONMENT-ADD-SYMBOL-BINDING} +\index{ENVIRONMENT-ADD-SYMBOL-BINDING} +--- Function: \textbf{environment-add-symbol-binding} [\textbf{system}] \textit{environment symbol value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SWAP-SLOTS} +\index{SWAP-SLOTS} +--- Function: \textbf{swap-slots} [\textbf{system}] \textit{instance-1 instance-2} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-METHODS} +\index{GENERIC-FUNCTION-METHODS} +--- Function: \textbf{\%generic-function-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*SPEED*} +\index{*SPEED*} +--- Variable: \textbf{*speed*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:IDENTITY-HASH-CODE} +\index{IDENTITY-HASH-CODE} +--- Function: \textbf{identity-hash-code} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DUMP-FORM} +\index{DUMP-FORM} +--- Function: \textbf{dump-form} [\textbf{system}] \textit{form stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FIXNUM-TYPE-P} +\index{FIXNUM-TYPE-P} +--- Function: \textbf{fixnum-type-p} [\textbf{system}] \textit{compiler-type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-KEYWORD} +\index{MAKE-KEYWORD} +--- Function: \textbf{make-keyword} [\textbf{system}] \textit{symbol} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-ENVIRONMENT} +\index{MAKE-ENVIRONMENT} +--- Function: \textbf{make-environment} [\textbf{system}] \textit{\&optional parent-environment} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILED-LISP-FUNCTION-P} +\index{COMPILED-LISP-FUNCTION-P} +--- Function: \textbf{compiled-lisp-function-p} [\textbf{system}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LIST-DIRECTORY} +\index{LIST-DIRECTORY} +--- Function: \textbf{list-directory} [\textbf{system}] \textit{directory \&optional (resolve-symlinks t)} + +\begin{adjustwidth}{5em}{5em} +Lists the contents of DIRECTORY, optionally resolving symbolic links. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-FILE-STREAM} +\index{MAKE-FILE-STREAM} +--- Function: \textbf{make-file-stream} [\textbf{system}] \textit{pathname namestring element-type direction if-exists external-format} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:COMPILER-SUBTYPEP} +\index{COMPILER-SUBTYPEP} +--- Function: \textbf{compiler-subtypep} [\textbf{system}] \textit{compiler-type typespec} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PUTF} +\index{PUTF} +--- Function: \textbf{\%putf} [\textbf{system}] \textit{plist indicator new-value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CHECK-SEQUENCE-BOUNDS} +\index{CHECK-SEQUENCE-BOUNDS} +--- Function: \textbf{check-sequence-bounds} [\textbf{system}] \textit{sequence start end} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:OUTPUT-OBJECT} +\index{OUTPUT-OBJECT} +--- Function: \textbf{\%output-object} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-DIRECT-SLOTS} +\index{SET-CLASS-DIRECT-SLOTS} +--- Function: \textbf{\%set-class-direct-slots} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CAR} +\index{SET-CAR} +--- Function: \textbf{set-car} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-SLOTS} +\index{SET-CLASS-SLOTS} +--- Function: \textbf{\%set-class-slots} [\textbf{system}] \textit{class slot-definitions} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +\index{SET-GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER} +--- Function: \textbf{set-generic-function-argument-precedence-order} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-DOCUMENTATION} +\index{SET-SLOT-DEFINITION-DOCUMENTATION} +--- Function: \textbf{set-slot-definition-documentation} [\textbf{system}] \textit{slot-definition documentation} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*SAFETY*} +\index{*SAFETY*} +--- Variable: \textbf{*safety*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:EMPTY-ENVIRONMENT-P} +\index{EMPTY-ENVIRONMENT-P} +--- Function: \textbf{empty-environment-p} [\textbf{system}] \textit{environment} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-DOCUMENTATION} +\index{SET-GENERIC-FUNCTION-DOCUMENTATION} +--- Function: \textbf{set-generic-function-documentation} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-LOCATION} +\index{SLOT-DEFINITION-LOCATION} +--- Function: \textbf{\%slot-definition-location} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:REMOVE-ZIP-CACHE-ENTRY} +\index{REMOVE-ZIP-CACHE-ENTRY} +--- Function: \textbf{remove-zip-cache-entry} [\textbf{system}] \textit{pathname} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GET-CACHED-EMF} +\index{GET-CACHED-EMF} +--- Function: \textbf{get-cached-emf} [\textbf{system}] \textit{generic-function args} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-FINALIZED-P} +\index{SET-CLASS-FINALIZED-P} +--- Function: \textbf{\%set-class-finalized-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-NOT-LESSP} +\index{STRING-NOT-LESSP} +--- Function: \textbf{\%string-not-lessp} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-INSTANCES-OBSOLETE} +\index{MAKE-INSTANCES-OBSOLETE} +--- Function: \textbf{\%make-instances-obsolete} [\textbf{system}] \textit{class} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ENSURE-INPUT-STREAM} +\index{ENSURE-INPUT-STREAM} +--- Function: \textbf{ensure-input-stream} [\textbf{system}] \textit{pathname} + +\begin{adjustwidth}{5em}{5em} +Returns a java.io.InputStream for resource denoted by PATHNAME. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-LOGICAL-PATHNAME} +\index{MAKE-LOGICAL-PATHNAME} +--- Function: \textbf{\%make-logical-pathname} [\textbf{system}] \textit{namestring} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-FIND-CLASS} +\index{SET-FIND-CLASS} +--- Function: \textbf{\%set-find-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:+FALSE-TYPE+} +\index{+FALSE-TYPE+} +--- Variable: \textbf{+false-type+} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-INPUT} +\index{PROCESS-INPUT} +--- Function: \textbf{process-input} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-INITARGS} +\index{SET-SLOT-DEFINITION-INITARGS} +--- Function: \textbf{set-slot-definition-initargs} [\textbf{system}] \textit{slot-definition initargs} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-STRUCTURE} +\index{MAKE-STRUCTURE} +--- Function: \textbf{make-structure} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-ALLOCATION-CLASS} +\index{SLOT-DEFINITION-ALLOCATION-CLASS} +--- Function: \textbf{\%slot-definition-allocation-class} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*INLINE-DECLARATIONS*} +\index{*INLINE-DECLARATIONS*} +--- Variable: \textbf{*inline-declarations*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DEFAULT-INITARGS} +\index{CLASS-DEFAULT-INITARGS} +--- Function: \textbf{\%class-default-initargs} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STANDARD-INSTANCE-ACCESS} +\index{STANDARD-INSTANCE-ACCESS} +--- Function: \textbf{standard-instance-access} [\textbf{system}] \textit{instance location} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-FUNCTION-INFO-VALUE} +\index{SET-FUNCTION-INFO-VALUE} +--- Function: \textbf{set-function-info-value} [\textbf{system}] \textit{name indicator value} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{EXTENSIONS:PRECOMPILE} +\index{PRECOMPILE} +--- Function: \textbf{precompile} [\textbf{extensions}] \textit{name \&optional definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-NOT-EQUAL} +\index{STRING-NOT-EQUAL} +--- Function: \textbf{\%string-not-equal} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SHA256} +\index{SHA256} +--- Function: \textbf{sha256} [\textbf{system}] \textit{\&rest paths-or-strings} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DISABLE-ZIP-CACHE} +\index{DISABLE-ZIP-CACHE} +--- Function: \textbf{disable-zip-cache} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Disable all caching of ABCL FASLs and ZIPs. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-SLOT-BOUNDP} +\index{STD-SLOT-BOUNDP} +--- Function: \textbf{std-slot-boundp} [\textbf{system}] \textit{instance slot-name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-METHOD-CLASS} +\index{SET-GENERIC-FUNCTION-METHOD-CLASS} +--- Function: \textbf{set-generic-function-method-class} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-METHOD-COMBINATION} +\index{GENERIC-FUNCTION-METHOD-COMBINATION} +--- Function: \textbf{\%generic-function-method-combination} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CALL-COUNT} +\index{CALL-COUNT} +--- Function: \textbf{call-count} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-ALLOCATION} +\index{SLOT-DEFINITION-ALLOCATION} +--- Function: \textbf{\%slot-definition-allocation} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ALLOCATE-FUNCALLABLE-INSTANCE} +\index{ALLOCATE-FUNCALLABLE-INSTANCE} +--- Function: \textbf{\%allocate-funcallable-instance} [\textbf{system}] \textit{class} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:DOUBLE-FLOAT-LOW-BITS} +\index{DOUBLE-FLOAT-LOW-BITS} +--- Function: \textbf{double-float-low-bits} [\textbf{system}] \textit{float} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SIMPLE-SEARCH} +\index{SIMPLE-SEARCH} +--- Function: \textbf{simple-search} [\textbf{system}] \textit{sequence1 sequence2} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FLOAT-INFINITY-P} +\index{FLOAT-INFINITY-P} +--- Function: \textbf{float-infinity-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:AVAILABLE-ENCODINGS} +\index{AVAILABLE-ENCODINGS} +--- Function: \textbf{available-encodings} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +Returns all charset encodings suitable for passing to a stream constructor available at runtime. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING-EQUAL} +\index{STRING-EQUAL} +--- Function: \textbf{\%string-equal} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-PRECEDENCE-LIST} +\index{CLASS-PRECEDENCE-LIST} +--- Function: \textbf{\%class-precedence-list} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS} +\index{PROCESS} +--- Class: \textbf{process} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-LIST} +\index{MAKE-LIST} +--- Function: \textbf{\%make-list} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:TYPE-ERROR} +\index{TYPE-ERROR} +--- Function: \textbf{\%type-error} [\textbf{system}] \textit{datum expected-type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STREAM-WRITE-CHAR} +\index{STREAM-WRITE-CHAR} +--- Function: \textbf{\%stream-write-char} [\textbf{system}] \textit{character output-stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FINALIZE-GENERIC-FUNCTION} +\index{FINALIZE-GENERIC-FUNCTION} +--- Function: \textbf{\%finalize-generic-function} [\textbf{system}] \textit{generic-function} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{SYSTEM:BUILT-IN-FUNCTION-P} +\index{BUILT-IN-FUNCTION-P} +--- Function: \textbf{built-in-function-p} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*COMPILE-FILE-ENVIRONMENT*} +\index{*COMPILE-FILE-ENVIRONMENT*} +--- Variable: \textbf{*compile-file-environment*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRING<} +\index{STRING<} +--- Function: \textbf{\%string<} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-WRITERS} +\index{SET-SLOT-DEFINITION-WRITERS} +--- Function: \textbf{set-slot-definition-writers} [\textbf{system}] \textit{slot-definition writers} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INIT-EQL-SPECIALIZATIONS} +\index{INIT-EQL-SPECIALIZATIONS} +--- Function: \textbf{\%init-eql-specializations} [\textbf{system}] \textit{generic-function eql-specilizer-objects-list} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-SLOT-DEFINITION-TYPE} +\index{SET-SLOT-DEFINITION-TYPE} +--- Function: \textbf{set-slot-definition-type} [\textbf{system}] \textit{slot-definition type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:OUT-SYNONYM-OF} +\index{OUT-SYNONYM-OF} +--- Function: \textbf{out-synonym-of} [\textbf{system}] \textit{stream-designator} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:NOTE-NAME-DEFINED} +\index{NOTE-NAME-DEFINED} +--- Function: \textbf{note-name-defined} [\textbf{system}] \textit{name} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INTEGER-TYPE-P} +\index{INTEGER-TYPE-P} +--- Function: \textbf{integer-type-p} [\textbf{system}] \textit{object} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STRUCTURE-LENGTH} +\index{STRUCTURE-LENGTH} +--- Function: \textbf{structure-length} [\textbf{system}] \textit{instance} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CACHE-EMF} +\index{CACHE-EMF} +--- Function: \textbf{cache-emf} [\textbf{system}] \textit{generic-function args emf} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:HASH-TABLE-WEAKNESS} +\index{HASH-TABLE-WEAKNESS} +--- Function: \textbf{hash-table-weakness} [\textbf{system}] \textit{hash-table} + +\begin{adjustwidth}{5em}{5em} +Return weakness property of HASH-TABLE, or NIL if it has none. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:FLOAT-OVERFLOW-MODE} +\index{FLOAT-OVERFLOW-MODE} +--- Function: \textbf{float-overflow-mode} [\textbf{system}] \textit{\&optional boolean} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-ERROR} +\index{PROCESS-ERROR} +--- Function: \textbf{process-error} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PROCESS-ALIVE-P} +\index{PROCESS-ALIVE-P} +--- Function: \textbf{process-alive-p} [\textbf{system}] \textit{process} + +\begin{adjustwidth}{5em}{5em} +Return t if process is still alive, nil otherwise. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-DEFAULT-INITARGS} +\index{CLASS-DIRECT-DEFAULT-INITARGS} +--- Function: \textbf{\%class-direct-default-initargs} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-DOUBLE-FLOAT} +\index{MAKE-DOUBLE-FLOAT} +--- Function: \textbf{make-double-float} [\textbf{system}] \textit{bits} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-GENERIC-FUNCTION-METHODS} +\index{SET-GENERIC-FUNCTION-METHODS} +--- Function: \textbf{set-generic-function-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAYOUT-SLOT-INDEX} +\index{LAYOUT-SLOT-INDEX} +--- Function: \textbf{layout-slot-index} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STREAM-TERPRI} +\index{STREAM-TERPRI} +--- Function: \textbf{\%stream-terpri} [\textbf{system}] \textit{output-stream} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STREAM-OUTPUT-OBJECT} +\index{STREAM-OUTPUT-OBJECT} +--- Function: \textbf{\%stream-output-object} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INTERACTIVE-EVAL} +\index{INTERACTIVE-EVAL} +--- Function: \textbf{interactive-eval} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:JAR-STREAM} +\index{JAR-STREAM} +--- Class: \textbf{jar-stream} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-NAME} +\index{SLOT-DEFINITION-NAME} +--- Function: \textbf{\%slot-definition-name} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:ZIP} +\index{ZIP} +--- Function: \textbf{zip} [\textbf{system}] \textit{pathname pathnames \&optional topdir} + +\begin{adjustwidth}{5em}{5em} +Creates a zip archive at PATHNAME whose entries enumerated via the list of PATHNAMES. +If the optional TOPDIR argument is specified, the archive will preserve the hierarchy of PATHNAMES relative to TOPDIR. Without TOPDIR, there will be no sub-directories in the archive, i.e. it will be flat. +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION-WRITERS} +\index{SLOT-DEFINITION-WRITERS} +--- Function: \textbf{\%slot-definition-writers} [\textbf{system}] \textit{slot-definition} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:GENERIC-FUNCTION-NAME} +\index{GENERIC-FUNCTION-NAME} +--- Function: \textbf{\%generic-function-name} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:STD-INSTANCE-LAYOUT} +\index{STD-INSTANCE-LAYOUT} +--- Function: \textbf{std-instance-layout} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SLOT-DEFINITION} +\index{SLOT-DEFINITION} +--- Class: \textbf{slot-definition} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +NIL + +\paragraph{} +\label{SYSTEM:SHRINK-VECTOR} +\index{SHRINK-VECTOR} +--- Function: \textbf{shrink-vector} [\textbf{system}] \textit{vector new-size} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:PACKAGE-INHERITED-SYMBOLS} +\index{PACKAGE-INHERITED-SYMBOLS} +--- Function: \textbf{package-inherited-symbols} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:LAYOUT-CLASS} +\index{LAYOUT-CLASS} +--- Function: \textbf{layout-class} [\textbf{system}] \textit{layout} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-FILL-POINTER} +\index{SET-FILL-POINTER} +--- Function: \textbf{\%set-fill-pointer} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SET-CLASS-DOCUMENTATION} +\index{SET-CLASS-DOCUMENTATION} +--- Function: \textbf{\%set-class-documentation} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:REQUIRE-TYPE} +\index{REQUIRE-TYPE} +--- Function: \textbf{require-type} [\textbf{system}] \textit{arg type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-SLOTS} +\index{CLASS-DIRECT-SLOTS} +--- Function: \textbf{\%class-direct-slots} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:CLASS-DIRECT-METHODS} +\index{CLASS-DIRECT-METHODS} +--- Function: \textbf{\%class-direct-methods} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:SETF-FUNCTION-NAME-P} +\index{SETF-FUNCTION-NAME-P} +--- Function: \textbf{setf-function-name-p} [\textbf{system}] \textit{thing} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:*COMPILER-ERROR-CONTEXT*} +\index{*COMPILER-ERROR-CONTEXT*} +--- Variable: \textbf{*compiler-error-context*} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:MAKE-INTEGER-TYPE} +\index{MAKE-INTEGER-TYPE} +--- Function: \textbf{make-integer-type} [\textbf{system}] \textit{type} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + +\paragraph{} +\label{SYSTEM:INTEGER-TYPE-HIGH} +\index{INTEGER-TYPE-HIGH} +--- Function: \textbf{integer-type-high} [\textbf{system}] \textit{} + +\begin{adjustwidth}{5em}{5em} +not-documented +\end{adjustwidth} + From mevenson at common-lisp.net Thu Dec 6 21:20:35 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Thu, 06 Dec 2012 13:20:35 -0800 Subject: [armedbear-cvs] r14305 - in trunk/abcl/contrib: . abcl-asdf asdf-install asdf-jar jfli jss mvn quicklisp Message-ID: Author: mevenson Date: Thu Dec 6 13:20:34 2012 New Revision: 14305 Log: Merge r14301 to trunk | mevenson | 2012-12-06 21:17:24 +0100 (Thu, 06 Dec 2012) | 5 lines doc: Start annotating all the places we need to change things with RDF. Do TODO: grovel through the source tree to find all textual lines containing probable RDF statements. Modified: trunk/abcl/contrib/README.markdown trunk/abcl/contrib/abcl-asdf/README.markdown trunk/abcl/contrib/abcl-asdf/abcl-asdf.asd trunk/abcl/contrib/asdf-install/asdf-install.asd trunk/abcl/contrib/asdf-jar/README.markdown trunk/abcl/contrib/asdf-jar/asdf-jar.asd trunk/abcl/contrib/jfli/README trunk/abcl/contrib/jfli/jfli.asd trunk/abcl/contrib/jss/README.markdown trunk/abcl/contrib/jss/jss.asd trunk/abcl/contrib/mvn/jna.asd trunk/abcl/contrib/quicklisp/quicklisp-abcl.asd Modified: trunk/abcl/contrib/README.markdown ============================================================================== --- trunk/abcl/contrib/README.markdown Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/README.markdown Thu Dec 6 13:20:34 2012 (r14305) @@ -14,37 +14,49 @@ asdf-jar - Package ASDF system definitions into JVM artifacts for distribution + Package ASDF system definitions into JVM artifacts for + distribution jss A higher-order, more Lisp oriented interface for constructing Lisp interfaces to existing binary code libraries available for the JVM - built on the primitives provided by the JAVA package. + built on the primitives provided by the JAVA package. Used in the + [lsw2][] Semantic Web package for dealing with OWL2 ontologies in + RDF(S) and other notations. + +[lsw2]: http://code.google.com/p/lsw2/ jfli - The "original" higher-order JVM interop descended from Rich + The "original" higher-order JVM interface descended from Rich Hickey's work on the JVM before Clojure. This implementation currently uses a fork of the public [JFLI][] API that uses the java interop of the ABCL JAVA package instead of the JNI - interface. + interface. [jfli]: http://sourceforge.net/projects/jfli/ + +quicklisp-abcl + + Stub for loading Quicklisp from main repository if not locally + present. Must currently be invoked with the force option: + CL-USER> (asdf:load-system :quicklisp-abcl :force t) mvn ---- - -A collection of various useful JVM artifacts downloaded and cached by -the Aether Maven connector. Requires the maven-3.0.3 executable "mvn" -(or "mvn.bat" under MSFT Windows) to be in the current processes's path. - -jna - Cache, from the network if necessary, the jna-3.4.0.jar in - the current JVM process, allowing the bootstrapping of - dynamically linking to shared executables on the host platform. + A collection of various useful JVM artifacts downloaded and cached by + the Aether Maven connector. Requires the maven-3.0.3 executable "mvn" + (or "mvn.bat" under MSFT Windows) to be in the current processes's + path. + + mvn currently includes only the single artifact: + + jna + Cache, from the network if necessary, the jna-3.4.0.jar in + the current JVM process, allowing the bootstrapping of + dynamically linking to shared executables on the host platform. Deprecated @@ -56,7 +68,7 @@ Deprecated, use Quicklisp from the REPL via - CL-USER> (load "https://beta.quicklisp.org/quicklisp.lisp") + CL-USER> (load "http://beta.quicklisp.org/quicklisp.lisp") instead. @@ -64,7 +76,8 @@ Mark Created: 2011-09-11 -Revised: 2012-11-28 +Revised: 2012-12-06 +<> abcl:documents . Modified: trunk/abcl/contrib/abcl-asdf/README.markdown ============================================================================== --- trunk/abcl/contrib/abcl-asdf/README.markdown Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/abcl-asdf/README.markdown Thu Dec 6 13:20:34 2012 (r14305) @@ -3,9 +3,9 @@ To use: - CL-USER> (require 'abcl-contrib) + CL-USER> (require :abcl-contrib) - CL-USER> (require 'abcl-asdf) + CL-USER> (require :abcl-asdf) ABCL specific contributions to ASDF system definition mainly concerned @@ -42,16 +42,16 @@ We define an API within the ASDF package consisting of the following ASDF classes derived from ASDF:COMPONENT: -JAR-DIRECTORY, JAR-FILE, and CLASS-FILE-DIRECTORY for JVM artifacts -that have a currently valid pathname representation (i.e. they exist -on the local filesystem). - -The MVN and IRI classes descend from ASDF-COMPONENT, but do not -directly have a filesystem location. - -The IRI component is currently unused, but serves as a point to base -the inheritance of the MVN component while allowing other forms of -uri-like resources to be encapsulated in the future. + JAR-DIRECTORY, JAR-FILE, and CLASS-FILE-DIRECTORY for JVM artifacts + that have a currently valid pathname representation (i.e. they exist + on the local filesystem). + + The MVN and IRI classes descend from ASDF-COMPONENT, but do not + directly have a filesystem location. + + The IRI component is currently unused, but serves as a point to base + the inheritance of the MVN component while allowing other forms of + uri-like resources to be encapsulated in the future. The MVN component should specifiy a [Maven URI][1] as its PATH. A Maven URI has the form "GROUP-ID/ARTIFACT-ID/VERSION" which specifies @@ -164,5 +164,5 @@ Mark Created: 2011-01-01 - Revised: 2012-11-28 + Revised: 2012-12-06 Modified: trunk/abcl/contrib/abcl-asdf/abcl-asdf.asd ============================================================================== --- trunk/abcl/contrib/abcl-asdf/abcl-asdf.asd Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/abcl-asdf/abcl-asdf.asd Thu Dec 6 13:20:34 2012 (r14305) @@ -2,7 +2,8 @@ (asdf:defsystem :abcl-asdf :author "Mark Evenson" - :version "1.0.0" + :version "1.1.0" + :description "<> asdf:defsystem " :depends-on (jss) :components ((:module packages :pathname "" Modified: trunk/abcl/contrib/asdf-install/asdf-install.asd ============================================================================== --- trunk/abcl/contrib/asdf-install/asdf-install.asd Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/asdf-install/asdf-install.asd Thu Dec 6 13:20:34 2012 (r14305) @@ -13,6 +13,7 @@ #+:sbcl :depends-on #+:sbcl (sb-bsd-sockets) :version "0.6.10.2" + :description "<> asdf:defsystem " :author "Dan Barlow , Edi Weitz and many others. See the file COPYRIGHT for more details." :maintainer "Gary Warren King " :components ((:file "defpackage") Modified: trunk/abcl/contrib/asdf-jar/README.markdown ============================================================================== --- trunk/abcl/contrib/asdf-jar/README.markdown Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/asdf-jar/README.markdown Thu Dec 6 13:20:34 2012 (r14305) @@ -1,10 +1,6 @@ ASDF-JAR ======== - Mark Evenson - Created: 20-JUN-2011 - Modified: 20-JUN-2011 - ASDF-JAR provides a system for packaging ASDF systems into jar archives for ABCL. Given a running ABCL image with loadable ASDF systems the code in this package will recursively package all the @@ -57,3 +53,10 @@ Setting CL:*LOAD-VERBOSE* will allow one to verify that the subsequent load is indeed coming from the jar. + +# Colophon + +Mark Evenson +Created: 20-JUN-2011 +Modified: 20-JUN-2011 +<> abcl:documents . Modified: trunk/abcl/contrib/asdf-jar/asdf-jar.asd ============================================================================== --- trunk/abcl/contrib/asdf-jar/asdf-jar.asd Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/asdf-jar/asdf-jar.asd Thu Dec 6 13:20:34 2012 (r14305) @@ -4,6 +4,7 @@ (defsystem :asdf-jar :author "Mark Evenson" :version "0.2.1" + :description "<> asdf:defsystem :components ((:module base :pathname "" :components ((:file "asdf-jar") Modified: trunk/abcl/contrib/jfli/README ============================================================================== --- trunk/abcl/contrib/jfli/README Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/jfli/README Thu Dec 6 13:20:34 2012 (r14305) @@ -34,3 +34,6 @@ Please send (ABCL-specific) bug reports, suggestions, examples, and whatever else you can think of, to asimon at math.bme.hu. +# Colophon + +<> abcl:documents . Modified: trunk/abcl/contrib/jfli/jfli.asd ============================================================================== --- trunk/abcl/contrib/jfli/jfli.asd Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/jfli/jfli.asd Thu Dec 6 13:20:34 2012 (r14305) @@ -4,9 +4,9 @@ :version "0.2.0" :components ((:file "jfli"))) - -;;; Requires integration with +;;; Requires integration with IntelliJ IDEA editor (free download) (asdf:defsystem jfli-intellij-tests :version "0.1.0" + :description "<> asdf:defsystem ." :components ((:module test :components ((:file "yanking"))))) Modified: trunk/abcl/contrib/jss/README.markdown ============================================================================== --- trunk/abcl/contrib/jss/README.markdown Thu Dec 6 13:17:23 2012 (r14304) +++ trunk/abcl/contrib/jss/README.markdown Thu Dec 6 13:20:34 2012 (r14305) @@ -133,5 +133,7 @@ <> dc:created "2005" ; dc:author "Mark "; - revised: "29-JAN-2012" . + dc:revised "06-DEC-2012" ; + <> abcl:documents asdf:defsystem asdf:defsystem " :version "0.2.0" - :description "Convenience stubs to load locally installed Quicklisp." -;; #+nil::defsystem-depends-on (abcl-asdf) :components nil) + ;; #+nil::needs-abcl-asdf((:iri "http://beta.quicklisp.org/quicklisp.lisp")) ;; #+nil::in-order-to ((asdf:compile-op (ql::install))) ;;; FIXME tickle the internal Quicklisp setup From mevenson at common-lisp.net Fri Dec 7 10:38:16 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 02:38:16 -0800 Subject: [armedbear-cvs] r14306 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Fri Dec 7 02:38:15 2012 New Revision: 14306 Log: digest: warn that digest implementation does not currently have valid tests. Modified: trunk/abcl/src/org/armedbear/lisp/digest.lisp Modified: trunk/abcl/src/org/armedbear/lisp/digest.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/digest.lisp Thu Dec 6 13:20:34 2012 (r14305) +++ trunk/abcl/src/org/armedbear/lisp/digest.lisp Fri Dec 7 02:38:15 2012 (r14306) @@ -42,6 +42,7 @@ ;;;; bytes, running digest over that concatentation (defun sha256 (&rest paths-or-strings) ;;; XXX more than one arg is very broken. "Returned ASCIIfied representation of SHA256 digest of byte-based resource at PATHS-OR-STRINGs." + (warn "Unaudited computatation of cryptograhpical digest initiated.") ;; TODO Need tests with some tool for verification (let ((first (first paths-or-strings)) (rest (rest paths-or-strings))) (concatenate 'string From mevenson at common-lisp.net Fri Dec 7 10:44:10 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 02:44:10 -0800 Subject: [armedbear-cvs] r14307 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Fri Dec 7 02:44:09 2012 New Revision: 14307 Log: digest: spellcheck emitted warning. Modified: trunk/abcl/src/org/armedbear/lisp/digest.lisp Modified: trunk/abcl/src/org/armedbear/lisp/digest.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/digest.lisp Fri Dec 7 02:38:15 2012 (r14306) +++ trunk/abcl/src/org/armedbear/lisp/digest.lisp Fri Dec 7 02:44:09 2012 (r14307) @@ -42,7 +42,7 @@ ;;;; bytes, running digest over that concatentation (defun sha256 (&rest paths-or-strings) ;;; XXX more than one arg is very broken. "Returned ASCIIfied representation of SHA256 digest of byte-based resource at PATHS-OR-STRINGs." - (warn "Unaudited computatation of cryptograhpical digest initiated.") ;; TODO Need tests with some tool for verification + (warn "Unaudited computatation of cryptographic digest initiated.") ;; TODO Need tests with some tool for verification (let ((first (first paths-or-strings)) (rest (rest paths-or-strings))) (concatenate 'string From mevenson at common-lisp.net Fri Dec 7 10:53:49 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 02:53:49 -0800 Subject: [armedbear-cvs] r14308 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Fri Dec 7 02:53:49 2012 New Revision: 14308 Log: Backport r14307 | mevenson | 2012-12-07 11:44:09 +0100 (Fri, 07 Dec 2012) | 1 line Backport r14306 | mevenson | 2012-12-07 11:38:15 +0100 (Fri, 07 Dec 2012) | 1 line digest: spellcheck emitted warning. digest: warn that digest implementation does not currently have valid tests. Modified: branches/1.1.x/src/org/armedbear/lisp/digest.lisp Modified: branches/1.1.x/src/org/armedbear/lisp/digest.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/digest.lisp Fri Dec 7 02:44:09 2012 (r14307) +++ branches/1.1.x/src/org/armedbear/lisp/digest.lisp Fri Dec 7 02:53:49 2012 (r14308) @@ -42,6 +42,7 @@ ;;;; bytes, running digest over that concatentation (defun sha256 (&rest paths-or-strings) ;;; XXX more than one arg is very broken. "Returned ASCIIfied representation of SHA256 digest of byte-based resource at PATHS-OR-STRINGs." + (warn "Unaudited computatation of cryptographic digest initiated.") ;; TODO Need tests with some tool for verification (let ((first (first paths-or-strings)) (rest (rest paths-or-strings))) (concatenate 'string From mevenson at common-lisp.net Fri Dec 7 12:18:56 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 04:18:56 -0800 Subject: [armedbear-cvs] r14309 - tags/1.1.0 Message-ID: Author: mevenson Date: Fri Dec 7 04:18:55 2012 New Revision: 14309 Log: abcl-1.1.0: create empty collection to hold branch, which has one less level of indirection that we wish to fix. Added: tags/1.1.0/ From mevenson at common-lisp.net Fri Dec 7 12:23:37 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 04:23:37 -0800 Subject: [armedbear-cvs] r14310 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Fri Dec 7 04:23:36 2012 New Revision: 14310 Log: 1.1.0: Initiate version bump in minimal manner. Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Fri Dec 7 04:18:55 2012 (r14309) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Fri Dec 7 04:23:36 2012 (r14310) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0-rc-3"; + static final String baseVersion = "1.1.0"; static void init() { try { From mevenson at common-lisp.net Fri Dec 7 12:23:39 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 04:23:39 -0800 Subject: [armedbear-cvs] r14311 - in branches/1.1.x: . contrib contrib/abcl-asdf contrib/jss doc/manual examples Message-ID: Author: mevenson Date: Fri Dec 7 04:23:38 2012 New Revision: 14311 Log: 1.1.0: Final annotation changes for abcl-1.1.0. Semi-groveled from previous commit. Modified: branches/1.1.x/README branches/1.1.x/abcl.asd branches/1.1.x/abcl.rdf branches/1.1.x/build.xml branches/1.1.x/contrib/abcl-asdf/README.markdown branches/1.1.x/contrib/jss/README.markdown branches/1.1.x/contrib/jss/jss.asd branches/1.1.x/contrib/pom.xml branches/1.1.x/doc/manual/abcl.tex branches/1.1.x/examples/README branches/1.1.x/maven-release.txt branches/1.1.x/pom.xml Modified: branches/1.1.x/README ============================================================================== --- branches/1.1.x/README Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/README Fri Dec 7 04:23:38 2012 (r14311) @@ -176,12 +176,16 @@ BUGS ==== +ABCL now has a manual stating its conformance to the ANSI standard, +providing a compliant and practical Common Lisp implementation. + ABCL is a conforming ANSI Common Lisp implementation. Any other behavior should be reported as a bug. -ABCL now has a manual stating its conformance to the ANSI standard, -providing a compliant and practical Common Lisp implementation. -Because of this, +The secondary and tertiary values of CL:LISP-IMPLEMENTATION-VERSION +provide additional information about the exact JVM runtime which ABCL +finds itself hosted upon which may be especially useful when +discussing and tracking issues on the Internet. ### Tests Modified: branches/1.1.x/abcl.asd ============================================================================== --- branches/1.1.x/abcl.asd Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/abcl.asd Fri Dec 7 04:23:38 2012 (r14311) @@ -114,8 +114,8 @@ (funcall (intern (symbol-name 'run) :abcl.test.ansi) :compile-tests nil)) -(defsystem :ansi-compiled :version "1.2" - :description "Test ABCL with the compiled ANSI tests." +(defsystem :ansi-compiled :version "1.2.0" + :description "Test ABCL with the compiled ANSI tests. <> asdf:defsystem ." :depends-on (ansi-rt) :components ((:module ansi-tests :pathname "test/lisp/ansi/" :components @@ -130,7 +130,8 @@ :compile-tests t)) (defsystem :cl-bench - :description "Test ABCL with CL-BENCH." + :description "Test ABCL with CL-BENCH. <> asdf:defsystem ." + :version "1.0.0" :components ((:module cl-bench-package :pathname "../cl-bench/" :components ((:file "defpackage"))) (:module cl-bench-wrapper :pathname "test/lisp/cl-bench/" Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/abcl.rdf Fri Dec 7 04:23:38 2012 (r14311) @@ -1,6 +1,10 @@ # -*- Mode: n3 -*- - + at prefix dc: . @prefix abcl: . + +<> dc:version "abcl-1.1.0" . +<> abcl:release "rc-3" . + <> abcl:is "W3C Turtle RDF serializations format" ; abcl:tag . @@ -20,25 +24,18 @@ dc:identifier ; doap:language "Common Lisp" ; dc:created "01-JAN-2004" ; - dc:modified "06-DEC-2012" ; + dc:modified "07-DEC-2012" ; -<<<<<<< local -<> dc:version "abcl-1.1.0" . -<> a abcl:releaseCandidate "rc-3" . -======= dc:version "abcl-1.1.0" ; abcl:releaseCandidate "rc-3" . ->>>>>>> other -<<<<<<< local -<> rdfs:seeAlso . -<> rdfs:seeAlso . -<> rdfs:seeAlso . -======= -<> - rdfs:seeAlso ; - rdfs:seeAlso . ->>>>>>> other +<> rdfs:seeAlso [ + a rdf:Alt ; + rdf:_1 ; + rdf:_2 ; + rdf:_3 +] . + @prefix dc: . @@ -125,6 +122,22 @@ , . -<> doap:packages - abcl:abcl-contrib ; - rdfs:seeAlso . +<> doap:packages [ + a rdf:Alt; + rdf:_1 abcl:abcl ; + rdf:_2 abcl:abcl-contrib ; + rdf:_3 abcl:asdf-install ; + rdf:_4 abcl:jss ; + rdf:_5 abcl:jfli ; + rdf:_6 abcl:abcl-asdf ; + rdf:_7 abcl:jna ; + rdf:_8 abcl:asdf-jar +] . + +abcl:abcl-contrib + dc:identifier ; + rdfs:seeAlso . + +abcl:asdf-install + dc:identifier ; + rdfs:seeAlso . Modified: branches/1.1.x/build.xml ============================================================================== --- branches/1.1.x/build.xml Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/build.xml Fri Dec 7 04:23:38 2012 (r14311) @@ -650,6 +650,8 @@ + + Modified: branches/1.1.x/contrib/abcl-asdf/README.markdown ============================================================================== --- branches/1.1.x/contrib/abcl-asdf/README.markdown Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/contrib/abcl-asdf/README.markdown Fri Dec 7 04:23:38 2012 (r14311) @@ -161,8 +161,9 @@ #### Colophon - Mark - Created: 2011-01-01 Revised: 2012-12-06 + + <> dc:documentation . + Modified: branches/1.1.x/contrib/jss/README.markdown ============================================================================== --- branches/1.1.x/contrib/jss/README.markdown Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/contrib/jss/README.markdown Fri Dec 7 04:23:38 2012 (r14311) @@ -128,6 +128,15 @@ In the JSS package loaded from [abcl-contrib]() abcl-contrib: http://svn.common-lisp.net/armedbear/trunk/abcl/contrib/ + +# See Also + +An earlier version of this software is used in[lsw2][] Semantic Web +package for dealing with OWL2 ontologies in RDF(S) and other +notations. + +[lsw2]: http://code.google.com/p/lsw2/ + # Colophon Modified: branches/1.1.x/contrib/jss/jss.asd ============================================================================== --- branches/1.1.x/contrib/jss/jss.asd Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/contrib/jss/jss.asd Fri Dec 7 04:23:38 2012 (r14311) @@ -2,7 +2,7 @@ (asdf:defsystem :jss :author "Alan Ruttenberg, Mark Evenson" :version "3.0.5" - :description "<> asdf:defsystem asdf:defsystem + xmlns="http://maven.apache.org/POM/4.0.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" + xmlns:abcl="http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/abcl.rdf"> Modified: branches/1.1.x/doc/manual/abcl.tex ============================================================================== --- branches/1.1.x/doc/manual/abcl.tex Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/doc/manual/abcl.tex Fri Dec 7 04:23:38 2012 (r14311) @@ -10,7 +10,7 @@ \title{Armed Bear Common Lisp User Manual} \date{Version 1.1.0\\ \smallskip -December 5, 2012} +December 7, 2012} \author{Mark Evenson \and Erik H\"{u}lsmann \and Rudolf Schlatte \and Alessio Stalla \and Ville Voutilainen} @@ -22,14 +22,17 @@ \subsection{Preface to the Second Edition} -ABCL 1.1 now contains (A)MOP. We hope you enjoy! --The Mgmt. +\textsc{ABCL} 1.1 now contains (A)MOP. We hope you enjoy! + +--The Mgmt. \chapter{Introduction} -Armed Bear Common Lisp (ABCL) is an implementation of Common Lisp that -runs on the Java Virtual Machine. It compiles Common Lisp to Java 5 -bytecode, providing the following integration methods for interfacing -with Java code and libraries: +Armed Bear Common Lisp (\textsc{ABCL}) is an implementation of Common +Lisp that runs on the Java Virtual Machine. It compiles Common Lisp +to Java 5 bytecode\footnote{The class file version is ``49.0''.} , +providing the following integration methods for interfacing with Java +code and libraries: \begin{itemize} \item Lisp code can create Java objects and call their methods (see Section~\ref{sec:lisp-java}, page~\pageref{sec:lisp-java}). @@ -42,35 +45,36 @@ of Java interfaces that can be used as listeners for Swing classes and similar. \end{itemize} -ABCL is supported by the Lisp library manager -QuickLisp\footnote{\url{http://quicklisp.org/}} and can run many of the -programs and libraries provided therein out-of-the-box. +\textsc{ABCL} is supported by the Lisp library manager +\textsc{QuickLisp} \footnote{\url{http://quicklisp.org/}} and can run +many of the programs and libraries provided therein out-of-the-box. \section{Conformance} \label{section:conformance} \subsection{ANSI Common Lisp} -\textsc{ABCL} is currently a (non)-conforming ANSI Common Lisp +\textsc{ABCL} is currently a (non)-conforming \textsc{ANSI} Common Lisp implementation due to the following known issues: \begin{itemize} -\item The generic function signatures of the \code{DOCUMENTATION} symbol +\item The generic function signatures of the \code{CL:DOCUMENTATION} symbol do not match the specification. -\item The \code{TIME} form does not return a proper \code{VALUES} +\item The \code{CL:TIME} form does not return a proper \code{CL:VALUES} environment to its caller. -\item When merging pathnames and the defaults point to a \code{JAR-PATHNAME}, - we set the \code{DEVICE} of the result to \code{:UNSPECIFIC} if the pathname to be - be merged does not contain a specified \code{DEVICE}, does not contain a - specified \code{HOST}, does contain a relative \code{DIRECTORY}, and we are - not running on a \textsc{MSFT} Windows platform.\footnote{The intent of this - rather arcane sounding deviation from conformance is so that the - result of a merge won't fill in a DEVICE with the wrong "default +\item When merging pathnames and the defaults point to a + \code{EXT:JAR-PATHNAME}, we set the \code{DEVICE} of the result to + \code{:UNSPECIFIC} if the pathname to be be merged does not contain + a specified \code{DEVICE}, does not contain a specified \code{HOST}, + does contain a relative \code{DIRECTORY}, and we are not running on + a \textsc{MSFT} Windows platform.\footnote{The intent of this rather + arcane sounding deviation from conformance is so that the result + of a merge won't fill in a \code{DEVICE} with the wrong "default device for the host" in the sense of the fourth paragraph in the - CLHS description of MERGE-PATHNAMES (see in \cite{CLHS} the paragraph beginning - "If the PATHNAME explicitly specifies a host and not a device?"). - A future version of the implementation may return to conformance - by using the \code{HOST} value to reflect the type explicitly. - } + \textsc{CLHS} description of MERGE-PATHNAMES (see in \cite{CLHS} + the paragraph beginning "If the PATHNAME explicitly specifies a + host and not a device?"). A future version of the implementation + may return to conformance by using the \code{HOST} value to + reflect the type explicitly. } \end{itemize} @@ -80,11 +84,11 @@ to the Common Lisp HyperSpec~\cite{CLHS}. Clarifications to this point are solicited. -ABCL aims to be be a fully conforming ANSI Common Lisp implementation. -Any other behavior should be reported as a bug. +\textsc{ABCL} aims to be be a fully conforming \textsc{ANSI} Common +Lisp implementation. Any other behavior should be reported as a bug. \subsection{Contemporary Common Lisp} -In addition to ANSI conformance, \textsc{ABCL} strives to implement +In addition to \textsc{ANSI} conformance, \textsc{ABCL} strives to implement features expected of a contemporary Common Lisp, i.e. a Lisp of the post-2005 Renaissance. @@ -97,26 +101,29 @@ in a given call frame, and the inability to resume a halted computation at an arbitrarily selected call frame. \item Incomplete streams abstraction, in that \textsc{ABCL} needs - suitable abstraction between ANSI and Gray streams. The streams could - be optimized to the JVM NIO abstractions at great profit for binary - byte-level manipulations. -\item Incomplete documentation (missing docstrings from exported symbols - and the draft status of this user manual). + suitable abstraction between \textsc{ANSI} and Gray + streams. \footnote{The streams could be optimized to the + \textsc{JVM} NIO \cite{nio} abstractions at great profit for + binary byte-level manipulations.} +\item Incomplete documentation (missing docstrings from exported + symbols and the draft status of this user manual). \end{itemize} \section{License} -ABCL is licensed under the terms of the GPL v2 of June 1991 with the -``classpath-exception'' (see the file \texttt{COPYING} in the source -distribution for the license, term 13 in the same file for the classpath -exception). This license broadly means that you must distribute the -sources to ABCL, including any changes you make, together with a program -that includes ABCL, but that you are not required to distribute the -sources of the whole program. Submitting your changes upstream to the -ABCL development team is actively encouraged and very much appreciated, -of course. +\textsc{ABCL} is licensed under the terms of the \textsc{GPL} v2 of +June 1991 with the ``classpath-exception'' (see the file +\texttt{COPYING} in the source distribution \footnote{See + \url{http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/COPYING}} for +the license, term 13 in the same file for the classpath exception). +This license broadly means that you must distribute the sources to +ABCL, including any changes you make, together with a program that +includes ABCL, but that you are not required to distribute the sources +of the whole program. Submitting your changes upstream to the ABCL +development team is actively encouraged and very much appreciated, of +course. \section{Contributors} @@ -130,13 +137,17 @@ \end{itemize} + \chapter{Running ABCL} + \textsc{ABCL} is packaged as a single jar file usually named either \texttt{abcl.jar} or possibly something like \texttt{abcl-1.1.0.jar} if using a versioned package on the local filesystem from your system vendor. This jar file can be executed from the command line to obtain a -REPL\footnote{Read-Eval Print Loop, a Lisp command-line}, viz: +\textsc{REPL}\footnote{Read-Eval Print Loop, a Lisp command-line}, viz: + +\index{REPL} \begin{listing-shell} cmd$ java -jar abcl.jar @@ -156,13 +167,15 @@ \end{listing-shell}%$ Probably the easiest way of setting up an editing environment using the -Emacs editor is to use QuickLisp and follow the instructions at +\textsc{Emacs} editor is to use \textsc{QuickLisp} and follow the instructions at \url{http://www.quicklisp.org/beta/#slime}. \section{Options} ABCL supports the following command line options: +\index{Command Line Options} + \begin{description} \item[\texttt{ --help}] displays a help message. \item[\texttt{ --noinform}] Suppresses the printing of startup information and banner. @@ -173,7 +186,7 @@ \item[\texttt{ --load-system-file FILE}] loads the system file FILE before initializing the REPL. \item[\texttt{ --batch}] evaluates forms specified by arguments and in the initialization file \verb+~/.abclrc+, and then exits without - starting a REPL. + starting a \textsc{REPL}. \end{description} All of the command line arguments following the occurrence of \verb+--+ @@ -892,7 +905,7 @@ will load and execute the Quicklisp setup code. The implementation currently breaks \textsc{ANSI} conformance by allowing the -types able to be \code{CL:READ} for the \var{DEVICE} to return a possible \code{CONS} of +types able to be \code{CL:READ} for the \code{DEVICE} to return a possible \code{CONS} of \code{CL:PATHNAME} objects. %% citation from CLHS needed. In order to ``smooth over'' the bit about types being \code{CL:READ} from @@ -959,14 +972,14 @@ \section{Extensible Sequences} -See Rhodes2007 \cite{RHODES2007} for the design. - The SEQUENCE package fully implements Christopher Rhodes' proposal for extensible sequences. These user extensible sequences are used directly in \code{java-collections.lisp} provide these CLOS abstractions on the standard Java collection classes as defined by the \code{java.util.List} contract. +See Rhodes2007 \cite{RHODES2007} for the design. + %% an Example of using java.util.Lisp in Lisp would be nice This extension is not automatically loaded by the implementation. It @@ -987,15 +1000,16 @@ required. Note that \code{(require 'java-collections)} must be issued before -\code{java.util.List} or any subclass is used as a specializer in a CLOS +\code{java.util.List} or any subclass is used as a specializer in a \textsc{CLOS} method definition (see the section below). \section{Extensions to CLOS} \subsection{Metaobject Protocol} -ABCL implements the metaobject protocol for CLOS as specified in AMOP. -The symbols are exported from the package \code{MOP}. +\textsc{ABCL} implements the metaobject protocol for \textsc{CLOS} as +specified in \textsc{(A)MOP}. The symbols are exported from the +package \code{MOP}. \subsection{Specializing on Java classes} @@ -1056,7 +1070,8 @@ \begin{description} - \item{\code{ASDF}} Loads the \textsc{ASDF} implementation shipped + \item{\code{ASDF}} + Loads the \textsc{ASDF} implementation shipped with the implementation. After \textsc{ASDF} has been loaded in this manner, symbols passed to \code{CL:REQUIRE} which are otherwise unresolved, are passed to ASDF for a chance for @@ -1065,27 +1080,36 @@ 'cl-ppcre)} is equivalent to \code{(asdf:load-system 'cl-ppcre)}. - \item{\code{ABCL-CONTRIB}} Locates and pushes the toplevel contents of + \item{\code{ABCL-CONTRIB}} + Locates and pushes the toplevel contents of ``abcl-contrib.jar'' into the \textsc{ASDF} central registry. \begin{enumerate} - \item \code{abcl-asdf} - Functions for loading JVM artifacts dynamically, hooking into ASDF 2 objects where possible. - \item \code{asdf-jar} Package addressable JVM artifacts via + \item \code{abcl-asdf} + Functions for loading JVM artifacts + dynamically, hooking into ASDF 2 objects where possible. + \item \code{asdf-jar} + Package addressable JVM artifacts via \code{abcl-asdf} descriptions as a single binary artifact including recursive dependencies. - \item \code{mvn} - These systems name common JVM artifacts from the distributed pom.xml graph of Maven Aether: + \item \code{mvn} + These systems name common JVM artifacts from + the distributed pom.xml graph of Maven Aether: \begin{enumerate} - \item \code{jna} Dynamically load 'jna.jar' version 3.5.1 + \item \code{jna} + Dynamically load 'jna.jar' version 3.5.1 from the network \footnote{This loading can be inhibited if, at runtime, the Java class corresponding ``:classname'' clause of the system defition is present.} \end{enumerate} - \item \code{quicklisp-abcl} (Not working) boot a local Quicklisp - installation via the ASDF:IRI type introduced bia ABCL-ASDF. - - \end{enumerate} + \item \code{quicklisp-abcl} Boot a local Quicklisp installation + via the ASDF:IRI type introduced bia ABCL-ASDF. + +\begin{listing-lisp} +CL-USER> (asdf:load-system :quicklisp-abcl :force t) +\end{listing-lisp} + +\end{enumerate} \end{description} @@ -1095,7 +1119,7 @@ passed to \code{CL:REQUIRE} and returns a non-\code{NIL} value if it can successful resolve the symbol. -\section{JSS optionally extends the Reader} +\section{JSS extension of the Reader by SHARPSIGN-DOUBLE-QUOTE} The JSS contrib consitutes an additional, optional extension to the reader in the definition of the \code{SHARPSIGN-DOUBLE-QUOTE} @@ -1104,12 +1128,12 @@ \section{ASDF} -asdf-2.26.6 (see \cite{asdf}) is packaged as core component of ABCL, -but not initialized by default, as it relies on the CLOS subsystem +asdf-2.26.6 (see \cite{asdf}) is packaged as core component of \textsc{ABCL}, +but not initialized by default, as it relies on the \textsc{CLOS} subsystem which can take a bit of time to start \footnote{While this time is ``merely'' on the order of seconds for contemporary 2011 machines, for applications that need to initialize quickly, for example a web - server, this time might be unnecessarily long}. The packaged ASDF + server, this time might be unnecessarily long}. The packaged \textsc{ASDF} may be loaded by the \textsc{ANSI} \code{REQUIRE} mechanism as follows: @@ -1119,7 +1143,7 @@ \chapter{Contrib} -The ABCL contrib is packaged as a separate jar archive usually named +The \textsc{ABCL} contrib is packaged as a separate jar archive usually named \code{abcl-contrib.jar} or possibly something like \code{abcl-contrib-1.1.0.jar}. The contrib jar is not loaded by the implementation by default, and must be first intialized by the @@ -1207,15 +1231,20 @@ Notice that all recursive dependencies have been located and installed locally from the network as well. +More extensive documentations and examples can be found at +\url{http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/contrib/abcl-asdf/README.markdown}. + + \section{asdf-jar} -The asdf-jar contrib provides a system for packaging ASDF systems into -jar archives for ABCL. Given a running ABCL image with loadable ASDF -systems the code in this package will recursively package all the -required source and fasls in a jar archive. +The asdf-jar contrib provides a system for packaging \textsc{ASDF} +systems into jar archives for \textsc{ABCL}. Given a running +\textsc{ABCL} image with loadable \textsc{ASDF} systems the code in +this package will recursively package all the required source and +fasls in a jar archive. The documentation for this contrib can be found at -\url{http://svn.common-lisp.net/armedbear/trunk/abcl/contrib/asdf-jar/README.markdown}. +\url{http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/contrib/asdf-jar/README.markdown}. \section{jss} @@ -1251,13 +1280,16 @@ \end{listing-lisp} %$ <-- un-confuse Emacs font-lock Some more information on jss can be found in its documentation at -\url{http://svn.common-lisp.net/armedbear/trunk/abcl/contrib/jss/README.markdown} +\url{http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/contrib/jss/README.markdown}. \section{jfli} \label{section:jfli} The contrib contains a pure-Java version of JFLI. +\url{http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/contrib/jfli/README}. + + \section{asdf-install} The asdf-install contrib provides an implementation of ASDF-INSTALL. @@ -1270,7 +1302,11 @@ stashing \textsc{ABCL} specific system definitions for convenient access. +\url{http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/contrib/asdf-install/README}. + + \chapter{History} +\index{History} \textsc{ABCL} was originally the extension language for the J editor, which was started in 1998 by Peter Graves. Sometime in 2003, a whole lot of @@ -1291,7 +1327,7 @@ released abcl-1.0.0. We released abcl-1.0.1 as a maintainence release on January 10, 2012. -In December 2012, we revised the implementation by adding (A)MOP +In December 2012, we revised the implementation by adding \textsc{(A)MOP} with the release of abcl-1.1.0. \appendix @@ -1303,7 +1339,7 @@ \chapter{The SYSTEM Dictionary} The public interfaces in this package are subject to change with -ABCL 1.2. +\textsc{ABCL} 1.2. \include{system} @@ -1313,7 +1349,6 @@ \include{jss} - \bibliography{abcl} \bibliographystyle{alpha} Modified: branches/1.1.x/examples/README ============================================================================== --- branches/1.1.x/examples/README Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/examples/README Fri Dec 7 04:23:38 2012 (r14311) @@ -49,4 +49,4 @@ misc - Code snippets currently without documentation. \ No newline at end of file + Code snippets currently without documentation. Modified: branches/1.1.x/maven-release.txt ============================================================================== --- branches/1.1.x/maven-release.txt Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/maven-release.txt Fri Dec 7 04:23:38 2012 (r14311) @@ -1,5 +1,9 @@ # Releasing ABCL on Sonatype's OSS Maven repository - instructions # +# WARNING: and are not currently valid descriptions of how to build ABCL. +# +# TODO Use the Maven Ant plugin to drive the standard build process. +# # This assumes your settings.xml (/etc/maven2/settings.xml for Ubuntu-packaged Maven) contains something like this in its section: # # Modified: branches/1.1.x/pom.xml ============================================================================== --- branches/1.1.x/pom.xml Fri Dec 7 04:23:36 2012 (r14310) +++ branches/1.1.x/pom.xml Fri Dec 7 04:23:38 2012 (r14311) @@ -1,7 +1,8 @@ + xmlns="http://maven.apache.org/POM/4.0.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" + xmlns:abcl="http://svn.common-lisp.net/armedbear/tags/1.1.0/abcl/abcl.rdf"> From mevenson at common-lisp.net Fri Dec 7 12:27:17 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 04:27:17 -0800 Subject: [armedbear-cvs] r14312 - tags/1.1.0/abcl Message-ID: Author: mevenson Date: Fri Dec 7 04:27:16 2012 New Revision: 14312 Log: 1.1.0: Tag ABCL 1.1.0. Added: tags/1.1.0/abcl/ - copied from r14311, branches/1.1.x/ From rschlatte at common-lisp.net Fri Dec 7 14:06:36 2012 From: rschlatte at common-lisp.net (rschlatte at common-lisp.net) Date: Fri, 07 Dec 2012 06:06:36 -0800 Subject: [armedbear-cvs] r14313 - trunk/abcl/contrib/jss Message-ID: Author: rschlatte Date: Fri Dec 7 06:06:35 2012 New Revision: 14313 Log: Fix loading of jss Modified: trunk/abcl/contrib/jss/jss.asd Modified: trunk/abcl/contrib/jss/jss.asd ============================================================================== --- trunk/abcl/contrib/jss/jss.asd Fri Dec 7 04:27:16 2012 (r14312) +++ trunk/abcl/contrib/jss/jss.asd Fri Dec 7 06:06:35 2012 (r14313) @@ -2,7 +2,7 @@ (asdf:defsystem :jss :author "Alan Ruttenberg, Mark Evenson" :version "3.0.5" - :description "<> asdf:defsystem asdf:defsystem Author: mevenson Date: Fri Dec 7 08:17:06 2012 New Revision: 14314 Log: changes: update trunk with 1.1.0 changes. Needs formatting, linking. Modified: trunk/abcl/CHANGES Modified: trunk/abcl/CHANGES ============================================================================== --- trunk/abcl/CHANGES Fri Dec 7 06:06:35 2012 (r14313) +++ trunk/abcl/CHANGES Fri Dec 7 08:17:06 2012 (r14314) @@ -4,10 +4,15 @@ (unreleased) +Version 1.1.1 +============= +svn.uri=:"http//common-lisp.net/project/armedbear/branches/1.1.x/" +(unreleased) + Version 1.1.0 ============= -svn.uri=:"http//common-lisp.net/project/armedbear/svn/trunk/abcl/" -(22 November 2012) +svn.uri=:"http//common-lisp.net/project/armedbear/svn/tags/1.1.0/abcl/" +(07 December 2012) Features -------- @@ -78,8 +83,6 @@ A "captured from the wild" version of what @rich.hickey did before Clojure. - - Changes ------- @@ -124,6 +127,70 @@ * [#187] Better SORT and STABLE-SORT via Jorge Tavares [???] +Issues +------ + + id summary owner type priority component version + 173 Cannot initialize ABCL within .ear mevenson defect blocker interpreter 0.27 + 191 Compiling SHARPSIGN SHARPSIGN form causes stack overflow ehuelsmann defect blocker compiler 1.0 + 196 STABLE-SORT is only stable for lists ehuelsmann defect blocker interpreter 1.0.1 + 216 JVM stack inconsistency triggered by compiler ehuelsmann defect blocker compiler + 221 Stack exhaustion on invocation of function in non-existing package ehuelsmann defect blocker interpreter + 234 ABCL-ASDF mvn errors with VERSION slot unbound mevenson defect blocker ASDF 1.1.0-dev + 237 JNA fails to load blocking CFFI mevenson defect blocker libraries 1.1.0-dev + 249 Problems under Ubuntu mevenson defect blocker libraries 1.1.0-dev + 250 SYS:SHA256 does not compile ehuelsmann defect blocker build 1.1.0-dev + 265 COMPILE-FILE.2 COMPILE-FILE.2A ANSI regression ehuelsmann defect blocker compiler 1.1.0-dev + 268 ABCL-ASDF working with maven-3.0.3 mevenson defect blocker libraries + 269 SLIME cannot browse systems with November Quicklisp somebody defect blocker other 1.1.0-dev + 270 Is BUGS.DEFEGENERIC.1 a valid test? rschlatte defect blocker (A)MOP 1.1.0-dev + 271 ASDF-2.26 changes synced upstream mevenson defect blocker other 1.1.0-dev + 272 DESCRIBE.[14] ANSI regression rschlatte defect blocker (A)MOP 1.1.0-dev + 275 ABCL-CONTRIB still provided if abcl-contrib.jar cannot be located mevenson defect blocker abcl-contrib 1.1.0-dev + 276 defmethod doesn't call add-method rschlatte defect blocker (A)MOP + 277 reinitialize-instance on class metaobjects incorrect rschlatte defect blocker (A)MOP + 113 DEFSTRUCT redefinition can crash ABCL on MAKE-STRUCT mevenson defect critical java + 199 CL:DEFMETHOD fails for &AUX arguments that reference other arguments mevenson defect critical CLOS 1.1.0-dev + 213 ABCL-ASDF breakage on trunk mevenson defect critical interpreter 1.1.0-dev + 215 ABCL-ASDF:RESOLVE should work in more (some?) cases mevenson defect critical other 1.1.0-dev + 229 JSS method resolution failure mevenson defect critical java 1.1.0-dev + 246 CFFI: dynamically generated classes referred from .fasl can not be found after ABCL restart mevenson defect critical libraries 1.1.0-dev + 168 Compilation fails for quicklisp let-plus ehuelsmann defect major compiler + 187 Stack Overflow for Worst-case Vector Sort nobody defect major java 1.0 + 202 ENSURE-GENERIC-FUNCTION assumes LAMBDA-LIST is NIL ehuelsmann defect major (A)MOP 1.1.0-dev + 204 abcl-asdf maybe-parse-mvn ignores version information mevenson defect major libraries 1.1.0-dev + 205 JSS logic for resolving methods a little wonky (could use better diagnostics on why resolution has failed) mevenson defect major libraries 1.0.1 + 207 DECLARE should signal conditions when type declarations are violated ehuelsmann defect major interpreter 1.1.0-dev + 210 Add JFLI to contrib mevenson enhancement major libraries + 217 ANSI tests wont run on Revision 14011: /trunk/abcl rschlatte defect major build 1.1.0-dev + 219 Keyword argument checking for lambda lists is too lenient for ANSI ehuelsmann defect major interpreter 1.0.1 + 220 Lambda list checking too lenient nobody defect major java 1.1.0-dev + 224 Autoloader fails when *read-XXXX* variables bound to non-standard values nobody defect major java 1.1.0-dev + 225 One of the paths in STD-COMPUTE-DISCRIMINATING function not working somebody defect major CLOS + 235 Compiled cl+ssl sources not reloadable mevenson defect major compiler 1.1.0-dev + 241 &rest and &aux can't coexist anymore in lambda lists ehuelsmann defect major compiler + 243 ClassCastException in MAKE-PATHNAME mevenson defect major java 1.1.0-dev + 245 Slots of a class with a custom meta-class are reported as unbound. rschlatte defect major (A)MOP + 247 CFFI: $Proxy3 is not assignable to com.sun.jna.Pointer mevenson defect major libraries 1.1.0-dev + 252 MOP rework broke profiler? ehuelsmann defect major (A)MOP 1.1.0-dev + 254 Cannot load ASDF systems in jar archives with ASDF-BINARY-LOCATIONS-COMPATIBILTY enabled mevenson defect major ASDF 1.1.0-dev + 255 ASDF file encoding specification doesn't work mevenson defect major ASDF 1.1.0-dev + 263 loading systems from abcl-contrib fails if CLASSPATH has a component with wildcard mevenson defect major abcl-contrib 1.1.0-dev + 264 abcl-asdf.asd broken since revision 14233 mevenson defect major abcl-contrib 1.1.0-dev + 60 Implement USE-FAST-CALLS properly ehuelsmann defect minor compiler + 130 "SLIME under Windows has ""extra"" CRLF" mevenson defect minor other + 172 DOCUMENTATION does not work for generic functions ehuelsmann defect minor interpreter 0.27 + 174 Conformance bug in time implementation when using SLIME mevenson defect minor other 0.27 + 175 abcl.release target fails occasionally unassigned defect minor build 0.27 + 189 Compiler fails for 'unsigned-byte type declaration ehuelsmann defect minor compiler 1.0 + 201 &WHOLE broken in DEFINE-METHOD-COMBINATION somebody defect minor CLOS 1.1.0-dev + 206 COMPILER-UNSUPPORTED-FEATURE-ERROR is derived from CONDITION, rather than from ERROR ehuelsmann defect minor compiler + 208 "Files loaded via ""--load "" on the command line have no pathname defaults" ehuelsmann defect minor interpreter 1.1.0-dev + 211 closure-common fails to load correctly after compilation mevenson defect minor compiler 1.1.0-dev + 214 Stack overflow when compiler macro with fallback is triggered ehuelsmann defect minor compiler 1.0.1 + 232 Allow wrapper script to reference install directory instead of build directory mevenson enhancement minor build 1.1.0-dev + 192 ASDF::IMPLEMENTATION-IDENTIFIER contains ABCL build environment identifier mevenson defect trivial ASDF 1.0.1 + 195 prompt is displayed twice when evaluating NIL at the REPL vvoutilainen defect trivial interpreter Version 1.0.1 From mevenson at common-lisp.net Fri Dec 7 16:46:22 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 08:46:22 -0800 Subject: [armedbear-cvs] r14315 - trunk/abcl Message-ID: Author: mevenson Date: Fri Dec 7 08:46:21 2012 New Revision: 14315 Log: changes: note correst ASDF version which we ship. Modified: trunk/abcl/CHANGES Modified: trunk/abcl/CHANGES ============================================================================== --- trunk/abcl/CHANGES Fri Dec 7 08:17:06 2012 (r14314) +++ trunk/abcl/CHANGES Fri Dec 7 08:46:21 2012 (r14315) @@ -57,8 +57,9 @@ * ASDF - ** Stock ASDF-2.26 with conditional patches for the URL-PATHAME and - JAR-PATHNAME implementation extensions to ANSI. + ** Stock ASDF-2.26.6 which includes #+abcl conditional patches + for the URL-PATHAME and JAR-PATHNAME implementation extensions + to ANSI. * ABCL-CONTRIB From mevenson at common-lisp.net Fri Dec 7 16:48:21 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 08:48:21 -0800 Subject: [armedbear-cvs] r14316 - trunk/abcl Message-ID: Author: mevenson Date: Fri Dec 7 08:48:20 2012 New Revision: 14316 Log: rdf: correct release label. Modified: trunk/abcl/abcl.rdf Modified: trunk/abcl/abcl.rdf ============================================================================== --- trunk/abcl/abcl.rdf Fri Dec 7 08:46:21 2012 (r14315) +++ trunk/abcl/abcl.rdf Fri Dec 7 08:48:20 2012 (r14316) @@ -21,9 +21,8 @@ doap:language "Common Lisp" ; dc:created "01-JAN-2004" ; dc:modified "06-DEC-2012" ; - -<> dc:version "abcl-1.2.0" . -<> a abcl:release "dev" . + dc:version "abcl-1.2.0" ; + abcl:release "dev" . <> rdfs:seeAlso ; From mevenson at common-lisp.net Fri Dec 7 16:51:20 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 08:51:20 -0800 Subject: [armedbear-cvs] r14317 - trunk/abcl Message-ID: Author: mevenson Date: Fri Dec 7 08:51:19 2012 New Revision: 14317 Log: 1.1.0: link to svn release tag. Modified: trunk/abcl/abcl.rdf Modified: trunk/abcl/abcl.rdf ============================================================================== --- trunk/abcl/abcl.rdf Fri Dec 7 08:48:20 2012 (r14316) +++ trunk/abcl/abcl.rdf Fri Dec 7 08:51:19 2012 (r14317) @@ -20,7 +20,7 @@ dc:identifier ; doap:language "Common Lisp" ; dc:created "01-JAN-2004" ; - dc:modified "06-DEC-2012" ; + dc:modified "07-DEC-2012" ; dc:version "abcl-1.2.0" ; abcl:release "dev" . @@ -112,7 +112,9 @@ doap:Project rdfs:seeAlso , , - . + , + , + . <> doap:packages abcl:abcl-contrib ; From mevenson at common-lisp.net Fri Dec 7 16:58:58 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 08:58:58 -0800 Subject: [armedbear-cvs] r14318 - trunk/abcl Message-ID: Author: mevenson Date: Fri Dec 7 08:58:57 2012 New Revision: 14318 Log: rdf: Note abcl-1.0.1.jar as a known previous version of the implementation. Modified: trunk/abcl/abcl.rdf Modified: trunk/abcl/abcl.rdf ============================================================================== --- trunk/abcl/abcl.rdf Fri Dec 7 08:51:19 2012 (r14317) +++ trunk/abcl/abcl.rdf Fri Dec 7 08:58:57 2012 (r14318) @@ -90,8 +90,9 @@ dc:source abcl:tag ; dc:Software [ a rdf:Bag; - rdf:_1 ; - rdf:_2 + rdf:_1 ; + rdf:_2 ; + rdf:_3 ] ; ] . @@ -116,6 +117,7 @@ , . + <> doap:packages abcl:abcl-contrib ; rdfs:seeAlso . From mevenson at common-lisp.net Fri Dec 7 17:04:39 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 09:04:39 -0800 Subject: [armedbear-cvs] r14319 - public_html/releases/1.1.0 Message-ID: Author: mevenson Date: Fri Dec 7 09:04:37 2012 New Revision: 14319 Log: 1.1.0: Create collection to abcl-1.1.0 artifacts. Added: public_html/releases/1.1.0/ From mevenson at common-lisp.net Fri Dec 7 17:15:51 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Fri, 07 Dec 2012 09:15:51 -0800 Subject: [armedbear-cvs] r14320 - public_html/releases/1.1.0 Message-ID: Author: mevenson Date: Fri Dec 7 09:15:47 2012 New Revision: 14320 Log: 1.1.0: commit binary artifacts. Checksums to follow. Added: public_html/releases/1.1.0/abcl-1.1.0.jar (contents, props changed) public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz (contents, props changed) public_html/releases/1.1.0/abcl-bin-1.1.0.zip (contents, props changed) public_html/releases/1.1.0/abcl-contrib-1.1.0.jar (contents, props changed) public_html/releases/1.1.0/abcl-contrib.jar (contents, props changed) public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz (contents, props changed) public_html/releases/1.1.0/abcl-src-1.1.0.zip (contents, props changed) public_html/releases/1.1.0/abcl.jar (contents, props changed) Added: public_html/releases/1.1.0/abcl-1.1.0.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0/abcl-bin-1.1.0.zip ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0/abcl-contrib-1.1.0.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0/abcl-contrib.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0/abcl-src-1.1.0.zip ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0/abcl.jar ============================================================================== Binary file. No diff available. From mevenson at common-lisp.net Sun Dec 9 08:49:46 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 09 Dec 2012 00:49:46 -0800 Subject: [armedbear-cvs] r14321 - public_html/releases/1.1.0 Message-ID: Author: mevenson Date: Sun Dec 9 00:49:44 2012 New Revision: 14321 Log: 1.1.0: Cryptographic signatures by . Added: public_html/releases/1.1.0/abcl-1.1.0.jar.asc public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz.asc public_html/releases/1.1.0/abcl-bin-1.1.0.zip.asc public_html/releases/1.1.0/abcl-contrib-1.1.0.jar.asc public_html/releases/1.1.0/abcl-contrib.jar.asc public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz.asc public_html/releases/1.1.0/abcl-src-1.1.0.zip.asc public_html/releases/1.1.0/abcl.jar.asc Added: public_html/releases/1.1.0/abcl-1.1.0.jar.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl-1.1.0.jar.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDES2YACgkQKpZBEE2xdz0cyQD/W8g0bLWE33ZkYKcXZxVFdlMH +yndhOQsZKR9eO05adNgA/0HznUaZRH8+IURM5YTZPbQqfEnRR35F66nnMtIeJqwI +=6l9B +-----END PGP SIGNATURE----- Added: public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDET0EACgkQKpZBEE2xdz1ShgEAgOfzbfCAFmQDcA0Rdg3WY7iS +ZO/+u9AYmtjybLXGI6IA/2Aa954ZkL13qn20ZqTQ1LS8Mlc1b7x+o+l9WiKFoWF2 +=WLqk +-----END PGP SIGNATURE----- Added: public_html/releases/1.1.0/abcl-bin-1.1.0.zip.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl-bin-1.1.0.zip.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDET6cACgkQKpZBEE2xdz3bMAD+MEIqMBCdDtLJ4aqsMEbzHEqP +QMhm4d6XsKBDlbHWmLcBAIPpQ++9SuNeCmhE1h1udfX9uaGbO0M8YrDT0JPPzgXG +=0WNc +-----END PGP SIGNATURE----- Added: public_html/releases/1.1.0/abcl-contrib-1.1.0.jar.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl-contrib-1.1.0.jar.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDEUBEACgkQKpZBEE2xdz2NjgD9HIv4EtXK+v+Q7E+KPSBwMS3I +UOpCDWkKaHO/WrvyhtYBAJt/IInEbAXmXKQkInER0eziIDZE5Zoz64eVeq04Z+Lt +=Xfo9 +-----END PGP SIGNATURE----- Added: public_html/releases/1.1.0/abcl-contrib.jar.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl-contrib.jar.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDET+0ACgkQKpZBEE2xdz3Q1wEAgQbv3UxSofNmzkzTJVPet07s +M9io7+MogW/JEFeh1jUA/1N9wyl2jjI3O1BhCZr0RP2+kPOEia76aWN1/8lriIuG +=9iqT +-----END PGP SIGNATURE----- Added: public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDETqAACgkQKpZBEE2xdz1RZgD7BfEM30aDObWftqydIDiR93/e +f5L8oZmzdK4fT7OEluYA/i95aVmwPNoKicNgDsmXs3FHJtqGdilI3Fqs69wmXRsv +=DuaG +-----END PGP SIGNATURE----- Added: public_html/releases/1.1.0/abcl-src-1.1.0.zip.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl-src-1.1.0.zip.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDETy8ACgkQKpZBEE2xdz18lAEAmR3FsDcq7IBlHJ/Ksu9yajuN +cak1IlpAjYOfh4g7QCEA/1eVXraFMEFeLcvsM88jPGq1ARDUaHMfYX5AmOkpXHWT +=8RVl +-----END PGP SIGNATURE----- Added: public_html/releases/1.1.0/abcl.jar.asc ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/releases/1.1.0/abcl.jar.asc Sun Dec 9 00:49:44 2012 (r14321) @@ -0,0 +1,7 @@ +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.4.12 (Darwin) + +iF4EABEIAAYFAlDET38ACgkQKpZBEE2xdz2dlgD/ZPLDe4HT+FfZjqfIjo4ngoM9 +bZwhvmio4BkPA3fn5v0A+wXRtOyu5ZRIyN0G2QLXgxEQm8HHU0Xm8npalococAzH +=b4BS +-----END PGP SIGNATURE----- From mevenson at common-lisp.net Sun Dec 9 08:50:52 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 09 Dec 2012 00:50:52 -0800 Subject: [armedbear-cvs] r14322 - public_html Message-ID: Author: mevenson Date: Sun Dec 9 00:50:50 2012 New Revision: 14322 Log: 1.1.0: Change homepage download links. Modified: public_html/index.shtml Modified: public_html/index.shtml ============================================================================== --- public_html/index.shtml Sun Dec 9 00:49:44 2012 (r14321) +++ public_html/index.shtml Sun Dec 9 00:50:50 2012 (r14322) @@ -26,31 +26,31 @@ Binary - abcl-bin-1.0.1.tar.gz - (pgp) + abcl-bin-1.1.0.tar.gz + (pgp) - abcl-bin-1.0.1.zip - (pgp) + abcl-bin-1.1.0.zip + (pgp) - abcl-contrib-1.0.1.jar - (pgp) + abcl-contrib-1.1.0.jar + (pgp) Source - abcl-src-1.0.1.tar.gz - (pgp) + abcl-src-1.1.0.tar.gz + (pgp) - abcl-src-1.0.1.zip - (pgp) + abcl-src-1.1.0.zip + (pgp) - + abcl-contrib source From mevenson at common-lisp.net Sun Dec 9 10:08:48 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 09 Dec 2012 02:08:48 -0800 Subject: [armedbear-cvs] r14323 - public_html Message-ID: Author: mevenson Date: Sun Dec 9 02:08:26 2012 New Revision: 14323 Log: 1.1.0: Start publishing release notes. TODO: complete when December 2012 Quicklisp is released. Added: public_html/release-notes-1.1.0.shtml Modified: public_html/left-menu Modified: public_html/left-menu ============================================================================== --- public_html/left-menu Sun Dec 9 00:50:50 2012 (r14322) +++ public_html/left-menu Sun Dec 9 02:08:26 2012 (r14323) @@ -10,7 +10,7 @@ Testimonials
  • - Release notes + Release notes
  • Paid support Added: public_html/release-notes-1.1.0.shtml ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ public_html/release-notes-1.1.0.shtml Sun Dec 9 02:08:26 2012 (r14323) @@ -0,0 +1,67 @@ + + + + + ABCL - Release notes v1.1.0 + + + + + + + +
    +

    ABCL - Release notes for version v1.1.0

    +
    + + + +
    + +

    Most notable changes in ABCL 1.1.0

    + +

    + abcl-1.1.0 is a major release. +

    + +
    +
    (A)MOP
    + +
    The implementation now contains (A)MOP.
    + +
    ASDF
    + +
    The ASDF included with the implementation has been updated to 2.26.6.
    + +
    User Manual
    +
    The User + manuala now contains more polished formating from docstring + groveling, an index of symbols, and additional enhancements. +
    + + + +
    + +

    The distribution contains a more detailed documentation of CHANGES.

    + + +

    Release notes for older releases of ABCL.

    + +
    + +
    +
    +

    ABCL is Armed Bear Common Lisp.

    +

    Back to Common-lisp.net.

    + +
    + Valid XHTML 1.0 Strict +
    +
    $Id: release-notes-1.1.0.shtml 13748 2012-01-10 18:58:49Z mevenson $
    +
    + + From mevenson at common-lisp.net Sun Dec 9 10:11:58 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 09 Dec 2012 02:11:58 -0800 Subject: [armedbear-cvs] r14324 - trunk/abcl Message-ID: Author: mevenson Date: Sun Dec 9 02:11:38 2012 New Revision: 14324 Log: rdf: Correct identifier for Alessio. Correct usage of rdf:Bag instead of rdf:Alt. Modified: trunk/abcl/abcl.rdf Modified: trunk/abcl/abcl.rdf ============================================================================== --- trunk/abcl/abcl.rdf Sun Dec 9 02:08:26 2012 (r14323) +++ trunk/abcl/abcl.rdf Sun Dec 9 02:11:38 2012 (r14324) @@ -55,11 +55,11 @@ dc:contributor [ - a rdf:Alt; + a rdf:Bag; rdf:_1 _:ehu ; rdf:_2 _:easye ; rdf:_3 _:ville ; - rdf:_4 _:astala ; + rdf:_4 _:astalla ; rdf:_5 _:rudi ] . From mevenson at common-lisp.net Sun Dec 9 10:24:40 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 09 Dec 2012 02:24:40 -0800 Subject: [armedbear-cvs] r14325 - trunk/abcl Message-ID: Author: mevenson Date: Sun Dec 9 02:24:25 2012 New Revision: 14325 Log: changes: format the raw issues resolved entries. Modified: trunk/abcl/CHANGES Modified: trunk/abcl/CHANGES ============================================================================== --- trunk/abcl/CHANGES Sun Dec 9 02:11:38 2012 (r14324) +++ trunk/abcl/CHANGES Sun Dec 9 02:24:25 2012 (r14325) @@ -128,71 +128,64 @@ * [#187] Better SORT and STABLE-SORT via Jorge Tavares [???] -Issues ------- - - id summary owner type priority component version - 173 Cannot initialize ABCL within .ear mevenson defect blocker interpreter 0.27 - 191 Compiling SHARPSIGN SHARPSIGN form causes stack overflow ehuelsmann defect blocker compiler 1.0 - 196 STABLE-SORT is only stable for lists ehuelsmann defect blocker interpreter 1.0.1 - 216 JVM stack inconsistency triggered by compiler ehuelsmann defect blocker compiler - 221 Stack exhaustion on invocation of function in non-existing package ehuelsmann defect blocker interpreter - 234 ABCL-ASDF mvn errors with VERSION slot unbound mevenson defect blocker ASDF 1.1.0-dev - 237 JNA fails to load blocking CFFI mevenson defect blocker libraries 1.1.0-dev - 249 Problems under Ubuntu mevenson defect blocker libraries 1.1.0-dev - 250 SYS:SHA256 does not compile ehuelsmann defect blocker build 1.1.0-dev - 265 COMPILE-FILE.2 COMPILE-FILE.2A ANSI regression ehuelsmann defect blocker compiler 1.1.0-dev - 268 ABCL-ASDF working with maven-3.0.3 mevenson defect blocker libraries - 269 SLIME cannot browse systems with November Quicklisp somebody defect blocker other 1.1.0-dev - 270 Is BUGS.DEFEGENERIC.1 a valid test? rschlatte defect blocker (A)MOP 1.1.0-dev - 271 ASDF-2.26 changes synced upstream mevenson defect blocker other 1.1.0-dev - 272 DESCRIBE.[14] ANSI regression rschlatte defect blocker (A)MOP 1.1.0-dev - 275 ABCL-CONTRIB still provided if abcl-contrib.jar cannot be located mevenson defect blocker abcl-contrib 1.1.0-dev - 276 defmethod doesn't call add-method rschlatte defect blocker (A)MOP - 277 reinitialize-instance on class metaobjects incorrect rschlatte defect blocker (A)MOP - 113 DEFSTRUCT redefinition can crash ABCL on MAKE-STRUCT mevenson defect critical java - 199 CL:DEFMETHOD fails for &AUX arguments that reference other arguments mevenson defect critical CLOS 1.1.0-dev - 213 ABCL-ASDF breakage on trunk mevenson defect critical interpreter 1.1.0-dev - 215 ABCL-ASDF:RESOLVE should work in more (some?) cases mevenson defect critical other 1.1.0-dev - 229 JSS method resolution failure mevenson defect critical java 1.1.0-dev - 246 CFFI: dynamically generated classes referred from .fasl can not be found after ABCL restart mevenson defect critical libraries 1.1.0-dev - 168 Compilation fails for quicklisp let-plus ehuelsmann defect major compiler - 187 Stack Overflow for Worst-case Vector Sort nobody defect major java 1.0 - 202 ENSURE-GENERIC-FUNCTION assumes LAMBDA-LIST is NIL ehuelsmann defect major (A)MOP 1.1.0-dev - 204 abcl-asdf maybe-parse-mvn ignores version information mevenson defect major libraries 1.1.0-dev - 205 JSS logic for resolving methods a little wonky (could use better diagnostics on why resolution has failed) mevenson defect major libraries 1.0.1 - 207 DECLARE should signal conditions when type declarations are violated ehuelsmann defect major interpreter 1.1.0-dev - 210 Add JFLI to contrib mevenson enhancement major libraries - 217 ANSI tests wont run on Revision 14011: /trunk/abcl rschlatte defect major build 1.1.0-dev - 219 Keyword argument checking for lambda lists is too lenient for ANSI ehuelsmann defect major interpreter 1.0.1 - 220 Lambda list checking too lenient nobody defect major java 1.1.0-dev - 224 Autoloader fails when *read-XXXX* variables bound to non-standard values nobody defect major java 1.1.0-dev - 225 One of the paths in STD-COMPUTE-DISCRIMINATING function not working somebody defect major CLOS - 235 Compiled cl+ssl sources not reloadable mevenson defect major compiler 1.1.0-dev - 241 &rest and &aux can't coexist anymore in lambda lists ehuelsmann defect major compiler - 243 ClassCastException in MAKE-PATHNAME mevenson defect major java 1.1.0-dev - 245 Slots of a class with a custom meta-class are reported as unbound. rschlatte defect major (A)MOP - 247 CFFI: $Proxy3 is not assignable to com.sun.jna.Pointer mevenson defect major libraries 1.1.0-dev - 252 MOP rework broke profiler? ehuelsmann defect major (A)MOP 1.1.0-dev - 254 Cannot load ASDF systems in jar archives with ASDF-BINARY-LOCATIONS-COMPATIBILTY enabled mevenson defect major ASDF 1.1.0-dev - 255 ASDF file encoding specification doesn't work mevenson defect major ASDF 1.1.0-dev - 263 loading systems from abcl-contrib fails if CLASSPATH has a component with wildcard mevenson defect major abcl-contrib 1.1.0-dev - 264 abcl-asdf.asd broken since revision 14233 mevenson defect major abcl-contrib 1.1.0-dev - 60 Implement USE-FAST-CALLS properly ehuelsmann defect minor compiler - 130 "SLIME under Windows has ""extra"" CRLF" mevenson defect minor other - 172 DOCUMENTATION does not work for generic functions ehuelsmann defect minor interpreter 0.27 - 174 Conformance bug in time implementation when using SLIME mevenson defect minor other 0.27 - 175 abcl.release target fails occasionally unassigned defect minor build 0.27 - 189 Compiler fails for 'unsigned-byte type declaration ehuelsmann defect minor compiler 1.0 - 201 &WHOLE broken in DEFINE-METHOD-COMBINATION somebody defect minor CLOS 1.1.0-dev - 206 COMPILER-UNSUPPORTED-FEATURE-ERROR is derived from CONDITION, rather than from ERROR ehuelsmann defect minor compiler - 208 "Files loaded via ""--load "" on the command line have no pathname defaults" ehuelsmann defect minor interpreter 1.1.0-dev - 211 closure-common fails to load correctly after compilation mevenson defect minor compiler 1.1.0-dev - 214 Stack overflow when compiler macro with fallback is triggered ehuelsmann defect minor compiler 1.0.1 - 232 Allow wrapper script to reference install directory instead of build directory mevenson enhancement minor build 1.1.0-dev - 192 ASDF::IMPLEMENTATION-IDENTIFIER contains ABCL build environment identifier mevenson defect trivial ASDF 1.0.1 - 195 prompt is displayed twice when evaluating NIL at the REPL vvoutilainen defect trivial interpreter +Issues Resolved +--------------- + * [#234] ABCL-ASDF mvn errors with VERSION slot unbound + * [#237] JNA fails to load blocking CFFI + * [#249] Problems under Ubuntu + * [#250] SYS:SHA256 does not compile + * [#265] COMPILE-FILE.2 COMPILE-FILE.2A ANSI regression + * [#268] ABCL-ASDF working with maven-3.0.3 + * [#269] SLIME cannot browse systems with November Quicklisp + * [#270] Is BUGS.DEFEGENERIC.1 a valid test? + * [#271] ASDF-2.26 changes synced upstream + * [#272] DESCRIBE.[14] ANSI regression rschlatte + * [#275] ABCL-CONTRIB still provided if abcl-contrib.jar cannot be located + * [#276] defmethod doesn't call add-method + * [#277] reinitialize-instance on class metaobjects incorrect + * [#113] DEFSTRUCT redefinition can crash ABCL on MAKE-STRUCT + * [#199] CL:DEFMETHOD fails for &AUX arguments that reference other arguments + * [#213] ABCL-ASDF breakage on trunk + * [#215] ABCL-ASDF:RESOLVE should work in more (some?) cases + * [#229] JSS method resolution failure + * [#246] CFFI: dynamically generated classes referred from .fasl can not be found after ABCL restart + * [#168] Compilation fails for quicklisp let-plus + * [#187] Stack Overflow for Worst-case Vector Sort + * [#202] ENSURE-GENERIC-FUNCTION assumes LAMBDA-LIST is NIL + * [#204] abcl-asdf maybe-parse-mvn ignores version information + * [#205] JSS logic for resolving methods a little wonky (could use better diagnostics on why resolution has failed) + * [#207] DECLARE should signal conditions when type declarations are violated + * [#210] Add JFLI to contrib + * [#217] ANSI tests wont run on Revision 14011: /trunk/abcl + * [#219] Keyword argument checking for lambda lists is too lenient for ANSI + * [#220] Lambda list checking too lenient + * [#224] Autoloader fails when *read-XXXX* variables bound to non-standard values + * [#225] One of the paths in STD-COMPUTE-DISCRIMINATING function not working + * [#235] Compiled cl+ssl sources not reloadable + * [#241] &rest and &aux can't coexist anymore in lambda lists + * [#243] ClassCastException in MAKE-PATHNAME + * [#245] Slots of a class with a custom meta-class are reported as unbound. + * [#247] CFFI: $Proxy3 is not assignable to com.sun.jna.Pointer + * [#252] MOP rework broke profiler? + * [#254] Cannot load ASDF systems in jar archives with ASDF-BINARY-LOCATIONS-COMPATIBILTY enabled + * [#255] ASDF file encoding specification doesn't work + * [#263] loading systems from abcl-contrib fails if CLASSPATH has a component with wildcard + * [#264] abcl-asdf.asd broken since revision 14233 + * [#60 ]Implement USE-FAST-CALLS properly + * [#130] "SLIME under Windows has ""extra"" CRLF" + * [#172] DOCUMENTATION does not work for generic functions + * [#174] Conformance bug in time implementation when using SLIME + * [#175] abcl.release target fails occasionally unassigned + * [#189] Compiler fails for 'unsigned-byte type declaration + * [#201] &WHOLE broken in DEFINE-METHOD-COMBINATION + * [#206] COMPILER-UNSUPPORTED-FEATURE-ERROR is derived from CONDITION, rather than from ERROR + * [#208] "Files loaded via ""--load "" on the command line have no pathname defaults" + * [#211] closure-common fails to load correctly after compilation + * [#214] Stack overflow when compiler macro with fallback is triggered + * [#232] Allow wrapper script to reference install directory instead of build directory + * [#192] ASDF::IMPLEMENTATION-IDENTIFIER contains ABCL build environment identifier + * [#195] prompt is displayed twice when evaluating NIL at the REPL Version 1.0.1 ============== From mevenson at common-lisp.net Mon Dec 17 15:22:10 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 17 Dec 2012 07:22:10 -0800 Subject: [armedbear-cvs] r14326 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Mon Dec 17 07:22:09 2012 New Revision: 14326 Log: Refactor java.beans.* out of Java.java. Enables patches for building on Android to exclude source by file-level compilation units. Added: trunk/abcl/src/org/armedbear/lisp/JavaBeans.java Modified: trunk/abcl/src/org/armedbear/lisp/Java.java Modified: trunk/abcl/src/org/armedbear/lisp/Java.java ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/Java.java Sun Dec 9 02:24:25 2012 (r14325) +++ trunk/abcl/src/org/armedbear/lisp/Java.java Mon Dec 17 07:22:09 2012 (r14326) @@ -35,10 +35,6 @@ import static org.armedbear.lisp.Lisp.*; -import java.beans.BeanInfo; -import java.beans.IntrospectionException; -import java.beans.Introspector; -import java.beans.PropertyDescriptor; import java.lang.reflect.Array; import java.lang.reflect.Constructor; import java.lang.reflect.Field; @@ -1241,75 +1237,6 @@ } }; - private static final Primitive JGET_PROPERTY_VALUE = new pf__jget_property_value(); - @DocString(name="%jget-propety-value", args="java-object property-name", - doc="Gets a JavaBeans property on JAVA-OBJECT.\n" + - "SYSTEM-INTERNAL: Use jproperty-value instead.") - private static final class pf__jget_property_value extends Primitive - { - pf__jget_property_value() - { - super("%jget-property-value", PACKAGE_JAVA, false, - "java-object property-name"); - } - - @Override - public LispObject execute(LispObject javaObject, LispObject propertyName) { - try { - Object obj = javaObject.javaInstance(); - PropertyDescriptor pd = getPropertyDescriptor(obj, propertyName); - Object value = pd.getReadMethod().invoke(obj); - if(value instanceof LispObject) { - return (LispObject) value; - } else if(value != null) { - return JavaObject.getInstance(value, true); - } else { - return NIL; - } - } catch (Exception e) { - return error(new JavaException(e)); - } - } - }; - - private static final Primitive JSET_PROPERTY_VALUE = new pf__jset_property_value(); - @DocString(name="%jset-propety-value", args="java-object property-name value", - doc="Sets a JavaBean property on JAVA-OBJECT.\n" + - "SYSTEM-INTERNAL: Use (setf jproperty-value) instead.") - private static final class pf__jset_property_value extends Primitive - { - pf__jset_property_value() - { - super("%jset-property-value", PACKAGE_JAVA, false, - "java-object property-name value"); - } - - @Override - public LispObject execute(LispObject javaObject, LispObject propertyName, LispObject value) { - Object obj = null; - try { - obj = javaObject.javaInstance(); - PropertyDescriptor pd = getPropertyDescriptor(obj, propertyName); - Object jValue; - //TODO maybe we should do this in javaInstance(Class) - if(value instanceof JavaObject) { - jValue = value.javaInstance(); - } else { - if(Boolean.TYPE.equals(pd.getPropertyType()) || - Boolean.class.equals(pd.getPropertyType())) { - jValue = value != NIL; - } else { - jValue = value != NIL ? value.javaInstance() : null; - } - } - pd.getWriteMethod().invoke(obj, jValue); - return value; - } catch (Exception e) { - return error(new JavaException(e)); - } - } - }; - private static final Primitive JRUN_EXCEPTION_PROTECTED = new pf_jrun_exception_protected(); @DocString(name="jrun-exception-protected", args="closure", doc="Invokes the function CLOSURE and returns the result. "+ @@ -1338,19 +1265,6 @@ } }; - static PropertyDescriptor getPropertyDescriptor(Object obj, LispObject propertyName) throws IntrospectionException { - String prop = ((AbstractString) propertyName).getStringValue(); - BeanInfo beanInfo = Introspector.getBeanInfo(obj.getClass()); - for(PropertyDescriptor pd : beanInfo.getPropertyDescriptors()) { - if(pd.getName().equals(prop)) { - return pd; - } - } - error(new LispError("Property " + prop + " not found in " + obj)); - - return null; // not reached - } - private static Class classForName(String className) { return classForName(className, JavaClassLoader.getPersistentInstance()); } Added: trunk/abcl/src/org/armedbear/lisp/JavaBeans.java ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ trunk/abcl/src/org/armedbear/lisp/JavaBeans.java Mon Dec 17 07:22:09 2012 (r14326) @@ -0,0 +1,126 @@ +/* + * Java.java + * + * Copyright (C) 2002-2006 Peter Graves, Andras Simon + * $Id$ + * + * 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. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + * + * As a special exception, the copyright holders of this library give you + * permission to link this library with independent modules to produce an + * executable, regardless of the license terms of these independent + * modules, and to copy and distribute the resulting executable under + * terms of your choice, provided that you also meet, for each linked + * independent module, the terms and conditions of the license of that + * module. An independent module is a module which is not derived from + * or based on this library. If you modify this library, you may extend + * this exception to your version of the library, but you are not + * obligated to do so. If you do not wish to do so, delete this + * exception statement from your version. + */ + +package org.armedbear.lisp; + +import static org.armedbear.lisp.Lisp.*; + +import java.beans.BeanInfo; +import java.beans.IntrospectionException; +import java.beans.Introspector; +import java.beans.PropertyDescriptor; + +public final class JavaBeans { + + private static final Primitive JGET_PROPERTY_VALUE = new pf__jget_property_value(); + @DocString(name="%jget-propety-value", args="java-object property-name", + doc="Gets a JavaBeans property on JAVA-OBJECT.\n" + + "SYSTEM-INTERNAL: Use jproperty-value instead.") + private static final class pf__jget_property_value extends Primitive + { + pf__jget_property_value() + { + super("%jget-property-value", PACKAGE_JAVA, false, + "java-object property-name"); + } + + @Override + public LispObject execute(LispObject javaObject, LispObject propertyName) { + try { + Object obj = javaObject.javaInstance(); + PropertyDescriptor pd = getPropertyDescriptor(obj, propertyName); + Object value = pd.getReadMethod().invoke(obj); + if(value instanceof LispObject) { + return (LispObject) value; + } else if(value != null) { + return JavaObject.getInstance(value, true); + } else { + return NIL; + } + } catch (Exception e) { + return error(new JavaException(e)); + } + } + }; + + private static final Primitive JSET_PROPERTY_VALUE = new pf__jset_property_value(); + @DocString(name="%jset-propety-value", args="java-object property-name value", + doc="Sets a JavaBean property on JAVA-OBJECT.\n" + + "SYSTEM-INTERNAL: Use (setf jproperty-value) instead.") + private static final class pf__jset_property_value extends Primitive + { + pf__jset_property_value() + { + super("%jset-property-value", PACKAGE_JAVA, false, + "java-object property-name value"); + } + + @Override + public LispObject execute(LispObject javaObject, LispObject propertyName, LispObject value) { + Object obj = null; + try { + obj = javaObject.javaInstance(); + PropertyDescriptor pd = getPropertyDescriptor(obj, propertyName); + Object jValue; + //TODO maybe we should do this in javaInstance(Class) + if(value instanceof JavaObject) { + jValue = value.javaInstance(); + } else { + if(Boolean.TYPE.equals(pd.getPropertyType()) || + Boolean.class.equals(pd.getPropertyType())) { + jValue = value != NIL; + } else { + jValue = value != NIL ? value.javaInstance() : null; + } + } + pd.getWriteMethod().invoke(obj, jValue); + return value; + } catch (Exception e) { + return error(new JavaException(e)); + } + } + }; + + static PropertyDescriptor getPropertyDescriptor(Object obj, LispObject propertyName) throws IntrospectionException { + String prop = ((AbstractString) propertyName).getStringValue(); + BeanInfo beanInfo = Introspector.getBeanInfo(obj.getClass()); + for(PropertyDescriptor pd : beanInfo.getPropertyDescriptors()) { + if(pd.getName().equals(prop)) { + return pd; + } + } + error(new LispError("Property " + prop + " not found in " + obj)); + + return null; // not reached + } +} From mevenson at common-lisp.net Mon Dec 17 18:31:36 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 17 Dec 2012 10:31:36 -0800 Subject: [armedbear-cvs] r14327 - public_html/releases/1.1.0 Message-ID: Author: mevenson Date: Mon Dec 17 10:31:32 2012 New Revision: 14327 Log: 1.1.0: re-do binary artifacts from source. Recompiled from the source on the tag, which is good, but somehow the previously released version got a bad copy of contrib/jss/jss.asd. Modified: public_html/releases/1.1.0/abcl-1.1.0.jar public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz public_html/releases/1.1.0/abcl-bin-1.1.0.zip public_html/releases/1.1.0/abcl-contrib-1.1.0.jar public_html/releases/1.1.0/abcl-contrib.jar public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz public_html/releases/1.1.0/abcl-src-1.1.0.zip public_html/releases/1.1.0/abcl.jar Modified: public_html/releases/1.1.0/abcl-1.1.0.jar ============================================================================== Binary file (source and/or target). No diff available. Modified: public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz ============================================================================== Binary file (source and/or target). No diff available. Modified: public_html/releases/1.1.0/abcl-bin-1.1.0.zip ============================================================================== Binary file (source and/or target). No diff available. Modified: public_html/releases/1.1.0/abcl-contrib-1.1.0.jar ============================================================================== Binary file (source and/or target). No diff available. Modified: public_html/releases/1.1.0/abcl-contrib.jar ============================================================================== Binary file (source and/or target). No diff available. Modified: public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz ============================================================================== Binary file (source and/or target). No diff available. Modified: public_html/releases/1.1.0/abcl-src-1.1.0.zip ============================================================================== Binary file (source and/or target). No diff available. Modified: public_html/releases/1.1.0/abcl.jar ============================================================================== Binary file (source and/or target). No diff available. From mevenson at common-lisp.net Mon Dec 17 18:38:11 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 17 Dec 2012 10:38:11 -0800 Subject: [armedbear-cvs] r14328 - public_html/releases/1.1.0 Message-ID: Author: mevenson Date: Mon Dec 17 10:38:07 2012 New Revision: 14328 Log: 1.1.0: new cryptographic signatures. Modified: public_html/releases/1.1.0/abcl-1.1.0.jar.asc public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz.asc public_html/releases/1.1.0/abcl-bin-1.1.0.zip.asc public_html/releases/1.1.0/abcl-contrib-1.1.0.jar.asc public_html/releases/1.1.0/abcl-contrib.jar.asc public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz.asc public_html/releases/1.1.0/abcl-src-1.1.0.zip.asc public_html/releases/1.1.0/abcl.jar.asc Modified: public_html/releases/1.1.0/abcl-1.1.0.jar.asc ============================================================================== --- public_html/releases/1.1.0/abcl-1.1.0.jar.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl-1.1.0.jar.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDES2YACgkQKpZBEE2xdz0cyQD/W8g0bLWE33ZkYKcXZxVFdlMH -yndhOQsZKR9eO05adNgA/0HznUaZRH8+IURM5YTZPbQqfEnRR35F66nnMtIeJqwI -=6l9B +iF4EABEIAAYFAlDPZlgACgkQKpZBEE2xdz3dygD/cKg+sSftPRSqQ1vhqkKWKv6A +NWiM9BP/PBs9seXVpXMA/0q7/q0OZn9PtVXzJ8Kque9q07ER1zQ5Zcm/C+jwJgV4 +=UNWC -----END PGP SIGNATURE----- Modified: public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz.asc ============================================================================== --- public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl-bin-1.1.0.tar.gz.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDET0EACgkQKpZBEE2xdz1ShgEAgOfzbfCAFmQDcA0Rdg3WY7iS -ZO/+u9AYmtjybLXGI6IA/2Aa954ZkL13qn20ZqTQ1LS8Mlc1b7x+o+l9WiKFoWF2 -=WLqk +iF4EABEIAAYFAlDPZkAACgkQKpZBEE2xdz1vpQD/eJA8Jhy01S3j5J56nDf+PCAq +mBavuf/6duRk7uBkCWcA+wfXUpNurqAw0tRUNDucTj3qn2JYQzyOQpkxsRykmdsA +=x+AH -----END PGP SIGNATURE----- Modified: public_html/releases/1.1.0/abcl-bin-1.1.0.zip.asc ============================================================================== --- public_html/releases/1.1.0/abcl-bin-1.1.0.zip.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl-bin-1.1.0.zip.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDET6cACgkQKpZBEE2xdz3bMAD+MEIqMBCdDtLJ4aqsMEbzHEqP -QMhm4d6XsKBDlbHWmLcBAIPpQ++9SuNeCmhE1h1udfX9uaGbO0M8YrDT0JPPzgXG -=0WNc +iF4EABEIAAYFAlDPZgEACgkQKpZBEE2xdz34+QEAjmJ+C6kBtmDkyUNcxeOeuB2Q +2ARzC8r/E1ZWVEdsVkoA/Rw38mjJmTGn4VRU96ZecMWrGHut2GfCAls2Rw2c370R +=iyW/ -----END PGP SIGNATURE----- Modified: public_html/releases/1.1.0/abcl-contrib-1.1.0.jar.asc ============================================================================== --- public_html/releases/1.1.0/abcl-contrib-1.1.0.jar.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl-contrib-1.1.0.jar.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDEUBEACgkQKpZBEE2xdz2NjgD9HIv4EtXK+v+Q7E+KPSBwMS3I -UOpCDWkKaHO/WrvyhtYBAJt/IInEbAXmXKQkInER0eziIDZE5Zoz64eVeq04Z+Lt -=Xfo9 +iF4EABEIAAYFAlDPZh8ACgkQKpZBEE2xdz3+8QD/WVqwf0boQMAwmWRynE6k+tkS +zl4MdlVsujEZ7pM0GPoA/j7W7jUKi8Kw4nQZeQaBR/ZkqbY/ZWzUtw3/YtWd+wd/ +=7qjP -----END PGP SIGNATURE----- Modified: public_html/releases/1.1.0/abcl-contrib.jar.asc ============================================================================== --- public_html/releases/1.1.0/abcl-contrib.jar.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl-contrib.jar.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDET+0ACgkQKpZBEE2xdz3Q1wEAgQbv3UxSofNmzkzTJVPet07s -M9io7+MogW/JEFeh1jUA/1N9wyl2jjI3O1BhCZr0RP2+kPOEia76aWN1/8lriIuG -=9iqT +iF4EABEIAAYFAlDPZmQACgkQKpZBEE2xdz3NFgD9Gls+1G4xEta25NLU2thcOYtr +o45Jbiw/y5+OomjGc/8BAJEP/3sfMQRAbiSjV0iTLk4WNuerOK1Qq/IY1liIf4QK +=kwNG -----END PGP SIGNATURE----- Modified: public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz.asc ============================================================================== --- public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl-src-1.1.0.tar.gz.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDETqAACgkQKpZBEE2xdz1RZgD7BfEM30aDObWftqydIDiR93/e -f5L8oZmzdK4fT7OEluYA/i95aVmwPNoKicNgDsmXs3FHJtqGdilI3Fqs69wmXRsv -=DuaG +iF4EABEIAAYFAlDPZdkACgkQKpZBEE2xdz2LiQEAj2A3QfUIqYvaGJELO1gmYgnk +O/oy1DeBDKICWZ9zv0QA/jgl1TVyzQ5txfx0uS9Fp8tG+dMBbeJTL4A8gU2x+vF6 +=MHb9 -----END PGP SIGNATURE----- Modified: public_html/releases/1.1.0/abcl-src-1.1.0.zip.asc ============================================================================== --- public_html/releases/1.1.0/abcl-src-1.1.0.zip.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl-src-1.1.0.zip.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDETy8ACgkQKpZBEE2xdz18lAEAmR3FsDcq7IBlHJ/Ksu9yajuN -cak1IlpAjYOfh4g7QCEA/1eVXraFMEFeLcvsM88jPGq1ARDUaHMfYX5AmOkpXHWT -=8RVl +iF4EABEIAAYFAlDPZb0ACgkQKpZBEE2xdz07jAD9G00bN4T4lX6sLLUztcC1IQW8 +Ze6jlO8l+GFCpV9mDd4A/3Luf/3ul6GhtX09xq6/6PlAzOSW3UK7R7T5w0wcpbPy +=JNfb -----END PGP SIGNATURE----- Modified: public_html/releases/1.1.0/abcl.jar.asc ============================================================================== --- public_html/releases/1.1.0/abcl.jar.asc Mon Dec 17 10:31:32 2012 (r14327) +++ public_html/releases/1.1.0/abcl.jar.asc Mon Dec 17 10:38:07 2012 (r14328) @@ -1,7 +1,7 @@ -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (Darwin) -iF4EABEIAAYFAlDET38ACgkQKpZBEE2xdz2dlgD/ZPLDe4HT+FfZjqfIjo4ngoM9 -bZwhvmio4BkPA3fn5v0A+wXRtOyu5ZRIyN0G2QLXgxEQm8HHU0Xm8npalococAzH -=b4BS +iF4EABEIAAYFAlDPZmsACgkQKpZBEE2xdz120wD+PHeCD/8tIgIPSyQ6VBU8v7dU +II871P4OaBS8yBFXKx0A/Rkye3jom6ZTEdEVRvtpmRC7LN5hrrMJ6OOhuarFfs24 +=vybX -----END PGP SIGNATURE----- From mevenson at common-lisp.net Tue Dec 18 20:02:59 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 12:02:59 -0800 Subject: [armedbear-cvs] r14329 - in branches/1.1.x: . src/org/armedbear/lisp Message-ID: Author: mevenson Date: Tue Dec 18 12:02:57 2012 New Revision: 14329 Log: 1.1.0.1: tag new release fixing JSS. Need to republish release artifacts to distinct URI as somehow JSS was messed up in the images published to googlecode, which are (correctly) immutable. Modified: branches/1.1.x/CHANGES branches/1.1.x/README branches/1.1.x/abcl.rdf branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/CHANGES ============================================================================== --- branches/1.1.x/CHANGES Mon Dec 17 10:38:07 2012 (r14328) +++ branches/1.1.x/CHANGES Tue Dec 18 12:02:57 2012 (r14329) @@ -1,7 +1,14 @@ +Version 1.1.0.1 +============= +svn.uri=:"http//svn.common-lisp.net/armedbear/tags/1.1.0.1/abcl/CHANGES" +(18 December 2012) + + Version 1.1.0 ============= -svn.uri=:"http//common-lisp.net/project/armedbear/svn/trunk/abcl/" -(22 November 2012) +svn.uri=:"http//svn.common-lisp.net/armedbear/tags/1.1.0/abcl/CHANGES" + +(07 December 2012) Features -------- @@ -77,6 +84,23 @@ Changes ------- + + * ANSI [#241] + + ** &AUX parameters fixes RESTAS + + + * [#221] Stack exhaustsion on funcall in non-existing package + + * [#113] DEFSTRUCT concurrency + + * [#216][#211] Compiler + + ** stack inconsistency + + * [#187] Better SORT and STABLE-SORT via Jorge Tavares [???] + + * [#249] PATHNAME merge semantics DWIMs on an inferred type Extends ANSI PATHNAME in a non-conforming manner, which was probably @@ -118,7 +142,64 @@ * [#187] Better SORT and STABLE-SORT via Jorge Tavares [???] +Issues Resolved +--------------- + * [#234] ABCL-ASDF mvn errors with VERSION slot unbound + * [#237] JNA fails to load blocking CFFI + * [#249] Problems under Ubuntu + * [#250] SYS:SHA256 does not compile + * [#265] COMPILE-FILE.2 COMPILE-FILE.2A ANSI regression + * [#268] ABCL-ASDF working with maven-3.0.3 + * [#269] SLIME cannot browse systems with November Quicklisp + * [#270] Is BUGS.DEFEGENERIC.1 a valid test? + * [#271] ASDF-2.26 changes synced upstream + * [#272] DESCRIBE.[14] ANSI regression rschlatte + * [#275] ABCL-CONTRIB still provided if abcl-contrib.jar cannot be located + * [#276] defmethod doesn't call add-method + * [#277] reinitialize-instance on class metaobjects incorrect + * [#113] DEFSTRUCT redefinition can crash ABCL on MAKE-STRUCT + * [#199] CL:DEFMETHOD fails for &AUX arguments that reference other arguments + * [#213] ABCL-ASDF breakage on trunk + * [#215] ABCL-ASDF:RESOLVE should work in more (some?) cases + * [#229] JSS method resolution failure + * [#246] CFFI: dynamically generated classes referred from .fasl can not be found after ABCL restart + * [#168] Compilation fails for quicklisp let-plus + * [#187] Stack Overflow for Worst-case Vector Sort + * [#202] ENSURE-GENERIC-FUNCTION assumes LAMBDA-LIST is NIL + * [#204] abcl-asdf maybe-parse-mvn ignores version information + * [#205] JSS logic for resolving methods a little wonky (could use better diagnostics on why resolution has failed) + * [#207] DECLARE should signal conditions when type declarations are violated + * [#210] Add JFLI to contrib + * [#217] ANSI tests wont run on Revision 14011: /trunk/abcl + * [#219] Keyword argument checking for lambda lists is too lenient for ANSI + * [#220] Lambda list checking too lenient + * [#224] Autoloader fails when *read-XXXX* variables bound to non-standard values + * [#225] One of the paths in STD-COMPUTE-DISCRIMINATING function not working + * [#235] Compiled cl+ssl sources not reloadable + * [#241] &rest and &aux can't coexist anymore in lambda lists + * [#243] ClassCastException in MAKE-PATHNAME + * [#245] Slots of a class with a custom meta-class are reported as unbound. + * [#247] CFFI: $Proxy3 is not assignable to com.sun.jna.Pointer + * [#252] MOP rework broke profiler? + * [#254] Cannot load ASDF systems in jar archives with ASDF-BINARY-LOCATIONS-COMPATIBILTY enabled + * [#255] ASDF file encoding specification doesn't work + * [#263] loading systems from abcl-contrib fails if CLASSPATH has a component with wildcard + * [#264] abcl-asdf.asd broken since revision 14233 + * [#60 ]Implement USE-FAST-CALLS properly + * [#130] "SLIME under Windows has ""extra"" CRLF" + * [#172] DOCUMENTATION does not work for generic functions + * [#174] Conformance bug in time implementation when using SLIME + * [#175] abcl.release target fails occasionally unassigned + * [#189] Compiler fails for 'unsigned-byte type declaration + * [#201] &WHOLE broken in DEFINE-METHOD-COMBINATION + * [#206] COMPILER-UNSUPPORTED-FEATURE-ERROR is derived from CONDITION, rather than from ERROR + * [#208] "Files loaded via ""--load "" on the command line have no pathname defaults" + * [#211] closure-common fails to load correctly after compilation + * [#214] Stack overflow when compiler macro with fallback is triggered + * [#232] Allow wrapper script to reference install directory instead of build directory + * [#192] ASDF::IMPLEMENTATION-IDENTIFIER contains ABCL build environment identifier + * [#195] prompt is displayed twice when evaluating NIL at the REPL Version 1.0.1 ============== Modified: branches/1.1.x/README ============================================================================== --- branches/1.1.x/README Mon Dec 17 10:38:07 2012 (r14328) +++ branches/1.1.x/README Tue Dec 18 12:02:57 2012 (r14329) @@ -50,7 +50,7 @@ which should result in output like the following - Armed Bear Common Lisp 1.1.0 + Armed Bear Common Lisp 1.1.0.1 Java 1.6.0_21 Sun Microsystems Inc. Java HotSpot(TM) Client VM Low-level initialization completed in 0.3 seconds. Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Mon Dec 17 10:38:07 2012 (r14328) +++ branches/1.1.x/abcl.rdf Tue Dec 18 12:02:57 2012 (r14329) @@ -2,8 +2,8 @@ @prefix dc: . @prefix abcl: . -<> dc:version "abcl-1.1.0" . -<> abcl:release "rc-3" . +<> dc:version "abcl-1.1.0.1" . +<> a abcl:release . <> abcl:is "W3C Turtle RDF serializations format" ; @@ -26,8 +26,8 @@ dc:created "01-JAN-2004" ; dc:modified "07-DEC-2012" ; - dc:version "abcl-1.1.0" ; - abcl:releaseCandidate "rc-3" . + dc:version "abcl-1.1.0.1" ; + abcl:releaseCandidate "release" . <> rdfs:seeAlso [ a rdf:Alt ; @@ -99,7 +99,7 @@ dc:Software [ a rdf:Bag; rdf:_1 ; - rdf:_2 + rdf:_2 ] ; ] . Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Mon Dec 17 10:38:07 2012 (r14328) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Tue Dec 18 12:02:57 2012 (r14329) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0"; + static final String baseVersion = "1.1.0.1"; static void init() { try { From mevenson at common-lisp.net Tue Dec 18 20:05:49 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 12:05:49 -0800 Subject: [armedbear-cvs] r14330 - public_html/releases/1.1.0.1 Message-ID: Author: mevenson Date: Tue Dec 18 12:05:47 2012 New Revision: 14330 Log: 1.1.0.1: mkcol for graft into 'abcl'. Added: public_html/releases/1.1.0.1/ From mevenson at common-lisp.net Tue Dec 18 20:08:18 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 12:08:18 -0800 Subject: [armedbear-cvs] r14331 - tags/1.1.0.1 Message-ID: Author: mevenson Date: Tue Dec 18 12:08:18 2012 New Revision: 14331 Log: 1.1.0.1: mkcol for tag. Added: tags/1.1.0.1/ From mevenson at common-lisp.net Tue Dec 18 20:08:34 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 12:08:34 -0800 Subject: [armedbear-cvs] r14332 - tags/1.1.0.1/abcl Message-ID: Author: mevenson Date: Tue Dec 18 12:08:33 2012 New Revision: 14332 Log: 1.1.0.1: tag. Added: tags/1.1.0.1/abcl/ - copied from r14331, branches/1.1.x/ From mevenson at common-lisp.net Tue Dec 18 20:10:21 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 12:10:21 -0800 Subject: [armedbear-cvs] r14333 - in branches/1.1.x: . src/org/armedbear/lisp Message-ID: Author: mevenson Date: Tue Dec 18 12:10:20 2012 New Revision: 14333 Log: 1.1.x: produce 1.1.0-dev artifacts again. Modified: branches/1.1.x/CHANGES branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/CHANGES ============================================================================== --- branches/1.1.x/CHANGES Tue Dec 18 12:08:33 2012 (r14332) +++ branches/1.1.x/CHANGES Tue Dec 18 12:10:20 2012 (r14333) @@ -1,3 +1,9 @@ +Version 1.1.0 +============= +svn.uri=:"http//svn.common-lisp.net/armedbear/tags/1.1.x/CHANGES" +(unreleased) + + Version 1.1.0.1 ============= svn.uri=:"http//svn.common-lisp.net/armedbear/tags/1.1.0.1/abcl/CHANGES" Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Tue Dec 18 12:08:33 2012 (r14332) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Tue Dec 18 12:10:20 2012 (r14333) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0.1"; + static final String baseVersion = "1.1.0-dev"; static void init() { try { From mevenson at common-lisp.net Tue Dec 18 20:19:32 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 12:19:32 -0800 Subject: [armedbear-cvs] r14334 - public_html/releases/1.1.0.1 Message-ID: Author: mevenson Date: Tue Dec 18 12:19:28 2012 New Revision: 14334 Log: 1.1.0.1: binary artifacts. Added: public_html/releases/1.1.0.1/abcl-1.1.0.1.jar (contents, props changed) public_html/releases/1.1.0.1/abcl-bin-1.1.0.1.tar.gz (contents, props changed) public_html/releases/1.1.0.1/abcl-bin-1.1.0.1.zip (contents, props changed) public_html/releases/1.1.0.1/abcl-contrib-1.1.0.1.jar (contents, props changed) public_html/releases/1.1.0.1/abcl-contrib.jar (contents, props changed) public_html/releases/1.1.0.1/abcl-src-1.1.0.1.tar.gz (contents, props changed) public_html/releases/1.1.0.1/abcl-src-1.1.0.1.zip (contents, props changed) public_html/releases/1.1.0.1/abcl.jar (contents, props changed) Added: public_html/releases/1.1.0.1/abcl-1.1.0.1.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.1/abcl-bin-1.1.0.1.tar.gz ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.1/abcl-bin-1.1.0.1.zip ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.1/abcl-contrib-1.1.0.1.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.1/abcl-contrib.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.1/abcl-src-1.1.0.1.tar.gz ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.1/abcl-src-1.1.0.1.zip ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.1/abcl.jar ============================================================================== Binary file. No diff available. From mevenson at common-lisp.net Tue Dec 18 21:54:37 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 13:54:37 -0800 Subject: [armedbear-cvs] r14335 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Tue Dec 18 13:54:37 2012 New Revision: 14335 Log: abcl-contrib: better logic for FIND-SYSTEM-JAR to deal with post patchlevel distinction. Modified: trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp Modified: trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp Tue Dec 18 12:19:28 2012 (r14334) +++ trunk/abcl/src/org/armedbear/lisp/abcl-contrib.lisp Tue Dec 18 13:54:37 2012 (r14335) @@ -2,20 +2,27 @@ (require :asdf) +(defun system-jar-p (p) + (and (pathnamep p) + (equal (pathname-type p) "jar") + (let ((name (pathname-name p))) + (or + (java:jstatic "matches" + "java.util.regex.Pattern" + "abcl(-[0-9]\\.[0-9]\\.[0-9]([+~-].+)?)?" + name) + (java:jstatic "matches" + "java.util.regex.Pattern" + "abcl(-[0-9]\\.[0-9]\\.[0-9]\\.[0-9]([+~-]+)?)?" + name))) + p)) + (defun find-system-jar () - "Return the pathname of the system jar, one of `abcl.jar` or `abcl-m.n.p.jar` or `abcl-m.n.p-something.jar`." - (flet ((match-system-jar (p) - (and (pathnamep p) - (equal (pathname-type p) "jar") - (java:jstatic "matches" - "java.util.regex.Pattern" - "abcl(-[0-9]\\.[0-9]\\.[0-9]([+~-].+)?)?" - (pathname-name p)) - p))) + "Return the pathname of the system jar, one of `abcl.jar` or `abcl-m.n.p.jar` or `abcl-m.n.p[.~-]something.jar`." (dolist (loader (java:dump-classpath)) - (let ((abcl-jar (some #'match-system-jar loader))) + (let ((abcl-jar (some #'system-jar-p loader))) (when abcl-jar - (return abcl-jar)))))) + (return abcl-jar))))) (defvar *abcl-jar* nil "Pathname of the jar that ABCL was loaded from. @@ -25,20 +32,10 @@ "Pathname of the ABCL contrib. Initialized via SYSTEM:FIND-CONTRIB") -(defun find-contrib (&key (verbose nil)) +(defun find-and-add-contrib (&key (verbose nil)) "Attempt to find the ABCL contrib jar and add its contents to ASDF. Returns the pathname of the contrib if it can be found." - (unless *abcl-contrib* - (unless *abcl-jar* - (setf *abcl-jar* (find-system-jar))) - (when *abcl-jar* - (let* ((abcl-contrib-name - (concatenate 'string "abcl-contrib" - (subseq (pathname-name *abcl-jar*) 4))) - (abcl-contrib (make-pathname :defaults *abcl-jar* - :name abcl-contrib-name))) - (if (probe-file abcl-contrib) - (progn + (flet ((add-contrib (abcl-contrib) (setf *abcl-contrib* abcl-contrib) (dolist (asdf-file (directory (make-pathname :device (list *abcl-contrib*) @@ -49,10 +46,27 @@ (unless (find asdf-directory asdf:*central-registry* :test #'equal) (push asdf-directory asdf:*central-registry*) (format verbose "~&Added ~A to ASDF.~&" asdf-directory)))) - *abcl-contrib*) - (error "Failed to find abcl-contrib at '~A'." abcl-contrib)))))) + *abcl-contrib*)) + (unless *abcl-contrib* + (unless *abcl-jar* + (setf *abcl-jar* (find-system-jar))) + (when *abcl-jar* + (let* ((abcl-contrib-name + (concatenate 'string "abcl-contrib" + (subseq (pathname-name *abcl-jar*) 4))) + (abcl-contrib (make-pathname :defaults *abcl-jar* + :name abcl-contrib-name))) + (if (probe-file abcl-contrib) + (add-contrib abcl-contrib) + (let ((abcl-contrib (make-pathname :defaults abcl-contrib + :name "abcl-contrib"))) + (if (probe-file abcl-contrib) + (progn + (warn "Falling back to using '~A' to satisfy require." abcl-contrib) + (add-contrib abcl-contrib) + (error "Failed to find abcl-contrib at '~A'." abcl-contrib)))))))))) -(when (find-contrib :verbose t) +(when (find-and-add-contrib :verbose t) (provide :abcl-contrib)) From mevenson at common-lisp.net Tue Dec 18 21:59:12 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Tue, 18 Dec 2012 13:59:12 -0800 Subject: [armedbear-cvs] r14336 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Tue Dec 18 13:59:12 2012 New Revision: 14336 Log: backport r14335 | mevenson | 2012-12-18 22:54:37 +0100 (Tue, 18 Dec 2012) | 1 line abcl-contrib: better logic for FIND-SYSTEM-JAR to deal with post patchlevel distinction. Modified: branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp Modified: branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp Tue Dec 18 13:54:37 2012 (r14335) +++ branches/1.1.x/src/org/armedbear/lisp/abcl-contrib.lisp Tue Dec 18 13:59:12 2012 (r14336) @@ -2,20 +2,27 @@ (require :asdf) +(defun system-jar-p (p) + (and (pathnamep p) + (equal (pathname-type p) "jar") + (let ((name (pathname-name p))) + (or + (java:jstatic "matches" + "java.util.regex.Pattern" + "abcl(-[0-9]\\.[0-9]\\.[0-9]([+~-].+)?)?" + name) + (java:jstatic "matches" + "java.util.regex.Pattern" + "abcl(-[0-9]\\.[0-9]\\.[0-9]\\.[0-9]([+~-]+)?)?" + name))) + p)) + (defun find-system-jar () - "Return the pathname of the system jar, one of `abcl.jar` or `abcl-m.n.p.jar` or `abcl-m.n.p-something.jar`." - (flet ((match-system-jar (p) - (and (pathnamep p) - (equal (pathname-type p) "jar") - (java:jstatic "matches" - "java.util.regex.Pattern" - "abcl(-[0-9]\\.[0-9]\\.[0-9]([+~-].+)?)?" - (pathname-name p)) - p))) + "Return the pathname of the system jar, one of `abcl.jar` or `abcl-m.n.p.jar` or `abcl-m.n.p[.~-]something.jar`." (dolist (loader (java:dump-classpath)) - (let ((abcl-jar (some #'match-system-jar loader))) + (let ((abcl-jar (some #'system-jar-p loader))) (when abcl-jar - (return abcl-jar)))))) + (return abcl-jar))))) (defvar *abcl-jar* nil "Pathname of the jar that ABCL was loaded from. @@ -25,20 +32,10 @@ "Pathname of the ABCL contrib. Initialized via SYSTEM:FIND-CONTRIB") -(defun find-contrib (&key (verbose nil)) +(defun find-and-add-contrib (&key (verbose nil)) "Attempt to find the ABCL contrib jar and add its contents to ASDF. Returns the pathname of the contrib if it can be found." - (unless *abcl-contrib* - (unless *abcl-jar* - (setf *abcl-jar* (find-system-jar))) - (when *abcl-jar* - (let* ((abcl-contrib-name - (concatenate 'string "abcl-contrib" - (subseq (pathname-name *abcl-jar*) 4))) - (abcl-contrib (make-pathname :defaults *abcl-jar* - :name abcl-contrib-name))) - (if (probe-file abcl-contrib) - (progn + (flet ((add-contrib (abcl-contrib) (setf *abcl-contrib* abcl-contrib) (dolist (asdf-file (directory (make-pathname :device (list *abcl-contrib*) @@ -49,10 +46,27 @@ (unless (find asdf-directory asdf:*central-registry* :test #'equal) (push asdf-directory asdf:*central-registry*) (format verbose "~&Added ~A to ASDF.~&" asdf-directory)))) - *abcl-contrib*) - (error "Failed to find abcl-contrib at '~A'." abcl-contrib)))))) + *abcl-contrib*)) + (unless *abcl-contrib* + (unless *abcl-jar* + (setf *abcl-jar* (find-system-jar))) + (when *abcl-jar* + (let* ((abcl-contrib-name + (concatenate 'string "abcl-contrib" + (subseq (pathname-name *abcl-jar*) 4))) + (abcl-contrib (make-pathname :defaults *abcl-jar* + :name abcl-contrib-name))) + (if (probe-file abcl-contrib) + (add-contrib abcl-contrib) + (let ((abcl-contrib (make-pathname :defaults abcl-contrib + :name "abcl-contrib"))) + (if (probe-file abcl-contrib) + (progn + (warn "Falling back to using '~A' to satisfy require." abcl-contrib) + (add-contrib abcl-contrib) + (error "Failed to find abcl-contrib at '~A'." abcl-contrib)))))))))) -(when (find-contrib :verbose t) +(when (find-and-add-contrib :verbose t) (provide :abcl-contrib)) From mevenson at common-lisp.net Wed Dec 19 09:44:37 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Wed, 19 Dec 2012 01:44:37 -0800 Subject: [armedbear-cvs] r14337 - tags/1.1.0.2 Message-ID: Author: mevenson Date: Wed Dec 19 01:44:37 2012 New Revision: 14337 Log: 1.1.0.2: mkcol for tag. Added: tags/1.1.0.2/ From mevenson at common-lisp.net Wed Dec 19 09:44:51 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Wed, 19 Dec 2012 01:44:51 -0800 Subject: [armedbear-cvs] r14338 - in branches/1.1.x: . src/org/armedbear/lisp Message-ID: Author: mevenson Date: Wed Dec 19 01:44:50 2012 New Revision: 14338 Log: 1.1.0.2: Once more, with feeling. Modified: branches/1.1.x/abcl.rdf branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Wed Dec 19 01:44:37 2012 (r14337) +++ branches/1.1.x/abcl.rdf Wed Dec 19 01:44:50 2012 (r14338) @@ -1,15 +1,21 @@ # -*- Mode: n3 -*- @prefix dc: . @prefix abcl: . + at prefix doap: . -<> dc:version "abcl-1.1.0.1" . -<> a abcl:release . +<> dc:version "abcl-1.1.0.2" ; + abcl:releaseCandidate "release" ; + a abcl:release ; + abcl:tag ; + dc:identifier ; + doap:language "Common Lisp" ; + dc:created "01-JAN-2004" ; + dc:modified "19-DEC-2012" . <> abcl:is "W3C Turtle RDF serializations format" ; abcl:tag . - at prefix doap: . @prefix rdf: . @prefix rdfs: . @@ -18,17 +24,6 @@ <> rdfs:seeAlso . <> rdfs:seeAlso . - at prefix dc: . -<> - abcl:tag ; - dc:identifier ; - doap:language "Common Lisp" ; - dc:created "01-JAN-2004" ; - dc:modified "07-DEC-2012" ; - - dc:version "abcl-1.1.0.1" ; - abcl:releaseCandidate "release" . - <> rdfs:seeAlso [ a rdf:Alt ; rdf:_1 ; @@ -36,9 +31,6 @@ rdf:_3 ] . - - at prefix dc: . - a doap:Project ; doap:label "Armed Bear Common Lisp" ; @@ -76,7 +68,7 @@ "Common Lisp", "Java", "Ant", "Bourne Shell Script", "Windows Batch Script" . _:user dc:identifier ; - rdf:label "V-ille" . + rdf:label "V-ille" . rdfs:seeAlso . Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Wed Dec 19 01:44:37 2012 (r14337) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Wed Dec 19 01:44:50 2012 (r14338) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0-dev"; + static final String baseVersion = "1.1.0.2"; static void init() { try { From mevenson at common-lisp.net Wed Dec 19 09:45:41 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Wed, 19 Dec 2012 01:45:41 -0800 Subject: [armedbear-cvs] r14339 - tags/1.1.0.2/abcl Message-ID: Author: mevenson Date: Wed Dec 19 01:45:41 2012 New Revision: 14339 Log: 1.1.0.2: tag branch. Added: tags/1.1.0.2/abcl/ - copied from r14338, branches/1.1.x/ From mevenson at common-lisp.net Wed Dec 19 09:49:22 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Wed, 19 Dec 2012 01:49:22 -0800 Subject: [armedbear-cvs] r14340 - in branches/1.1.x: . src/org/armedbear/lisp Message-ID: Author: mevenson Date: Wed Dec 19 01:49:22 2012 New Revision: 14340 Log: 1.1.x: now build abcl-1.1.1-dev artifacts. Modified: branches/1.1.x/abcl.rdf branches/1.1.x/src/org/armedbear/lisp/Version.java Modified: branches/1.1.x/abcl.rdf ============================================================================== --- branches/1.1.x/abcl.rdf Wed Dec 19 01:45:41 2012 (r14339) +++ branches/1.1.x/abcl.rdf Wed Dec 19 01:49:22 2012 (r14340) @@ -3,11 +3,13 @@ @prefix abcl: . @prefix doap: . -<> dc:version "abcl-1.1.0.2" ; - abcl:releaseCandidate "release" ; - a abcl:release ; - abcl:tag ; - dc:identifier ; +<> dc:version "abcl-1.1.1-dev" ; + abcl:branch +# abcl:releaseCandidate "dev" ; +# abcl:buildIdentifier "dev" ; +# a abcl:release ; +# abcl:tag ; +# dc:identifier ; doap:language "Common Lisp" ; dc:created "01-JAN-2004" ; dc:modified "19-DEC-2012" . Modified: branches/1.1.x/src/org/armedbear/lisp/Version.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/Version.java Wed Dec 19 01:45:41 2012 (r14339) +++ branches/1.1.x/src/org/armedbear/lisp/Version.java Wed Dec 19 01:49:22 2012 (r14340) @@ -41,7 +41,7 @@ { private Version() {} - static final String baseVersion = "1.1.0.2"; + static final String baseVersion = "1.1.1-dev"; static void init() { try { From mevenson at common-lisp.net Wed Dec 19 10:00:42 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Wed, 19 Dec 2012 02:00:42 -0800 Subject: [armedbear-cvs] r14341 - public_html/releases/1.1.0.2 Message-ID: Author: mevenson Date: Wed Dec 19 02:00:36 2012 New Revision: 14341 Log: 1.1.0.2: binary release artifacts. Added: public_html/releases/1.1.0.2/ public_html/releases/1.1.0.2/abcl-1.1.0.2.jar (contents, props changed) public_html/releases/1.1.0.2/abcl-bin-1.1.0.2.tar.gz (contents, props changed) public_html/releases/1.1.0.2/abcl-bin-1.1.0.2.zip (contents, props changed) public_html/releases/1.1.0.2/abcl-contrib-1.1.0.2.jar (contents, props changed) public_html/releases/1.1.0.2/abcl-contrib.jar (contents, props changed) public_html/releases/1.1.0.2/abcl-src-1.1.0.2.tar.gz (contents, props changed) public_html/releases/1.1.0.2/abcl-src-1.1.0.2.zip (contents, props changed) public_html/releases/1.1.0.2/abcl.jar (contents, props changed) Added: public_html/releases/1.1.0.2/abcl-1.1.0.2.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.2/abcl-bin-1.1.0.2.tar.gz ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.2/abcl-bin-1.1.0.2.zip ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.2/abcl-contrib-1.1.0.2.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.2/abcl-contrib.jar ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.2/abcl-src-1.1.0.2.tar.gz ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.2/abcl-src-1.1.0.2.zip ============================================================================== Binary file. No diff available. Added: public_html/releases/1.1.0.2/abcl.jar ============================================================================== Binary file. No diff available. From rschlatte at common-lisp.net Sun Dec 23 15:19:34 2012 From: rschlatte at common-lisp.net (rschlatte at common-lisp.net) Date: Sun, 23 Dec 2012 07:19:34 -0800 Subject: [armedbear-cvs] r14342 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: rschlatte Date: Sun Dec 23 07:19:32 2012 New Revision: 14342 Log: Add new slots at the end in inherited classes - Fixes #280 (reported by Pascal Costanza) Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/clos.lisp Wed Dec 19 02:00:36 2012 (r14341) +++ trunk/abcl/src/org/armedbear/lisp/clos.lisp Sun Dec 23 07:19:32 2012 (r14342) @@ -675,11 +675,12 @@ ;;; Slot inheritance (defun std-compute-slots (class) - (let* ((all-slots (nreverse ;; Slots of base class should come first - (mapappend #'(lambda (c) (reverse (class-direct-slots c))) - (reverse (class-precedence-list class))))) - (all-names (remove-duplicates - (mapcar 'slot-definition-name all-slots)))) + (let* ((all-slots (mapappend #'(lambda (c) (class-direct-slots c)) + ;; Slots of base class must come first + (reverse (class-precedence-list class)))) + (all-names (delete-duplicates + (mapcar 'slot-definition-name all-slots) + :from-end t))) (mapcar #'(lambda (name) (funcall (if (eq (class-of class) +the-standard-class+) @@ -687,9 +688,12 @@ #'compute-effective-slot-definition) class name - (remove name all-slots - :key 'slot-definition-name - :test-not #'eq))) + ;; Slot of inherited class must override initfunction, + ;; documentation of base class + (nreverse + (remove name all-slots + :key 'slot-definition-name + :test-not #'eq)))) all-names))) (defun std-compute-effective-slot-definition (class name direct-slots) From mevenson at common-lisp.net Sun Dec 23 16:46:02 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Sun, 23 Dec 2012 08:46:02 -0800 Subject: [armedbear-cvs] r14343 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Sun Dec 23 08:46:01 2012 New Revision: 14343 Log: Backport r14342 | rschlatte | 2012-12-23 16:19:32 +0100 (Sun, 23 Dec 2012) | 3 lines Add new slots at the end in inherited classes - Fixes #280 (reported by Pascal Costanza) Modified: branches/1.1.x/src/org/armedbear/lisp/clos.lisp Modified: branches/1.1.x/src/org/armedbear/lisp/clos.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/clos.lisp Sun Dec 23 07:19:32 2012 (r14342) +++ branches/1.1.x/src/org/armedbear/lisp/clos.lisp Sun Dec 23 08:46:01 2012 (r14343) @@ -675,11 +675,12 @@ ;;; Slot inheritance (defun std-compute-slots (class) - (let* ((all-slots (nreverse ;; Slots of base class should come first - (mapappend #'(lambda (c) (reverse (class-direct-slots c))) - (reverse (class-precedence-list class))))) - (all-names (remove-duplicates - (mapcar 'slot-definition-name all-slots)))) + (let* ((all-slots (mapappend #'(lambda (c) (class-direct-slots c)) + ;; Slots of base class must come first + (reverse (class-precedence-list class)))) + (all-names (delete-duplicates + (mapcar 'slot-definition-name all-slots) + :from-end t))) (mapcar #'(lambda (name) (funcall (if (eq (class-of class) +the-standard-class+) @@ -687,9 +688,12 @@ #'compute-effective-slot-definition) class name - (remove name all-slots - :key 'slot-definition-name - :test-not #'eq))) + ;; Slot of inherited class must override initfunction, + ;; documentation of base class + (nreverse + (remove name all-slots + :key 'slot-definition-name + :test-not #'eq)))) all-names))) (defun std-compute-effective-slot-definition (class name direct-slots) From rschlatte at common-lisp.net Sun Dec 30 17:09:08 2012 From: rschlatte at common-lisp.net (rschlatte at common-lisp.net) Date: Sun, 30 Dec 2012 09:09:08 -0800 Subject: [armedbear-cvs] r14344 - trunk/abcl/src/org/armedbear/lisp Message-ID: Author: rschlatte Date: Sun Dec 30 09:09:06 2012 New Revision: 14344 Log: Avoid premature initialization of method-class, method-combination in gfs - fixes #279 - reported by Pascal Costanza Modified: trunk/abcl/src/org/armedbear/lisp/StandardGenericFunction.java trunk/abcl/src/org/armedbear/lisp/clos.lisp Modified: trunk/abcl/src/org/armedbear/lisp/StandardGenericFunction.java ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/StandardGenericFunction.java Sun Dec 23 08:46:01 2012 (r14343) +++ trunk/abcl/src/org/armedbear/lisp/StandardGenericFunction.java Sun Dec 30 09:09:06 2012 (r14344) @@ -61,7 +61,7 @@ slots[StandardGenericFunctionClass.SLOT_INDEX_METHOD_CLASS] = StandardClass.STANDARD_METHOD; slots[StandardGenericFunctionClass.SLOT_INDEX_METHOD_COMBINATION] = - Symbol.STANDARD; // fixed up by shared-initialize :after in clos.lisp + list(Symbol.STANDARD); // fixed up by clos.lisp:shared-initialize :after slots[StandardGenericFunctionClass.SLOT_INDEX_ARGUMENT_PRECEDENCE_ORDER] = NIL; slots[StandardGenericFunctionClass.SLOT_INDEX_DECLARATIONS] = NIL; Modified: trunk/abcl/src/org/armedbear/lisp/clos.lisp ============================================================================== --- trunk/abcl/src/org/armedbear/lisp/clos.lisp Sun Dec 23 08:46:01 2012 (r14343) +++ trunk/abcl/src/org/armedbear/lisp/clos.lisp Sun Dec 30 09:09:06 2012 (r14344) @@ -1825,8 +1825,8 @@ (defun make-instance-standard-generic-function (generic-function-class &key name lambda-list - method-class - method-combination + (method-class +the-standard-method-class+) + (method-combination +the-standard-method-combination+) argument-precedence-order declarations documentation) @@ -1834,6 +1834,11 @@ (declare (ignore generic-function-class)) (check-argument-precedence-order lambda-list argument-precedence-order) (let ((gf (std-allocate-instance +the-standard-generic-function-class+))) + (unless (classp method-class) (setf method-class (find-class method-class))) + (unless (typep method-combination 'method-combination) + (setf method-combination + (find-method-combination + gf (car method-combination) (cdr method-combination)))) (%set-generic-function-name gf name) (%set-generic-function-lambda-list gf lambda-list) (set-generic-function-initial-methods gf ()) @@ -4370,6 +4375,7 @@ (defmethod shared-initialize :after ((instance standard-generic-function) slot-names &key lambda-list argument-precedence-order + (method-combination '(standard)) &allow-other-keys) (let* ((plist (analyze-lambda-list lambda-list)) (required-args (getf plist ':required-args))) @@ -4377,11 +4383,13 @@ (%set-gf-optional-args instance (getf plist :optional-args)) (set-generic-function-argument-precedence-order instance (or argument-precedence-order required-args))) - (when (eq (generic-function-method-combination instance) 'standard) - ;; fix up "naked" (make-instance 'standard-generic-function) -- gfs - ;; created via defgeneric have that slot initalized properly - (set-generic-function-method-combination instance - +the-standard-method-combination+)) + (unless (typep (generic-function-method-combination instance) + 'method-combination) + ;; this fixes (make-instance 'standard-generic-function) -- the + ;; constructor of StandardGenericFunction sets this slot to '(standard) + (setf (generic-function-method-combination instance) + (find-method-combination + instance (car method-combination) (cdr method-combination)))) (finalize-standard-generic-function instance)) ;;; Readers for generic function metaobjects @@ -4587,19 +4595,11 @@ function-name &rest all-keys &key (generic-function-class +the-standard-generic-function-class+) - (method-class +the-standard-method-class+) - (method-combination +the-standard-method-combination+) &allow-other-keys) (setf all-keys (copy-list all-keys)) ; since we modify it (remf all-keys :generic-function-class) (unless (classp generic-function-class) (setf generic-function-class (find-class generic-function-class))) - (unless (classp method-class) (setf method-class (find-class method-class))) - (unless (typep method-combination 'method-combination) - (setf method-combination - (find-method-combination (class-prototype generic-function-class) - (car method-combination) - (cdr method-combination)))) (when (and (null *clos-booting*) (fboundp function-name)) (if (autoloadp function-name) (fmakunbound function-name) @@ -4609,11 +4609,7 @@ (apply (if (eq generic-function-class +the-standard-generic-function-class+) #'make-instance-standard-generic-function #'make-instance) - generic-function-class - :name function-name - :method-class method-class - :method-combination method-combination - all-keys)) + generic-function-class :name function-name all-keys)) (defun ensure-generic-function (function-name &rest all-keys &key From mevenson at common-lisp.net Mon Dec 31 10:21:19 2012 From: mevenson at common-lisp.net (mevenson at common-lisp.net) Date: Mon, 31 Dec 2012 02:21:19 -0800 Subject: [armedbear-cvs] r14345 - branches/1.1.x/src/org/armedbear/lisp Message-ID: Author: mevenson Date: Mon Dec 31 02:21:17 2012 New Revision: 14345 Log: Backport r14344 | rschlatte | 2012-12-30 18:09:06 +0100 (Sun, 30 Dec 2012) | 5 lines Avoid premature initialization of method-class, method-combination in gfs - fixes #279 - reported by Pascal Costanza Modified: branches/1.1.x/src/org/armedbear/lisp/StandardGenericFunction.java branches/1.1.x/src/org/armedbear/lisp/clos.lisp Modified: branches/1.1.x/src/org/armedbear/lisp/StandardGenericFunction.java ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/StandardGenericFunction.java Sun Dec 30 09:09:06 2012 (r14344) +++ branches/1.1.x/src/org/armedbear/lisp/StandardGenericFunction.java Mon Dec 31 02:21:17 2012 (r14345) @@ -61,7 +61,7 @@ slots[StandardGenericFunctionClass.SLOT_INDEX_METHOD_CLASS] = StandardClass.STANDARD_METHOD; slots[StandardGenericFunctionClass.SLOT_INDEX_METHOD_COMBINATION] = - Symbol.STANDARD; // fixed up by shared-initialize :after in clos.lisp + list(Symbol.STANDARD); // fixed up by clos.lisp:shared-initialize :after slots[StandardGenericFunctionClass.SLOT_INDEX_ARGUMENT_PRECEDENCE_ORDER] = NIL; slots[StandardGenericFunctionClass.SLOT_INDEX_DECLARATIONS] = NIL; Modified: branches/1.1.x/src/org/armedbear/lisp/clos.lisp ============================================================================== --- branches/1.1.x/src/org/armedbear/lisp/clos.lisp Sun Dec 30 09:09:06 2012 (r14344) +++ branches/1.1.x/src/org/armedbear/lisp/clos.lisp Mon Dec 31 02:21:17 2012 (r14345) @@ -1825,8 +1825,8 @@ (defun make-instance-standard-generic-function (generic-function-class &key name lambda-list - method-class - method-combination + (method-class +the-standard-method-class+) + (method-combination +the-standard-method-combination+) argument-precedence-order declarations documentation) @@ -1834,6 +1834,11 @@ (declare (ignore generic-function-class)) (check-argument-precedence-order lambda-list argument-precedence-order) (let ((gf (std-allocate-instance +the-standard-generic-function-class+))) + (unless (classp method-class) (setf method-class (find-class method-class))) + (unless (typep method-combination 'method-combination) + (setf method-combination + (find-method-combination + gf (car method-combination) (cdr method-combination)))) (%set-generic-function-name gf name) (%set-generic-function-lambda-list gf lambda-list) (set-generic-function-initial-methods gf ()) @@ -4370,6 +4375,7 @@ (defmethod shared-initialize :after ((instance standard-generic-function) slot-names &key lambda-list argument-precedence-order + (method-combination '(standard)) &allow-other-keys) (let* ((plist (analyze-lambda-list lambda-list)) (required-args (getf plist ':required-args))) @@ -4377,11 +4383,13 @@ (%set-gf-optional-args instance (getf plist :optional-args)) (set-generic-function-argument-precedence-order instance (or argument-precedence-order required-args))) - (when (eq (generic-function-method-combination instance) 'standard) - ;; fix up "naked" (make-instance 'standard-generic-function) -- gfs - ;; created via defgeneric have that slot initalized properly - (set-generic-function-method-combination instance - +the-standard-method-combination+)) + (unless (typep (generic-function-method-combination instance) + 'method-combination) + ;; this fixes (make-instance 'standard-generic-function) -- the + ;; constructor of StandardGenericFunction sets this slot to '(standard) + (setf (generic-function-method-combination instance) + (find-method-combination + instance (car method-combination) (cdr method-combination)))) (finalize-standard-generic-function instance)) ;;; Readers for generic function metaobjects @@ -4587,19 +4595,11 @@ function-name &rest all-keys &key (generic-function-class +the-standard-generic-function-class+) - (method-class +the-standard-method-class+) - (method-combination +the-standard-method-combination+) &allow-other-keys) (setf all-keys (copy-list all-keys)) ; since we modify it (remf all-keys :generic-function-class) (unless (classp generic-function-class) (setf generic-function-class (find-class generic-function-class))) - (unless (classp method-class) (setf method-class (find-class method-class))) - (unless (typep method-combination 'method-combination) - (setf method-combination - (find-method-combination (class-prototype generic-function-class) - (car method-combination) - (cdr method-combination)))) (when (and (null *clos-booting*) (fboundp function-name)) (if (autoloadp function-name) (fmakunbound function-name) @@ -4609,11 +4609,7 @@ (apply (if (eq generic-function-class +the-standard-generic-function-class+) #'make-instance-standard-generic-function #'make-instance) - generic-function-class - :name function-name - :method-class method-class - :method-combination method-combination - all-keys)) + generic-function-class :name function-name all-keys)) (defun ensure-generic-function (function-name &rest all-keys &key