Changeset 11671


Ignore:
Timestamp:
Jan 30, 2009, 2:07:49 PM (11 years ago)
Author:
gz
Message:

Undo r11663 since real fix is now in. Add regression test for bug #412

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tests/ansi-tests/ccl.lsp

    r11663 r11671  
    732732
    733733
    734 #-ccl-0711 ;; backed out of fix temporarily because triggers bug#411
    735734(deftest ccl.bug-overflow-handling
    736735    (funcall (test-compile '(lambda ()
     
    740739  #.most-negative-fixnum)
    741740
     741
     742(deftest ccl.bug#412
     743    (funcall (test-compile '(lambda ()
     744                             (let* ((x most-negative-fixnum)
     745                                    (y 1))
     746                               (- x y)))))
     747  #.(1- most-negative-fixnum))
    742748
    743749(deftest ccl.bug#411
Note: See TracChangeset for help on using the changeset viewer.