Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.lang.forth > #42551
| From | Gerry Jackson <gerry@jackson9000.fsnet.co.uk> |
|---|---|
| Newsgroups | comp.lang.forth |
| Subject | Re: CATCH and THROW |
| Date | 2015-10-10 19:18 +0100 |
| Organization | A noiseless patient Spider |
| Message-ID | <mvbkl2$s2m$1@dont-email.me> (permalink) |
| References | <f4a03b80-5545-4e8f-aefb-62f090baf516@googlegroups.com> <op.x59sxir7yfako5@localhost> <aa9f3c96-5f3c-41be-9a05-221f96d46aab@googlegroups.com> |
On 10/10/2015 09:16, Mark Wills wrote:
> Very simply:
>
> : MightGoWrong SomeAction Error? IF 99 THROW THEN ;
>
> : TryThing
> ['] MightGoWrong CATCH DUP 99 = IF Disaster ELSE ?DUP IF THROW THEN THEN ;
>
TryThing can be simplified a bit to
: TryThing
['] MightGoWrong CATCH DUP 99 = IF Disaster ELSE THROW THEN ;
as 0 THROW is a noop.
--
Gerry
Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread
CATCH and THROW Mark Wills <markwills1970@gmail.com> - 2015-10-09 05:46 -0700
Re: CATCH and THROW anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-10-09 16:05 +0000
Re: CATCH and THROW "Elizabeth D. Rather" <erather@forth.com> - 2015-10-09 08:30 -1000
Re: CATCH and THROW JennyB <jennybrien@googlemail.com> - 2015-10-09 12:19 -0700
Re: CATCH and THROW Mark Wills <markwills1970@gmail.com> - 2015-10-09 12:30 -0700
Re: CATCH and THROW "Rod Pemberton" <boo@fasdfrewar.cdm> - 2015-10-09 23:21 -0400
Re: CATCH and THROW Paul Rubin <no.email@nospam.invalid> - 2015-10-09 20:37 -0700
Re: CATCH and THROW Mark Wills <markwills1970@gmail.com> - 2015-10-10 01:16 -0700
Re: CATCH and THROW Gerry Jackson <gerry@jackson9000.fsnet.co.uk> - 2015-10-10 19:18 +0100
Re: CATCH and THROW "HAA" <someone@microsoft.com> - 2015-10-11 12:18 +1000
Re: CATCH and THROW hughaguilar96@gmail.com - 2015-10-10 23:21 -0700
Re: CATCH and THROW rickman <gnuarm@gmail.com> - 2015-10-11 02:32 -0400
Re: CATCH and THROW Paul Rubin <no.email@nospam.invalid> - 2015-10-10 23:51 -0700
Re: CATCH and THROW rickman <gnuarm@gmail.com> - 2015-10-11 04:16 -0400
Re: CATCH and THROW Paul Rubin <no.email@nospam.invalid> - 2015-10-11 23:27 -0700
Re: CATCH and THROW rickman <gnuarm@gmail.com> - 2015-10-12 02:39 -0400
Re: CATCH and THROW "Elizabeth D. Rather" <erather@forth.com> - 2015-10-11 21:26 -1000
Re: CATCH and THROW "Elizabeth D. Rather" <erather@forth.com> - 2015-10-11 21:22 -1000
Re: CATCH and THROW "Rod Pemberton" <boo@fasdfrewar.cdm> - 2015-10-12 01:29 -0400
Re: CATCH and THROW rickman <gnuarm@gmail.com> - 2015-10-12 02:23 -0400
Re: CATCH and THROW "Rod Pemberton" <boo@fasdfrewar.cdm> - 2015-10-12 19:52 -0400
Re: CATCH and THROW rickman <gnuarm@gmail.com> - 2015-10-12 21:14 -0400
Re: CATCH and THROW "Elizabeth D. Rather" <erather@forth.com> - 2015-10-10 21:19 -1000
csiph-web