- cmucl-cvs - mailman3.common-lisp.net

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-12-g6354120
by Raymond Toy 23 Jan '13

23 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 6354120928e97ca271298bdd8e32083718b94d7e (commit) from 83bab7fa23d38db6886680a7f19dc19a688514b2 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 6354120928e97ca271298bdd8e32083718b94d7e Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Tue Jan 22 19:55:56 2013 -0800 Update due to new docstring for rename-file. diff --git a/src/i18n/locale/cmucl.pot b/src/i18n/locale/cmucl.pot index 2d3c5ad..07711d1 100644 --- a/src/i18n/locale/cmucl.pot +++ b/src/i18n/locale/cmucl.pot @@ -2004,62 +2004,6 @@ msgstr "" msgid "Can't use :out or :in-out on pointer-like type:~% ~S" msgstr "" -#: src/code/alien-callback.lisp -msgid "Vector of all callbacks." -msgstr "" - -#: src/compiler/tn.lisp src/compiler/main.lisp src/code/describe.lisp -#: src/code/debug-int.lisp src/code/debug-info.lisp -#: src/code/foreign-linkage.lisp src/code/reader.lisp src/code/stream.lisp -#: src/code/hash-new.lisp src/code/array.lisp src/code/alien-callback.lisp -msgid "~S is not an array with a fill-pointer." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Unable to mprotect ~S bytes (~S) at ~S (~S). Callbacks may not work." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Return the trampoline pointer for the callback NAME." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "" -"~\n" -"Attempt to redefine callback with incompatible return type.\n" -" Old type was: ~A \n" -" New type is: ~A" -msgstr "" - -#: src/code/alien-callback.lisp -msgid "~\n" -"Create new trampoline (old trampoline calls old lisp function)." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Unsupported argument type: ~A" -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Unsupported return type: ~A" -msgstr "" - -#: src/code/alien-callback.lisp -msgid "" -"(defcallback NAME (RETURN-TYPE {(ARG-NAME ARG-TYPE)}*)\n" -" {doc-string} {decls}* {FORM}*)\n" -"\n" -"Define a function which can be called by foreign code. The pointer\n" -"returned by (callback NAME), when called by foreign code, invokes the\n" -"lisp function. The lisp function expects alien arguments of the\n" -"specified ARG-TYPEs and returns an alien of type RETURN-TYPE.\n" -"\n" -"If (callback NAME) is already a callback function pointer, its value\n" -"is not changed (though it's arranged that an updated version of the\n" -"lisp callback function will be called). This feature allows for\n" -"incremental redefinition of callback functions." -msgstr "" - #: src/code/sap.lisp msgid "Return T iff the SAP X points to a smaller address then the SAP Y." msgstr "" @@ -2501,6 +2445,13 @@ msgstr "" msgid "Returns the Fill-Pointer of the given Vector." msgstr "" +#: src/compiler/tn.lisp src/compiler/main.lisp src/code/describe.lisp +#: src/code/debug-int.lisp src/code/debug-info.lisp +#: src/code/foreign-linkage.lisp src/code/reader.lisp src/code/stream.lisp +#: src/code/hash-new.lisp src/code/array.lisp +msgid "~S is not an array with a fill-pointer." +msgstr "" + #: src/code/array.lisp msgid "New fill pointer, ~S, is larger than the length of the vector." msgstr "" @@ -9907,8 +9858,13 @@ msgstr "" #: src/code/filesys.lisp msgid "" -"Rename File to have the specified New-Name. If file is a stream open to a\n" -" file, then the associated file is renamed." +"Rename File to have the specified New-Name. If file is a stream\n" +" open to a file, then the associated file is renamed.\n" +"\n" +" Three values are returned if successful: the defaulted new name\n" +" composed of New-Name with missing components filled in from File;\n" +" the truename of File before it was renamed; the new truename of the\n" +" File after it was renamed." msgstr "" #: src/code/filesys.lisp ----------------------------------------------------------------------- Summary of changes: src/i18n/locale/cmucl.pot | 72 +++++++++------------------------------------ 1 files changed, 14 insertions(+), 58 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-11-g83bab7f
by Raymond Toy 18 Jan '13

18 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 83bab7fa23d38db6886680a7f19dc19a688514b2 (commit) from 180783f6ab79beca64ea3ae11a946f9dabf3c141 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 83bab7fa23d38db6886680a7f19dc19a688514b2 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Thu Jan 17 20:02:24 2013 -0800 Document the return values for RENAME-FILE. diff --git a/src/code/filesys.lisp b/src/code/filesys.lisp index 308b8b5..9d224df 100644 --- a/src/code/filesys.lisp +++ b/src/code/filesys.lisp @@ -938,8 +938,13 @@ ;;; Rename-File -- Public ;;; (defun rename-file (file new-name) - "Rename File to have the specified New-Name. If file is a stream open to a - file, then the associated file is renamed." + "Rename File to have the specified New-Name. If file is a stream + open to a file, then the associated file is renamed. + + Three values are returned if successful: the defaulted new name + composed of New-Name with missing components filled in from File; + the truename of File before it was renamed; the new truename of the + File after it was renamed." (let* ((original (truename file)) (original-namestring (unix-namestring original t)) (new-name (merge-pathnames new-name file)) ----------------------------------------------------------------------- Summary of changes: src/code/filesys.lisp | 9 +++++++-- 1 files changed, 7 insertions(+), 2 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-10-g180783f
by Raymond Toy 17 Jan '13

17 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 180783f6ab79beca64ea3ae11a946f9dabf3c141 (commit) from 7eea77dfeb313add92ed741aad47e6fbe714220c (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 180783f6ab79beca64ea3ae11a946f9dabf3c141 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 16 21:00:58 2013 -0800 Update from commit logs. diff --git a/src/general-info/release-20e.txt b/src/general-info/release-20e.txt index 585d8a0..12d7e02 100644 --- a/src/general-info/release-20e.txt +++ b/src/general-info/release-20e.txt @@ -45,10 +45,13 @@ New in this release: * Ticket #66 fixed. * Ticket #67 fixed. * Ticket #68 fixed. + * Ticket #69 fixed. * Other changes: * -8 option for build-all.sh is deprecated since we don't officially support 8-bit builds anymore. + * Some small updates to the User Manual and CMU Internals + documents to generate pdf files by default. * Improvements to the PCL implementation of CLOS: ----------------------------------------------------------------------- Summary of changes: src/general-info/release-20e.txt | 3 +++ 1 files changed, 3 insertions(+), 0 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-9-g7eea77d
by Raymond Toy 17 Jan '13

17 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 7eea77dfeb313add92ed741aad47e6fbe714220c (commit) via bf9e40aa2989d9ae6f2055cb91405802cf99c2ff (commit) via ca46df29c0cb68c07e746be0aca510a5d6873797 (commit) from ce037e96582861f0f78c071a0900803a3628f893 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 7eea77dfeb313add92ed741aad47e6fbe714220c Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 16 20:48:35 2013 -0800 Change default output format to pdf. o Change default target to generate pdf file o Update rerun loop with a better pattern that is less likely to cause an infinite loop. diff --git a/src/docs/internals/Makefile b/src/docs/internals/Makefile index bbb389b..0e9d8e6 100644 --- a/src/docs/internals/Makefile +++ b/src/docs/internals/Makefile @@ -18,7 +18,7 @@ FILES=architecture.tex back.tex compiler-overview.tex compiler.tex debugger.tex FIGURES= -all : $(MASTERFILE).dvi +all : $(MASTERFILE).pdf $(MASTERFILE).dvi : $(FILES) $(FIGURES) $(LATEX) $(MASTERFILE).tex @@ -52,7 +52,7 @@ firsttime: $(MASTERFILE).dvi %.pdf : %.tex $(PDFLATEX) $^ - @while ( grep -v 'Package: rerunfilecheck' $*.log | grep Rerun > /dev/null ); do \ + @while ( grep 'Rerun to get cross' $*.log > /dev/null ); do \ $(PDFLATEX) $<; \ done $(PDFLATEX) $< commit bf9e40aa2989d9ae6f2055cb91405802cf99c2ff Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 16 20:45:42 2013 -0800 Generate pdf file by default. o Change default from ps to pdf output. o Fix pattern for rerunning latex to prevent infinite loop due to extraneous occurrences of "Rerun". (From Carl.) o Reorder rules for generating pdf so that we generate the indices and such before starting the loop. Otherwise, we're in an infinite loop because the indices haven't been generated. diff --git a/src/docs/cmu-user/Makefile b/src/docs/cmu-user/Makefile index 4a3e345..25924ef 100644 --- a/src/docs/cmu-user/Makefile +++ b/src/docs/cmu-user/Makefile @@ -43,7 +43,7 @@ FILES = *.tex .SUFFIXES: .tex .dvi .ps .ps1 .pdf .html .info -all: cmu-user.ps +all: cmu-user.pdf # Runs LaTeX once, then reruns LaTeX as many times as necessary to get @@ -53,7 +53,7 @@ all: cmu-user.ps # been modified. %.dvi : %.tex $(FILES) $(LATEX) $< - @while ( grep Rerun $*.log > /dev/null ); do \ + @while ( grep -q "Rerun to get cross" $*.log > /dev/null ); do \ $(LATEX) $<; \ done if [ "$<" = "cmu-user.tex" ]; then $(MAKE) index; else $(MAKE) index-letter; fi @@ -62,11 +62,11 @@ all: cmu-user.ps %.pdf : %.tex $(FILES) $(PDFLATEX) $< - @while ( grep -v 'Package: rerunfilecheck' $*.log | grep Rerun > /dev/null ); do \ + if [ "$<" = "cmu-user.tex" ]; then $(MAKE) index; else $(MAKE) index-letter; fi + @while ( grep 'Rerun to get cross' $*.log > /dev/null ); do \ $(PDFLATEX) $<; \ + if [ "$<" = "cmu-user.tex" ]; then $(MAKE) index; else $(MAKE) index-letter; fi; \ done - if [ "$<" = "cmu-user.tex" ]; then $(MAKE) index; else $(MAKE) index-letter; fi - $(PDFLATEX) $< # the "-fix" option to hevea makes it run as many times as necessary # to resolve all cross-references and generate an index. commit ca46df29c0cb68c07e746be0aca510a5d6873797 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 16 20:42:33 2013 -0800 Fix issues with creating pdf and ps documents, from Carl. cmu-user.tex: o Include ifpdf package design.tex: o Include ifpdf package o Remove the home-grown ifpdf macro. macros.tex: o Remove the home-grown ifpdf macro. introduction.tex: unicode.tex: o Use \url instead of \href for URLs. diff --git a/src/docs/cmu-user/cmu-user.tex b/src/docs/cmu-user/cmu-user.tex index 4a94c16..55e8cde 100644 --- a/src/docs/cmu-user/cmu-user.tex +++ b/src/docs/cmu-user/cmu-user.tex @@ -32,6 +32,7 @@ \usepackage{xspace} \usepackage{alltt} \usepackage{index} +\usepackage{ifpdf} \usepackage{ifthen} \usepackage{calc} \usepackage{sectsty} diff --git a/src/docs/cmu-user/introduction.tex b/src/docs/cmu-user/introduction.tex index dbce9ba..2075509 100644 --- a/src/docs/cmu-user/introduction.tex +++ b/src/docs/cmu-user/introduction.tex @@ -47,7 +47,7 @@ about \cmucl. Users will also need a separate manual describing the \href{http://www.lispworks.com/documentation/HyperSpec/Front/index.htm} {Hyperspec}. \else -\emph{Hyperspec} at \href{http://www.lispworks.com/documentation/HyperSpec/Front/index.htm} +\emph{Hyperspec} at \url{http://www.lispworks.com/documentation/HyperSpec/Front/index.htm} \fi diff --git a/src/docs/cmu-user/macros.tex b/src/docs/cmu-user/macros.tex index 9c8cba5..bfb1669 100644 --- a/src/docs/cmu-user/macros.tex +++ b/src/docs/cmu-user/macros.tex @@ -4,18 +4,6 @@ % % by Raymond Toy - -% define a new conditional statement which allows us to include -% stuff conditionally when compiling to PDF. -\newif\ifpdf -\ifx\pdfoutput\undefined - \pdffalse -\else - \pdfoutput=1 - \pdftrue -\fi - - % use Palatino \renewcommand{\rmdefault}{ppl} \ifpdf diff --git a/src/docs/cmu-user/unicode.tex b/src/docs/cmu-user/unicode.tex index c6a1a98..cab4c59 100644 --- a/src/docs/cmu-user/unicode.tex +++ b/src/docs/cmu-user/unicode.tex @@ -11,7 +11,7 @@ To understand the support for Unicode, we refer the reader to the \ifpdf \href{http://www.unicode.org/}{Unicode standard}. \else -\emph{Unicode standard} at \href{http://www.unicode.org} +\emph{Unicode standard} at \url{http://www.unicode.org} \fi \section{Changes} diff --git a/src/docs/internals/design.tex b/src/docs/internals/design.tex index 753ed61..776ee1e 100644 --- a/src/docs/internals/design.tex +++ b/src/docs/internals/design.tex @@ -2,23 +2,12 @@ %\documentstyle{report} % -*- Dictionary: design -*- \documentclass{report} +\usepackage{ifpdf} \usepackage{ifthen} \usepackage{calc} \usepackage{palatino} \usepackage[hyperindex=false,colorlinks=false,urlcolor=blue]{hyperref} -% define a new conditional statement which allows us to include -% stuff conditionally when compiling to PDF. -\newif\ifpdf -\ifx\pdfoutput\undefined - \pdffalse -\else - \pdfoutput=1 - \pdftrue -\fi - - - \title{Design of CMU Common Lisp} \date{January 15, 2003} \author{Robert A. MacLachlan (ed)} ----------------------------------------------------------------------- Summary of changes: src/docs/cmu-user/Makefile | 10 +++++----- src/docs/cmu-user/cmu-user.tex | 1 + src/docs/cmu-user/introduction.tex | 2 +- src/docs/cmu-user/macros.tex | 12 ------------ src/docs/cmu-user/unicode.tex | 2 +- src/docs/internals/Makefile | 4 ++-- src/docs/internals/design.tex | 13 +------------ 7 files changed, 11 insertions(+), 33 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-6-gce037e9
by Raymond Toy 17 Jan '13

17 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via ce037e96582861f0f78c071a0900803a3628f893 (commit) from 214b6ff298c8d16a1e9b3f2d57d025e19abe4720 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit ce037e96582861f0f78c071a0900803a3628f893 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 16 20:20:41 2013 -0800 Fix ticket:69 Change *unidata-path* to be a pathname object instead of a namestring. diff --git a/src/code/unidata.lisp b/src/code/unidata.lisp index 45e8804..37134cc 100644 --- a/src/code/unidata.lisp +++ b/src/code/unidata.lisp @@ -20,7 +20,7 @@ unicode-complete unicode-complete-name load-all-unicode-data)) -(defvar *unidata-path* "ext-formats:unidata.bin") +(defvar *unidata-path* #p"ext-formats:unidata.bin") (defvar *unidata-version* "$Revision: 1.28 $") ----------------------------------------------------------------------- Summary of changes: src/code/unidata.lisp | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch rtoy-search-list-as-host created. snapshot-2013-01-6-g4711af8
by Raymond Toy 17 Jan '13

17 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, rtoy-search-list-as-host has been created at 4711af8412ffff090f22421659b47781025e4291 (commit) - Log ----------------------------------------------------------------- commit 4711af8412ffff090f22421659b47781025e4291 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 16 20:17:30 2013 -0800 First cut at making search-list a pathname host. This attempts to make a search-list pathname fill the host slot of a pathname with a search-list object instead of the current scheme which uses a unix host for the host and puts the search-list as the first part of the directory slot. code/pathname.lisp:: * Make SEARCH-LIST as subtype of HOST, defining appropriate parsers and unparsers. code/filesys.lisp: * Update PARSE-UNIX-NAMESTRING (which also handles search-lists) to return the search-list object as the host instead of putting in the directory part. diff --git a/src/code/filesys.lisp b/src/code/filesys.lisp index 308b8b5..b3362ee 100644 --- a/src/code/filesys.lisp +++ b/src/code/filesys.lisp @@ -358,11 +358,12 @@ name)) (error 'parse-error)) ;; Now we have everything we want. So return it. - (values nil ; no host for unix namestrings. + (values (if search-list + (intern-search-list search-list) + ;; no host for unix namestrings. + nil) nil ; no devices for unix namestrings. (collect ((dirs)) - (when search-list - (dirs (intern-search-list search-list))) (dolist (piece pieces) (let ((piece-start (car piece)) (piece-end (cdr piece))) diff --git a/src/code/pathname.lisp b/src/code/pathname.lisp index 0092a82..1c6d992 100644 --- a/src/code/pathname.lisp +++ b/src/code/pathname.lisp @@ -1503,6 +1503,14 @@ a host-structure or string." ;;; The SEARCH-LIST structure. ;;; (defstruct (search-list + (:include host + (:parse #'parse-search-list-namestring) + (:unparse #'unparse-search-list-namestring) + (:unparse-host #'unparse-search-list-host) + (:unparse-directory #'unparse-search-list-directory) + (:unparse-file #'unparse-unix-file) + (:unparse-enough #'unparse-unix-enough) + (:customary-case :lower)) (:print-function %print-search-list) (:make-load-form-fun (lambda (search-list) @@ -1524,6 +1532,37 @@ a host-structure or string." (print-unreadable-object (sl stream :type t) (write-string (search-list-name sl) stream))) +(defun unparse-search-list-namestring (pathname) + (declare (type pathname pathname)) + (concatenate 'simple-string + (unparse-search-list-directory pathname) + (unparse-unix-file pathname))) + +(defun unparse-search-list-host (pathname) + (declare (type pathname pathname)) + (search-list-name (%pathname-host pathname))) + +(defun unparse-search-list-directory (pathname) + (declare (type pathname pathname)) + ;; FIXME: This is a hack! + (unparse-unix-directory-list (list* :absolute + (%pathname-host pathname) + (cdr (%pathname-directory pathname))))) + +(defun parse-search-list-namestring (pathname start end) + (declare (type simple-base-string namestr) + (type index start end)) + (multiple-value-bind (host device dirs name type version) + (parse-unix-namestring pathname start end) + (unless (typep (second dirs) 'search-list) + (error 'parse-error)) + (values (second dirs) + nil + (list* :absolute (cddr dirs)) + name + type + version))) + ;;; *SEARCH-LISTS* -- internal. ;;; ;;; Hash table mapping search-list names to search-list structures. @@ -1589,6 +1628,7 @@ a host-structure or string." ;;; doesn't start with a search-list, then either error (if FLAME-IF-NONE ;;; is true) or return NIL (if FLAME-IF-NONE is false). ;;; +#+nil (defun extract-search-list (pathname flame-if-none) (with-pathname (pathname pathname) (let* ((directory (%pathname-directory pathname)) @@ -1600,6 +1640,28 @@ a host-structure or string." (t nil))))) +(defun extract-search-list (search-pathname flame-if-none) + (with-pathname (pathname search-pathname) + (let* ((search-list (%pathname-host pathname))) + (when search-list + (sys::%primitive print "search list found") + (typecase search-list + (string + (sys::%primitive print "search list is a string!")) + (search-list + (sys::%primitive print "search list is a search-list object")) + (t + (sys::%primitive print "search list unknown type!")))) + (cond ((search-list-p search-list) + search-list) + (flame-if-none + (sys::%primitive print "flame on!") + (sys::%primitive print search-pathname) + nil + #+nil(error (intl:gettext "~S doesn't start with a search-list.") pathname)) + (t + nil))))) + ;;; SEARCH-LIST -- public. ;;; ;;; We have to convert the internal form of the search-list back into a ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-5-g214b6ff
by Raymond Toy 06 Jan '13

06 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 214b6ff298c8d16a1e9b3f2d57d025e19abe4720 (commit) from e7d0e7008ecd1eab4f1274a3db8e2812a6b59014 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 214b6ff298c8d16a1e9b3f2d57d025e19abe4720 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sun Jan 6 09:53:43 2013 -0800 Add label for source paths that was missing. diff --git a/src/docs/internals/interface.tex b/src/docs/internals/interface.tex index 2a192d8..b08631e 100644 --- a/src/docs/internals/interface.tex +++ b/src/docs/internals/interface.tex @@ -3,4 +3,4 @@ \section{Error Message Utilities} \section{Source Paths} - +\label{source-paths} ----------------------------------------------------------------------- Summary of changes: src/docs/internals/interface.tex | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-4-ge7d0e70
by Raymond Toy 04 Jan '13

04 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via e7d0e7008ecd1eab4f1274a3db8e2812a6b59014 (commit) from 1dc1c331381ecd8241532c165f8bac88a3abd6b8 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit e7d0e7008ecd1eab4f1274a3db8e2812a6b59014 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Fri Jan 4 09:24:49 2013 -0800 Update rules for pdf and dvi to run latex enough times. Taken from cmu-user/Makefile. diff --git a/src/docs/internals/Makefile b/src/docs/internals/Makefile index d68c4cc..bbb389b 100644 --- a/src/docs/internals/Makefile +++ b/src/docs/internals/Makefile @@ -41,12 +41,21 @@ firsttime: $(MASTERFILE).dvi %.dvi : %.tex + $(LATEX) $< + @while ( grep Rerun $*.log > /dev/null ); do \ + $(LATEX) $<; \ + done + $(LATEX) $< %.eps : %.fig fig2dev -L ps $^ $@ %.pdf : %.tex $(PDFLATEX) $^ + @while ( grep -v 'Package: rerunfilecheck' $*.log | grep Rerun > /dev/null ); do \ + $(PDFLATEX) $<; \ + done + $(PDFLATEX) $< %.ps : %.dvi $(DVIPS) $(DVIPSOPTS) -o $@ $* ----------------------------------------------------------------------- Summary of changes: src/docs/internals/Makefile | 9 +++++++++ 1 files changed, 9 insertions(+), 0 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-3-g1dc1c33
by Raymond Toy 04 Jan '13

04 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 1dc1c331381ecd8241532c165f8bac88a3abd6b8 (commit) from f0707af1619d8e5a2f44e8a8dc00a602f2020254 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 1dc1c331381ecd8241532c165f8bac88a3abd6b8 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Thu Jan 3 20:18:53 2013 -0800 o Don't delete gif files because some are checked in. (Fix this in a better way.) o Don't infloop when creating cmu-user.pdf by skipping over the version message from rerunfilecheck before checking for Rerun messages. diff --git a/src/docs/cmu-user/Makefile b/src/docs/cmu-user/Makefile index defc4a5..4a3e345 100644 --- a/src/docs/cmu-user/Makefile +++ b/src/docs/cmu-user/Makefile @@ -62,7 +62,7 @@ all: cmu-user.ps %.pdf : %.tex $(FILES) $(PDFLATEX) $< - @while ( grep Rerun $*.log > /dev/null ); do \ + @while ( grep -v 'Package: rerunfilecheck' $*.log | grep Rerun > /dev/null ); do \ $(PDFLATEX) $<; \ done if [ "$<" = "cmu-user.tex" ]; then $(MAKE) index; else $(MAKE) index-letter; fi @@ -102,7 +102,7 @@ cmu-user-letter.tex: cmu-user.tex clean: - rm -f *.log *.bbl *.blg *.ps *.pdf *.aux *.lof *.toc *.gif *.out *.ilg + rm -f *.log *.bbl *.blg *.ps *.pdf *.aux *.lof *.toc *.out *.ilg rm -f *.vdx *.cdx *.tdx *.fdx *.idx *.cnd *.fnd *.tnd *.vnd *.haux rm -f *.html *.hcnd *.htnd *.hvnd *.hfnd *.htoc ----------------------------------------------------------------------- Summary of changes: src/docs/cmu-user/Makefile | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2013-01-2-gf0707af
by Raymond Toy 03 Jan '13

03 Jan '13

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via f0707af1619d8e5a2f44e8a8dc00a602f2020254 (commit) via c5cacfc73a37cd18cce4f18a449202d4ace13d23 (commit) from bb144c9d0f653d19d32bb1a703b445a651cb131f (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit f0707af1619d8e5a2f44e8a8dc00a602f2020254 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 2 16:47:42 2013 -0800 Put back the chapter Retargeting the Compiler. The text is there, but the chapter heading was missing. diff --git a/src/docs/internals/retargeting.tex b/src/docs/internals/retargeting.tex index 9fa2c81..08399cc 100644 --- a/src/docs/internals/retargeting.tex +++ b/src/docs/internals/retargeting.tex @@ -1,5 +1,6 @@ \part{Compiler Retargeting} +\chapter{Retargeting the Compiler} [\#\#\# In general, it is a danger sign if a generator references a TN that isn't an commit c5cacfc73a37cd18cce4f18a449202d4ace13d23 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Jan 2 16:45:52 2013 -0800 Remove duplicated definitions of list-all-external-formats and describe-external-formats in the documentation. diff --git a/src/docs/cmu-user/unicode.tex b/src/docs/cmu-user/unicode.tex index 921a40d..c6a1a98 100644 --- a/src/docs/cmu-user/unicode.tex +++ b/src/docs/cmu-user/unicode.tex @@ -615,18 +615,6 @@ utility functions are provided to make access easier. converting the octets. \end{defun} -\begin{defun}{}{list-all-external-formats}{} - \code{list-all-external-formats} produces a list of all known - external formats and the known aliases for for them. Each element - of the list is a list consisting of the name of the external format - and a list of the known aliases for the format. -\end{defun} - -\begin{defun}{}{describe-external-format}{\args \var{external-format}} - \code{describe-external-format} prints a description of the - specified external-format. -\end{defun} - \section{Writing External Formats} \subsection{External Formats} ----------------------------------------------------------------------- Summary of changes: src/docs/cmu-user/unicode.tex | 12 ------------ src/docs/internals/retargeting.tex | 1 + 2 files changed, 1 insertions(+), 12 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0