2981 |
(declare (optimize (debug 1))) |
(declare (optimize (debug 1))) |
2982 |
(block b7 |
(block b7 |
2983 |
(flet ((%f3 (f3-1 f3-2 f3-3) 0)) |
(flet ((%f3 (f3-1 f3-2 f3-3) 0)) |
2984 |
(apply #'%f3 0 (catch 737 (return-from b7 (%f3 0 b c))) c nil))))) |
(apply #'%f3 0 (catch 'foo (return-from b7 (%f3 0 b c))) c nil))))) |
2985 |
0 6000 -9000000) |
0 6000 -9000000) |
2986 |
0) |
0) |
2987 |
|
|
3061 |
0)) |
0)) |
3062 |
(apply #'%f13 |
(apply #'%f13 |
3063 |
(%f13 b 0 0) |
(%f13 b 0 0) |
3064 |
(catch 729 0) |
(catch 'ct1 0) |
3065 |
(catch 'ct2 (throw 'ct2 c)) |
(catch 'ct2 (throw 'ct2 c)) |
3066 |
nil)))) |
nil)))) |
3067 |
0 0 0) |
0 0 0) |