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

Groups > comp.lang.forth > #135243

Re: FigForth Keep script running

Show all headers | View raw

sjack <sjack@dontemail.me> wrote:
> ( Display window (stdout) )
>
>                   Demo Keep script running in spite of faults
>
> Overview
>
> ===
> FigForth WARNING set to -1 enables (ABORT) as alternative error
> handling. The default for (ABORT) is to perform ABORT but it's
> acceptable to replace (ABORT) action with custom user action.  In the
> following demo a custom error handling is assigned to (ABORT) by
> action of switch settings.  The alternaltive error handling will use
> BacForth 'structured cut' to recover from an error (invalid octal
> number) and keep the script running.

The beauty of CATCH THROW is that you have an indication of the
exception.  For example my QUIT reads from the terminal, until
there is an exception ENDOFPIPE that terminates the session.

If you activate AUTOLOAD a patch is applied to ?ERROR (where system
errors go through). If the errors are 10-12 or 15,16 there is a potential
fix to load a name not find from the library.
So although neither SEE or LOCATE is present in the kernel of ciforth,
starting with the -n option (newby) you can do
            SEE LOCATE

and after some whirring you see

: LOCATE
NAME   LOCATED
;

There is bound to be read/evaluate/print/loop somewhere in
Forth and QUIT is it,  despite the strange name.

Groetjes Albert

--
The glass is half empty. There is no such thing as a free world.
This is the first day of the end of your life.
If you can't beat them, ... too bad.

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

Thread

FigForth Keep script running sjack@dontemail.me (sjack) - 2026-07-19 16:07 +0000
  Re: FigForth Keep script running albert@SPENARNC.XS4ALL.NL - 2026-07-21 11:20 +0200
  Re: FigForth Keep script running sjack@dontemail.me (sjack) - 2026-07-22 15:25 +0000

csiph-web