Re: QUIT and ABORT

On 6/05/2025 8:05 am, mhx wrote:

...
    FORTH> vb
    0: [ drop  -4 THROW executed
    0: [ 12
    1: 12 [ 1999
    2: 12 1999 [ : zwap
    2: 12 1999 ] qwerty  -2 THROW executed
    2: 12 1999 ] 2>r
    2: 12 1999 ] r> r>
    2: 12 1999 ] ;
    2: 12 1999 [ zwap
    2: 1999 12 [ ' asdf  -13 THROW executed
    2: 1999 12 [ -56 throw  -56 THROW executed
    2: 1999 12 [ quit
    FORTH> .s
      Data: 1999 12 ---
    System: ---
     Float: --- ok
    FORTH> . . 12 1999  ok

I essentially get all that up to 'quit' - except it doesn't exit
because QUIT is caught.