Find limit of recursion: Difference between revisions
→{{header|TXR}}: Drop @(do ...). Larger depth due to reduced stack usage (smaller unwind frames on Linux).
(→{{header|TXR}}: Drop @(do ...). Larger depth due to reduced stack usage (smaller unwind frames on Linux).) |
|||
Line 1,999:
=={{header|TXR}}==
▲ (set-sig-handler sig-segv
▲ (lambda (signal async-p) (throw 'out)))
{{out}}
<pre>$ txr limit-of-recursion.
caught segfault!
reached depth:
=={{header|UNIX Shell}}==
|