projects
/
rrq
/
rrqforth.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
5ded0d4f4055ff1eb0c323a0b43e88d56fb7dcee
[rrq/rrqforth.git]
/
p_tfa2flags_get.adoc
1
// memory.asm: WORD p_tfa2flags_get, 'TFA>FLAGS@',fasm
2
3
anchor:p_tfa2flags_get[]
4
5
=== Word: TFA>FLAGS@
6
7
....
8
Data stack: ( tfa -- flags )
9
....
10
11
"TFA>FLAGS@" is a function word that pushes word flags of the given tfa.
12
13
====
14
.Word: TFA>FLAGS@
15
[caption='Defintion concept {counter:exec}']
16
----
17
: TFA>FLAGS@ 16 + @ ;
18
----
19
====