/[gcl]/gcl/ansi-tests/misc.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/misc.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.18 by pfdietz, Sat Oct 25 22:12:27 2003 UTC revision 1.19 by pfdietz, Sun Oct 26 02:02:42 2003 UTC
# Line 1327  Line 1327 
1327      (misc.106-fn -30271 -1 -3043))      (misc.106-fn -30271 -1 -3043))
1328    -30271)    -30271)
1329    
1330         ;;; "The value NIL is not of type SB-C::IR2-LVAR." (sbcl 0.8.4.40)
1331    (deftest misc.107
1332      (funcall
1333       (compile nil
1334                '(lambda (b c)
1335                   (declare (type (integer -29742055786 23602182204) b))
1336                   (declare (type (integer -7409 -2075) c))
1337                   (declare (optimize (speed 3)))
1338                   (floor
1339                    (labels ((%f2 ()
1340                                  (block b6
1341                                    (ignore-errors (return-from b6 (if (= c 8) b 82674))))))
1342                      (%f2)))))
1343       22992834060 -5833)
1344      82674)

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26