Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > comp.lang.forth > #26742

Re: ABORT" ABORT QUIT THROW and all that

From Bernd Paysan <bernd.paysan@gmx.de>
Newsgroups comp.lang.forth
Subject Re: ABORT" ABORT QUIT THROW and all that
Date 2013-10-29 16:52 +0100
Organization 1&1 Internet AG
Message-ID <l4olj5$u2n$2@online.de> (permalink)
References <526e62cf$0$1670$e4fe514c@dreader35.news.xs4all.nl> <l4nfhr$p8j$1@speranza.aioe.org>

Show all headers | View raw


Ed wrote:

> Albert van der Horst wrote:
>> ...
>> It seems to be a bit of a missnomer. It is *not* an
>> ABORT adorned with a message. All ABORT" signify situations
>> where I want to give the user a second chance, after he
>> has seen the message.
>> In other words a ABORT" is bound to be caught, not abort.
>> Fortunately the standard defines ABORT" as a THROW with
>> a special code.
> 
> Left uncaught, ABORT" is required to execute ABORT which
> in turn executes QUIT.  It is my understanding that if caught,
> ABORT" will *not* print the message associated with it.

ABORT" throws -2 (see 9.6.2.0680).  Thus it can be distinguished from ABORT, 
and the standard says that the message ccc should be displayed if there is 
no corresponding CATCH.

: test true abort" blabla" ;  ok
test 
:2: blabla
>>>test<<<
Backtrace:
$7F445C4E6320 throw 
$7F445C550E38 c(abort") 

-- 
Bernd Paysan
"If you want it done right, you have to do it yourself"
http://bernd-paysan.de/

Back to comp.lang.forth | Previous | NextPrevious in thread | Next in thread | Find similar | Unroll thread


Thread

ABORT" ABORT QUIT THROW and all that albert@spenarnc.xs4all.nl (Albert van der Horst) - 2013-10-28 13:12 +0000
  Re: ABORT" ABORT QUIT THROW and all that "Ed" <invalid@invalid.com> - 2013-10-29 16:01 +1100
    Re: ABORT" ABORT QUIT THROW and all that Bernd Paysan <bernd.paysan@gmx.de> - 2013-10-29 16:52 +0100
      Re: ABORT" ABORT QUIT THROW and all that "Ed" <invalid@invalid.com> - 2013-10-30 12:01 +1100
  Re: ABORT" ABORT QUIT THROW and all that "Ed" <invalid@invalid.com> - 2013-11-02 12:55 +1100

csiph-web