Permalink
Browse files

Update to 1.0.6

git-svn-id: svn://bknr.net/svn/trunk/thirdparty/flexi-streams@3733 4281704c-cde7-0310-8518-8e2dc76b1ff0
  • Loading branch information...
1 parent dad147e commit 0b33aef2672ca1a7ac5fe97d2dcd82ffde9ac0a8 edi committed Aug 26, 2008
Showing with 12 additions and 8 deletions.
  1. +4 −0 CHANGELOG
  2. +4 −4 decode.lisp
  3. +2 −2 doc/index.html
  4. +2 −2 flexi-streams.asd
View
@@ -1,3 +1,7 @@
+Version 1.0.6
+2008-08-25
+Don't use a reserve if we can't rewind the stream (Drakma bug report by Stas Boukarev)
+
Version 1.0.5
2008-08-01
Export RUN-ALL-TESTS instead of RUN-TESTS (caught by Nick Allen)
View
@@ -1,5 +1,5 @@
;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: FLEXI-STREAMS; Base: 10 -*-
-;;; $Header: /usr/local/cvsrep/flexi-streams/decode.lisp,v 1.33 2008/05/30 09:04:15 edi Exp $
+;;; $Header: /usr/local/cvsrep/flexi-streams/decode.lisp,v 1.34 2008/08/26 00:38:06 edi Exp $
;;; Copyright (c) 2005-2008, Dr. Edmund Weitz. All rights reserved.
@@ -73,7 +73,7 @@ format and does the real work for OCTETS-TO-STRING."))
"Non-hygienic utility macro which defines methods for READ-SEQUENCE*
and OCTETS-TO-STRING* for the class FORMAT-CLASS. BODY is described
in the docstring of DEFINE-CHAR-ENCODERS but can additionally contain
-a form (UNGET <form>) which has to be replaced by the correct code to
+a form \(UNGET <form>) which has to be replaced by the correct code to
`unread' the octets for the character designated by <form>."
(let* ((body `((block char-decoder
(locally
@@ -101,8 +101,8 @@ a form (UNGET <form>) which has to be replaced by the correct code to
;; performance-wise to make RESERVE significantly bigger
;; (and thus put potentially a lot more octets into
;; OCTET-STACK), especially for UTF-8
- (reserve (cond ((not (floatp factor)) 0)
- ((not can-rewind-p) (* 2 integer-factor))
+ (reserve (cond ((or (not (floatp factor))
+ (not can-rewind-p)) 0)
(t (ceiling (* (- factor integer-factor) (- end start)))))))
(declare (fixnum buffer-pos buffer-end index integer-factor reserve)
(boolean can-rewind-p))
View
@@ -229,7 +229,7 @@
<p>
FLEXI-STREAMS together with this documentation can be downloaded from <a
href="http://weitz.de/files/flexi-streams.tar.gz">http://weitz.de/files/flexi-streams.tar.gz</a>. The
-current version is 1.0.5.
+current version is 1.0.6.
<p>
Before you install FLEXI-STREAMS you first need to
install the <a
@@ -1114,7 +1114,7 @@
his work on making FLEXI-STREAMS faster.
<p>
-$Header: /usr/local/cvsrep/flexi-streams/doc/index.html,v 1.124 2008/08/01 10:12:41 edi Exp $
+$Header: /usr/local/cvsrep/flexi-streams/doc/index.html,v 1.125 2008/08/26 00:38:08 edi Exp $
<p><a href="http://weitz.de/index.html">BACK TO MY HOMEPAGE</a>
</body>
View
@@ -1,5 +1,5 @@
;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
-;;; $Header: /usr/local/cvsrep/flexi-streams/flexi-streams.asd,v 1.77 2008/08/01 10:12:40 edi Exp $
+;;; $Header: /usr/local/cvsrep/flexi-streams/flexi-streams.asd,v 1.78 2008/08/26 00:38:06 edi Exp $
;;; Copyright (c) 2005-2008, Dr. Edmund Weitz. All rights reserved.
@@ -35,7 +35,7 @@
(in-package :flexi-streams-system)
(defsystem :flexi-streams
- :version "1.0.5"
+ :version "1.0.6"
:serial t
:components ((:file "packages")
(:file "mapping")

0 comments on commit 0b33aef

Please sign in to comment.