Parent Directory | Revision Log | Patch
revision 1.43 by pfdietz, Thu Nov 13 13:38:07 2003 UTC | revision 1.44 by pfdietz, Thu Nov 13 13:55:04 2003 UTC | |
---|---|---|
# | Line 2156 | Line 2156 |
2156 | nil | nil |
2157 | '(lambda (a) | '(lambda (a) |
2158 | (labels ((%f6 (f6-1 f6-2) | (labels ((%f6 (f6-1 f6-2) |
2159 | (handler-case | (cl:handler-case |
2160 | (labels ((%f2 nil (logior a))) | (labels ((%f2 nil (logior a))) |
2161 | (if (eql (%f2) (%f2)) | (if (eql (%f2) (%f2)) |
2162 | 2829254 -10723)) | 2829254 -10723)) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |