_paren_COMPILE__
_paren_paren_VOCABULARY__
p4_backward_mark_
p4_backward_resolve_
p4_body_from_
p4_byte_swap_
p4_byte_swap_move_
p4_case_sensitive_voc_
p4_compile_
p4_else_execution_
p4_fetch_bits_
p4_ffa_from_
p4_forward_mark_
p4_forward_resolve_
p4_if_execution_
p4_k_
p4_l_to_name_
p4_link_from_
p4_n_to_link_
p4_name_from_
p4_next_block_
p4_octal_
p4_postpone_execution_
p4_power_
p4_s_p_fetch_
p4_seal_
p4_search_also_voc_
p4_store_bits_
p4_to_ffa_
p4_to_link_
p4_to_name_
p4_two_minus_
p4_two_plus_
p4_vocabulary_
p4_vocabulary_RT_
p4_find_vocabulary
p4_make_wordlist
_paren_COMPILE__ :
COMPILE word ( )
[COMPILE]
POSTPONE
simulate: : COMPILE R> DUP @ , CELL+ >R ; ( not immediate !!! )
reference: ../src/forth-83.c:0066
_paren_paren_VOCABULARY__ :
((VOCABULARY)) ( -- )
VOCABULARY
reference: ../src/forth-83.c:0078
p4_backward_mark_ :
<MARK ( -- DP-mark ) compile-only
DP
<RESOLVE
BEGIN
AHEAD
simulate: : <MARK ?COMP HERE ;
reference: ../src/forth-83.c:0165
p4_backward_resolve_ :
<RESOLVE ( DP-mark -- ) compile-only
<MARK
BRANCH
?BRANCH
UNTIL
simulate: : <RESOLVE ?COMP , ;
reference: ../src/forth-83.c:0179
p4_body_from_ :
BODY> ( pfa -- cfa )
implementation-specific simulation: : BODY> CELL - ;
reference: ../src/forth-83.c:0392
p4_byte_swap_ :
>< ( a -- a' )
reference: ../src/forth-83.c:0302
p4_byte_swap_move_ :
>MOVE< ( from-addr to-addr count -- )
MOVE
reference: ../src/forth-83.c:0318
p4_case_sensitive_voc_ :
CASE-SENSITIVE-VOC ( -- )
CONTEXT
VOCABULARY
example: VOCABULARY MY-VOC MY-VOC CASE-SENSITIVE-VOC
reference: ../src/forth-83.c:0109
p4_compile_ :
COMPILE word ( )
[COMPILE]
POSTPONE
simulate: : COMPILE R> DUP @ , CELL+ >R ; ( not immediate !!! )
reference: ../src/forth-83.c:0067
p4_else_execution_ :
((ELSE)) ( -- )
ELSE
BRANCH
reference: ../src/forth-83.c:0156
p4_fetch_bits_ :
@BITS ( addr mask -- value )
!BITS
simulate: : @BITS SWAP @ AND ;
reference: ../src/forth-83.c:0339
p4_ffa_from_ :
FFA> ( ffa -- nfa )
implementation-specific configure-dependent simulation: : FFA 1+ ;
reference: ../src/forth-83.c:0458
p4_forward_mark_ :
MARK> ( -- DP-mark ) compile-only
RESOLVE>
BRANCH
?BRANCH
IF
ELSE
simulate: : MARK> ?COMP HERE 0 , ;
reference: ../src/forth-83.c:0198
p4_forward_resolve_ :
RESOLVE> ( DP-mark -- ) compile-only
MARK>
THEN
simulate: : RESOLVE> ?COMP HERE SWAP ! ;
reference: ../src/forth-83.c:0210
p4_if_execution_ :
reference: ../src/forth-83.c:0155
p4_k_ :
K ( -- counter-val )
I
J
reference: ../src/forth-83.c:0240
p4_l_to_name_ :
L>NAME ( lfa -- nfa )
reference: ../src/forth-83.c:0421
p4_link_from_ :
LINK> ( lfa -- cfa )
reference: ../src/forth-83.c:0412
p4_n_to_link_ :
N>LINK ( nfa -- lfa )
implementation-specific configure-dependent simulation: : N>LINK C@ + ;
reference: ../src/forth-83.c:0432
p4_name_from_ :
NAME> ( nfa -- cfa )
implementation-specific simulation: : NAME> N>LINK LINK> ;
reference: ../src/forth-83.c:0403
p4_next_block_ :
--> ( -- ) no-return
BLK
INCLUDE
reference: ../src/forth-83.c:0231
p4_octal_ :
OCTAL ( -- )
BASE
HEX
DECIMAL
simulate: : OCTAL 8 BASE ! ;
reference: ../src/forth-83.c:0250
p4_postpone_execution_ :
((POSTPONE)) ( -- )
POSTPONE
reference: ../src/forth-83.c:0072
p4_power_ :
** ( a b -- r )
reference: ../src/forth-83.c:0290
p4_s_p_fetch_ :
SP@ ( -- )
: DUP SP@ @ ;
reference: ../src/forth-83.c:0260
p4_seal_ :
SEAL ( -- )
reference: ../src/forth-83.c:0353
p4_search_also_voc_ :
SEARCH-ALSO-VOC ( -- )
CONTEXT
CURRENT
CURRENT
VOCABULARY
CONTEXT
FIND
CURRENT_DELETED
CURRENT
VOCABULARY
example:MY-VOC DEFINITIONS MY-VOC-PRIVATE SEARCH-ALSO-VOC
reference: ../src/forth-83.c:0124
p4_store_bits_ :
!BITS ( bits addr mask -- )
simulate: : !BITS >R 2DUP @ R NOT AND SWAP R> AND OR SWAP ! DROP ;
reference: ../src/forth-83.c:0277
p4_to_ffa_ :
>FFA ( nfa -- ffa )
implementation-specific configure-dependent simulation: : FFA 1- ;
reference: ../src/forth-83.c:0444
p4_to_link_ :
>LINK ( cfa -- lfa )
reference: ../src/forth-83.c:0381
p4_to_name_ :
>NAME ( cfa -- nfa )
implementation-specific simulation: : >NAME >LINK L>NAME ;
reference: ../src/forth-83.c:0372
p4_two_minus_ :
2- ( i -- i )
simulate: : 2- 2 - ;
reference: ../src/forth-83.c:0054
p4_two_plus_ :
2+ ( i -- i )
simulate: : 2+ 2 + ;
reference: ../src/forth-83.c:0044
p4_vocabulary_ :
VOCABULARY name ( -- )
((VOCABULARY))
CASE-SENSITIVE-VOC
SEARCH-ALSO-VOC
simulate: : VOCABULARY CREATE ALLOT-WORDLIST DOES> ( the ((VOCABULARY)) runtime ) CONTEXT ! ; IMMEDIATE
reference: ../src/forth-83.c:0096
p4_vocabulary_RT_ :
((VOCABULARY)) ( -- )
VOCABULARY
reference: ../src/forth-83.c:0079
p4_find_vocabulary
reference: ../src/forth-83.c:0136
p4_make_wordlist
reference: ../src/forth-83.c:0099