Parent Directory | Revision Log | Patch
revision 1.39 by pfdietz, Fri Nov 7 12:16:51 2003 UTC | revision 1.40 by pfdietz, Mon Nov 10 02:50:12 2003 UTC | |
---|---|---|
# | Line 2084 | Line 2084 |
2084 | (multiple-value-call #'%f9 (values v2 v2)))) | (multiple-value-call #'%f9 (values v2 v2)))) |
2085 | 100))))) | 100))))) |
2086 | 100) | 100) |
2087 | ||
2088 | ;;; gcl (9 Nov 2003) bug | |
2089 | ;;; Error in FUNCALL [or a callee]: Caught fatal error [memory may be damaged] | |
2090 | ||
2091 | (deftest misc.160 | |
2092 | (funcall | |
2093 | (compile nil | |
2094 | '(lambda (c) | |
2095 | (declare (notinline + funcall)) | |
2096 | (+ (labels ((%f1 () -14)) (funcall #'%f1)) | |
2097 | (flet ((%f2 () (floor c))) (funcall #'%f2))))) | |
2098 | 0) | |
2099 | -14) | |
2100 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |