(bye)

(bye)
Předcházející	Slovník ANSI forthu	Další

$Header: /home/radek/cvs/forth-book/dictionary/qf/dict/paren-bye-paren,v 1.1 2003/12/28 18:21:58 radek Exp $

Jméno

(bye) — jednořádkový popis

Přehled

(bye)   ( → )

Popis

Procedura je volána interně když Quartus Forth obdrží appStopEvent. Ukončí běh Qurtus Forthu.

Příklad použití

*FIXME:

Strojový kód slova/procedury v Qurtus Forthu

Příklad 100. (bye)

;ADDR  WORDS           LABEL        MNEMO   ARGS
;----  --------------  -----------  ------- --------------------
00E8= 80EA: 80E0                    DW      $80E0             ; link to noop
00EA= 80EC: 0528 6279 6529          DB      5, "(bye)"
                                    FplFree
00F0= 80F2: 4E4F A0E0  (bye):         = SYSTRAP FplFree
                                    WinSetUnderlineMode(#0.W)
00F4= 80F6: 3F3C 0000                 = MOVE.W  #0, -(RP)
00F8= 80FA: 4E4F A225                 = SYSTRAP WinSetUnderlineMode
00FC= 80FE: 548F                      = ADDQ.L  #2, RP
00FE= 8100: 4A6D 000C               TST.W   12(DS)
0102= 8104: 6706                 .--BEQ.S   $810C           ; $+6 = 010A
0104= 8106: 206D 001E            |  MOVE.L  30(DS), A0
0108= 810A: 4ED0                 |  JMP     (A0)
010A= 810C: 4EEA 8094            `->JMP     -32620(CS)
010E= 8110: 4E75                    RTS                       ;= EXIT