diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2016-12-20 07:57:46 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2016-12-20 07:57:46 -0800 |
| commit | 6bb45477014c490a6f6d9fac3a73020ce284145f (patch) | |
| tree | 0250cf7b342922fd5a2c7174c0b96539252181af /txr.1 | |
| parent | 7c5b70d7d17faf6543350dffe56292e3f7dff679 (diff) | |
| download | txr-6bb45477014c490a6f6d9fac3a73020ce284145f.tar.gz txr-6bb45477014c490a6f6d9fac3a73020ce284145f.tar.bz2 txr-6bb45477014c490a6f6d9fac3a73020ce284145f.zip | |
New function: find-frames.
* unwind.c (uw_find_frames_impl): New static function, made
from uw_find_frame.
(uw_find_frame): Reduced to wrapper around
uw_find_frames_impl.
(uw_find_frames): New function.
(uw_late_init): Register find-frames intrinsic.
* unwind.h (uw_find_frames): Declared.
* txr.1: Documented.
Diffstat (limited to 'txr.1')
| -rw-r--r-- | txr.1 | 11 |
1 files changed, 10 insertions, 1 deletions
@@ -33019,9 +33019,10 @@ structure may be passed as an argument to the .code invoke-catch function. -.coNP Function @ find-frame +.coNP Functions @ find-frame and @ find-frames .synb .mets (find-frame >> [ exception-symbol <> [ frame-type ]]) +.mets (find-frames >> [ exception-symbol <> [ frame-type ]]) .syne .desc The @@ -33070,6 +33071,14 @@ is called with no arguments at all it finds the innermost catch frame, if any exists, or else returns .codn nil . +The +.code find-frames +function is similar to +.code find-frame +except that it returns all matching frames, ordered from the inner-most nesting +level to the outer-most nesting. If called with no arguments, it returns a +list of the catch frames. + .coNP Function @ invoke-catch .synb .mets (invoke-catch < catch-frame < symbol << argument *) |