$Header: /home/radek/cvs/forth-book/dictionary/ansi/1000.create,v 1.1 2003/12/28 18:21:57 radek Exp $

Jméno

CREATE — vytvoří hlavičku slova na slovníku

CORE

Přehled

CREATE ( "název" → )

Definováno v: dpANS Forth 6.1.1000 CORE

Popis

Přečte ze vstupního bufferu název nového slova a vytvoří jeho hlavičku ve slovníku.

Strojový kód slova/procedury v Qurtus Forthu

Příklad 72. CREATE

                                                                        ;*FIXME:
18D6= 98D8: 98AE (____)                       DW      $98AE ($____)   ; link to 
18D8= 98DA: 0643 5245 4154 4500               DB      $6 , "CREATE", 0
18E0= 98E2: 4EAA 96A2            CREATE:      JSR    $-695E(A2)                            ;= :
18E4= 98E6: 4EAA 81E0                         JSR     $-7E20(A2)        ;= HERE
18E8= 98EA: 4EAA 97B8                         JSR     $-6848(A2)
18EC= 98EE: 3907                              MOVE.W  TOP, -(A4)
18EE= 98F0: 3E3C 4EAA                         MOVE.W  #$4EAA, TOP
18F2= 98F4: 4EAA 96C8                         JSR     -26963(A2)
18F6= 98F8: 3907                              MOVE.W  TOP, -(A4)
18F8= 98FA: 3E3C 80E8                         MOVE.W  #-32536, TOP
18FC= 98FE: 3B6D 01A6 018E                    MOVE.W  422(A5), 398(A5)
1902= 9904: 4EAA 9138                         JSR     -28360(A2)
1906= 9908: 4EAA 971A                         JSR     -26854(A2)
190A= 990C: 4E75                              RTS                       ;= EXIT

Příklad použití

*FIXME: