Parent Directory | Revision Log | Patch
revision 1.17 by pfdietz, Sat Oct 25 20:06:58 2003 UTC | revision 1.18 by pfdietz, Sat Oct 25 22:12:27 2003 UTC | |
---|---|---|
# | Line 1314 | Line 1314 |
1314 | b))))) | b))))) |
1315 | 2950453607 -4) | 2950453607 -4) |
1316 | -815145134) | -815145134) |
1317 | ||
1318 | ;;; Gives the error The value NIL is not of type INTEGER. (in sbcl 0.8.4.40) | |
1319 | ||
1320 | (deftest misc.106 | |
1321 | (progn | |
1322 | (eval '(defun misc.106-fn (a b c) | |
1323 | (declare (optimize speed)) | |
1324 | (block b6 | |
1325 | (flet ((%f8 (f8-1 f8-2) b)) | |
1326 | (%f8 (%f8 c 338) (if t (return-from b6 a) c)))))) | |
1327 | (misc.106-fn -30271 -1 -3043)) | |
1328 | -30271) | |
1329 | ||
1330 | ||
1331 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |