/[cmucl]/src/general-info/release-20a.txt
ViewVC logotype

Log of /src/general-info/release-20a.txt

Parent Directory Parent Directory | Revision Log Revision Log


Links to HEAD: (view) (annotate)
Links to label-2009-03-25: (view) (annotate)
Sticky Tag:

Revision 1.3 - (view) (annotate) - [select for diffs]
Fri Mar 20 14:54:29 2009 UTC (5 years, 1 month ago) by rtoy
Branch: MAIN
CVS Tags: label-2009-03-25
Changes since 1.2: +4 -0 lines
Diff to previous 1.2
This big of code causes CMUCL to spend huge amounts of time trying to
simplify the union of disjoint double-float types:

(defun foo (arg)
  (declare (type double-double-float arg)
	   (optimize (speed 3) (space 0)))
  (let* ((x arg)
	 (xx 0w0)
	 (k 0)
	 (px (coerce k 'double-double-float))
	 (qx 0w0))
    (declare (type double-double-float x xx px qx)
	     (notinline poly-eval poly-eval-1))
    (setf x (- (- x (* px log2-c1)) (* px log2-c2)))
    (+ x 0d0)
    ))

Fix it:

code/type.lisp:
o Rename SIMPLIFY-BIG-INTEGER-UNION to SIMPLIFY-BIG-UNION
o SIMPLIFY-BIG-UNION takes an extra arg to specify the resulting type.
o Modify SIMPLIFY-UNIONS to handle float unions as well as integer
  unions.

general-info/release-20a.txt:
o Update

Revision 1.2 - (view) (annotate) - [select for diffs]
Mon Mar 16 15:52:49 2009 UTC (5 years, 1 month ago) by rtoy
Branch: MAIN
CVS Tags: label-2009-03-16
Branch point for: unicode-utf16-branch, unicode-utf16-extfmt-branch
Changes since 1.1: +3 -0 lines
Diff to previous 1.1
Trac Ticket #31: pathname bug with :case :common

Fixed.

Revision 1.1 - (view) (annotate) - [select for diffs]
Tue Mar 3 14:29:25 2009 UTC (5 years, 1 month ago) by rtoy
Branch: MAIN
CVS Tags: merge-with-19f
Initial version

This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.

  Diffs between and
  Type of Diff should be a

Sort log by:

  ViewVC Help
Powered by ViewVC 1.1.5