Revision: 4631
Author: edi
URL: http://bknr.net/trac/changeset/4631
ECL fix
U trunk/thirdparty/hunchentoot/CHANGELOG
U trunk/thirdparty/hunchentoot/specials.lisp
Modified: trunk/thirdparty/hunchentoot/CHANGELOG
===================================================================
--- trunk/thirdparty/hunchentoot/CHANGELOG 2011-01-21 18:58:17 UTC (rev 4630)
+++ trunk/thirdparty/hunchentoot/CHANGELOG 2011-01-21 19:01:44 UTC (rev 4631)
@@ -1,3 +1,4 @@
+Patch for compilation with ECL (Sohail Somani)
Fix DEFINE-EASY-HANDLER for multiple acceptors (Nicolas Neuss)
Revived *SHOW-LISP-BACKTRACES-P*
Made sure "100 Continue" is returned even if the client sends "Expect: 100-continue" twice (reported by Gordon Sims)
Modified: trunk/thirdparty/hunchentoot/specials.lisp
===================================================================
--- trunk/thirdparty/hunchentoot/specials.lisp 2011-01-21 18:58:17 UTC (rev 4630)
+++ trunk/thirdparty/hunchentoot/specials.lisp 2011-01-21 19:01:44 UTC (rev 4631)
@@ -315,9 +315,10 @@
"The default connection timeout used when an acceptor is reading
from and writing to a socket stream.")
-(define-symbol-macro *supports-threads-p*
- #+:lispworks t
- #-:lispworks bt:*supports-threads-p*)
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (define-symbol-macro *supports-threads-p*
+ #+:lispworks t
+ #-:lispworks bt:*supports-threads-p*))
(defvar *global-session-db-lock*
(load-time-value (and *supports-threads-p* (make-lock "global-session-db-lock")))
Revision: 4630
Author: edi
URL: http://bknr.net/trac/changeset/4630
Fix DEFINE-EASY-HANDLER
U trunk/thirdparty/hunchentoot/CHANGELOG
U trunk/thirdparty/hunchentoot/easy-handlers.lisp
Modified: trunk/thirdparty/hunchentoot/CHANGELOG
===================================================================
--- trunk/thirdparty/hunchentoot/CHANGELOG 2011-01-12 22:42:58 UTC (rev 4629)
+++ trunk/thirdparty/hunchentoot/CHANGELOG 2011-01-21 18:58:17 UTC (rev 4630)
@@ -1,3 +1,4 @@
+Fix DEFINE-EASY-HANDLER for multiple acceptors (Nicolas Neuss)
Revived *SHOW-LISP-BACKTRACES-P*
Made sure "100 Continue" is returned even if the client sends "Expect: 100-continue" twice (reported by Gordon Sims)
Fixed typo in code which interprets transfer encodings
@@ -24,7 +25,7 @@
Version 1.0.0
2009-02-19
Complete architectural redesign (together with Hans Hübner)
-Lots of small fixes and improvements, too many to enumerate here
+Lots of small fixes and improvements, too many to enumerate here
Version 0.15.6
2008-04-09
@@ -75,7 +76,7 @@
Version 0.14.4
2007-10-20
-Made log stream shared on OpenMCL (thanks to Gary Byers)
+Made log stream shared on OpenMCL (thanks to Gary Byers)
Version 0.14.3
2007-10-07
@@ -83,12 +84,12 @@
Version 0.14.2
2007-09-26
-Better handling of PORT parameter in REDIRECT (thanks to Vladimir Sedach)
+Better handling of PORT parameter in REDIRECT (thanks to Vladimir Sedach)
Version 0.14.1
2007-09-24
Fixed bug where you couldn't set "Server" header (caught by Ralf Mattes)
-Documentation clarification for HEADER-OUT function
+Documentation clarification for HEADER-OUT function
Version 0.14.0
2007-09-18
@@ -100,12 +101,12 @@
Version 0.12.1
2007-09-13
-Better support for WITH-TIMEOUT on SBCL/Win32 (thanks to Anton Vodonosov)
-
+Better support for WITH-TIMEOUT on SBCL/Win32 (thanks to Anton Vodonosov)
+
Version 0.12.0
2007-09-07
Now uses bound for flexi stream returned by RAW-POST-DATA
-Needs FLEXI-STREAMS 0.12.0 or higher
+Needs FLEXI-STREAMS 0.12.0 or higher
Version 0.11.2
2007-09-05
@@ -115,7 +116,7 @@
Version 0.11.1
2007-05-25
Fixes for OpenMCL (thanks to Lennart Staflin and Tiarnan O'Corrain)
-
+
Version 0.11.0
2007-05-25
Added server names and coupled them with easy handlers (suggested by Mac Chan)
@@ -137,7 +138,7 @@
Version 0.9.1
2007-04-29
Added PORT parameter to REDIRECT (suggested by Cyrus Harmon)
-Exported REMOVE-SESSION (suggested by Vamsee Kanakala)
+Exported REMOVE-SESSION (suggested by Vamsee Kanakala)
Version 0.9.0
2007-04-19
@@ -192,12 +193,12 @@
Version 0.7.0
2007-03-09
Development port (no threads) to SBCL/Win32 (patch by Marko Kocic)
-Support for compilation without SSL
+Support for compilation without SSL
Version 0.6.2
2007-02-22
Don't use NSTRING-UPCASE for outgoing headers (bug caught by Saurabh Nanda)
-Changed ProxyPass example in docs from /lisp to /hunchentoot
+Changed ProxyPass example in docs from /lisp to /hunchentoot
Version 0.6.1
2007-01-24
@@ -249,7 +250,7 @@
Version 0.4.7
2006-11-06
Changed behaviour of REAL-REMOTE-ADDR (as suggested by Robert J. Macomber)
-Fixed COOKIE-OUT (thanks to Robert J. Macomber)
+Fixed COOKIE-OUT (thanks to Robert J. Macomber)
Version 0.4.6
2006-11-05
@@ -267,7 +268,7 @@
Version 0.4.3
2006-10-11
OpenMCL fixes (by Ralf Stoye)
-
+
Version 0.4.2
2006-10-10
No timeouts for mod_lisp servers (as in Hunchentoot 0.3.x)
@@ -279,8 +280,8 @@
Version 0.4.0
2006-10-10
Ported to CMUCL, SBCL, OpenMCL, and AllegroCL
-Merged with TBNL
-Tons of small changes, too many to list them individually
+Merged with TBNL
+Tons of small changes, too many to list them individually
Version 0.3.2
2006-09-14
@@ -297,17 +298,17 @@
Version 0.2.2
2006-08-31
-Skip START-OUTPUT advice completely if working for TBNL
+Skip START-OUTPUT advice completely if working for TBNL
Version 0.2.1
2006-08-28
Added write timeouts for LW 5.0
-Updated LW links in documentation
+Updated LW links in documentation
Version 0.2.0
2006-08-28
Serves as infrastructure for TBNL now (to replace KMRCL)
-For HTTP/1.1 only send 'Keep-Alive' headers if explicitly requested
+For HTTP/1.1 only send 'Keep-Alive' headers if explicitly requested
Version 0.1.5
2006-08-23
@@ -316,8 +317,8 @@
Version 0.1.4
2006-08-22
Refactored streams.lisp to appease LW compiler (thanks to Martin Simmons)
-Changed handling of version string
-Changed package handling in system definition (thanks to Christophe Rhodes)
+Changed handling of version string
+Changed package handling in system definition (thanks to Christophe Rhodes)
Version 0.1.3
2006-02-08
@@ -334,5 +335,5 @@
Version 0.1.0
2005-12-31
Initial public release
-
+
[For earlier changes see the file "CHANGELOG_TBNL" that is included with the release.]
Modified: trunk/thirdparty/hunchentoot/easy-handlers.lisp
===================================================================
--- trunk/thirdparty/hunchentoot/easy-handlers.lisp 2011-01-12 22:42:58 UTC (rev 4629)
+++ trunk/thirdparty/hunchentoot/easy-handlers.lisp 2011-01-21 18:58:17 UTC (rev 4630)
@@ -288,8 +288,11 @@
`(progn
(setq *easy-handler-alist*
(delete-if (lambda (list)
- (or (equal ,uri (first list))
- (eq ',name (third list))))
+ (and (or (equal ,uri (first list))
+ (eq ',name (third list)))
+ (or (eq ,acceptor-names t)
+ (intersection ,acceptor-names
+ (second list)))))
*easy-handler-alist*))
(push (list ,uri ,acceptor-names ',name) *easy-handler-alist*)))))
(defun ,name (&key ,@(loop for part in lambda-list
Revision: 4629
Author: edi
URL: http://bknr.net/trac/changeset/4629
Forgot one...
U trunk/thirdparty/cl-unicode/build/dump.lisp
Modified: trunk/thirdparty/cl-unicode/build/dump.lisp
===================================================================
--- trunk/thirdparty/cl-unicode/build/dump.lisp 2011-01-12 22:40:12 UTC (rev 4628)
+++ trunk/thirdparty/cl-unicode/build/dump.lisp 2011-01-12 22:42:58 UTC (rev 4629)
@@ -190,7 +190,7 @@
is not used in read.lisp) and uses it to create a file
\"derived-properties\" which will be used by CL-UNICODE-TEST."
(with-output-to-source-file (out (make-pathname :name "derived-properties"
- :type :unspecific
+ :type nil
:directory '(:relative :up "test"))
:no-header-p t)
(let (last-test)
Revision: 4628
Author: edi
URL: http://bknr.net/trac/changeset/4628
Try it again
U trunk/thirdparty/cl-unicode/CHANGELOG.txt
U trunk/thirdparty/cl-unicode/build/dump.lisp
Modified: trunk/thirdparty/cl-unicode/CHANGELOG.txt
===================================================================
--- trunk/thirdparty/cl-unicode/CHANGELOG.txt 2011-01-12 15:37:10 UTC (rev 4627)
+++ trunk/thirdparty/cl-unicode/CHANGELOG.txt 2011-01-12 22:40:12 UTC (rev 4628)
@@ -1,3 +1,5 @@
+Make pathname creation conformant (thanks to Juan José Garcia-Ripoll)
+
Version 0.1.1
2008-07-24
Make ADD-HANGUL-NAMES faster for ClozureCL
Modified: trunk/thirdparty/cl-unicode/build/dump.lisp
===================================================================
--- trunk/thirdparty/cl-unicode/build/dump.lisp 2011-01-12 15:37:10 UTC (rev 4627)
+++ trunk/thirdparty/cl-unicode/build/dump.lisp 2011-01-12 22:40:12 UTC (rev 4628)
@@ -105,7 +105,10 @@
writes to the file denoted by RELATIVE-PATH - a path relative to the
location of this source file. Writes a Lisp header to the files
unless NO-HEADER-P is true."
- `(let ((pathname (merge-pathnames ,relative-path *this-file*)))
+ `(let ((pathname (merge-pathnames ,relative-path
+ (make-pathname :name nil
+ :type nil
+ :defaults *this-file*))))
(when *compile-verbose*
(format t "~&;;; Writing source file ~A" (file-namestring pathname))
(force-output))
Revision: 4627
Author: edi
URL: http://bknr.net/trac/changeset/4627
Revert previous change
U trunk/thirdparty/cl-unicode/CHANGELOG.txt
U trunk/thirdparty/cl-unicode/build/dump.lisp
Modified: trunk/thirdparty/cl-unicode/CHANGELOG.txt
===================================================================
--- trunk/thirdparty/cl-unicode/CHANGELOG.txt 2011-01-12 15:28:49 UTC (rev 4626)
+++ trunk/thirdparty/cl-unicode/CHANGELOG.txt 2011-01-12 15:37:10 UTC (rev 4627)
@@ -1,5 +1,3 @@
-Fix pathname creation (thanks to Juan José Garcia-Ripoll)
-
Version 0.1.1
2008-07-24
Make ADD-HANGUL-NAMES faster for ClozureCL
Modified: trunk/thirdparty/cl-unicode/build/dump.lisp
===================================================================
--- trunk/thirdparty/cl-unicode/build/dump.lisp 2011-01-12 15:28:49 UTC (rev 4626)
+++ trunk/thirdparty/cl-unicode/build/dump.lisp 2011-01-12 15:37:10 UTC (rev 4627)
@@ -187,7 +187,7 @@
is not used in read.lisp) and uses it to create a file
\"derived-properties\" which will be used by CL-UNICODE-TEST."
(with-output-to-source-file (out (make-pathname :name "derived-properties"
- :type nil
+ :type :unspecific
:directory '(:relative :up "test"))
:no-header-p t)
(let (last-test)
Revision: 4626
Author: edi
URL: http://bknr.net/trac/changeset/4626
Fix pathname creation
U trunk/thirdparty/cl-unicode/CHANGELOG.txt
U trunk/thirdparty/cl-unicode/build/dump.lisp
Modified: trunk/thirdparty/cl-unicode/CHANGELOG.txt
===================================================================
--- trunk/thirdparty/cl-unicode/CHANGELOG.txt 2010-11-18 11:13:46 UTC (rev 4625)
+++ trunk/thirdparty/cl-unicode/CHANGELOG.txt 2011-01-12 15:28:49 UTC (rev 4626)
@@ -1,3 +1,5 @@
+Fix pathname creation (thanks to Juan José Garcia-Ripoll)
+
Version 0.1.1
2008-07-24
Make ADD-HANGUL-NAMES faster for ClozureCL
Modified: trunk/thirdparty/cl-unicode/build/dump.lisp
===================================================================
--- trunk/thirdparty/cl-unicode/build/dump.lisp 2010-11-18 11:13:46 UTC (rev 4625)
+++ trunk/thirdparty/cl-unicode/build/dump.lisp 2011-01-12 15:28:49 UTC (rev 4626)
@@ -187,7 +187,7 @@
is not used in read.lisp) and uses it to create a file
\"derived-properties\" which will be used by CL-UNICODE-TEST."
(with-output-to-source-file (out (make-pathname :name "derived-properties"
- :type :unspecific
+ :type nil
:directory '(:relative :up "test"))
:no-header-p t)
(let (last-test)