16 lines
294 B
AppleScript
16 lines
294 B
AppleScript
global i
|
|
|
|
on recursion()
|
|
set i to i + 1
|
|
recursion()
|
|
end recursion
|
|
|
|
on run
|
|
set i to -1
|
|
try
|
|
recursion()
|
|
on error
|
|
"Recursion limit encountered at " & i
|
|
-- display dialog result -- Uncomment to see the result if running as an applet.
|
|
end try
|
|
end run
|