adoc/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 ====