Pas d'équivalent à ExitToShell() dans AppleScript ?

Je travaille sur un AppleScript dans lequel le traitement principal
appelle un handler qui lui-même appelle un autre handler et ainsi de
suite.

Lorsque je suis dans le handler de niveau n, je teste la présence d'une
erreur et si elle se produit, je suis obligé de remonter en sens inverse
toute la chaine des handlers pour fournir l'information au traitement
principal qui alors met fin à l'exécution du script.

Je cherche une instruction de type ExitToShell() pour interrompre le
traitement dans le handler de niveau n sans avoir à remonter toute la
chaîne en renseignant l'appelant avec une valeur de retour.

on compute()
try
[...]
on error
display dialog [...]
ExitToShell()
end try
end compute

J'ai cherché mais je n'ai rien trouvé. "tell current application to
quit" ou "tell me to quit" génèrent une erreur.

C'est quand même bizarre que le cas ne soit pas prévu dans le cadre
d'une gestion d'erreurs. Tous les langages de haut niveau l'intégrent.

--
Lionel Mychkine