$Header: /home/radek/cvs/forth-book/dictionary/ansi/0715.also,v 1.1 2003/12/28 18:21:57 radek Exp $
ALSO — jednořádkový popis
SEARCH EXT
Transform the search order consisting of widn, ... wid2, wid1 (where wid1 is searched first) into widn, ... wid2, wid1, wid1. An ambiguous condition exists if there are too many word lists in the search order.
Příklad 66. Kód slova currentx *:[90]
; ;021E= 8220: 8210 DW $8210 ; link to BASE ;0220= 8222: 8863 7572 7265 6E74 DB $80+8, "currentx", 0 ;0228= 7800 ....= B4EE: .... also: JSR $-4B7E(CS) ;= GET-ORDER ....= B4F2: MOVE.W (A4), -(A4) ....= B4F4: ADDQ.W #$1, TOS ;= 1+ ....= B4F6: JSR $-4BBA(CS) ;= SET-ORDER B4FA: RTS ;= EXIT