1 // memory.asm: WORD p_cfa2flags_get, 'CFA>FLAGS@',fasm
3 anchor:p_cfa2flags_get[]
8 Data stack: ( cfa -- flags )
11 "CFA>FLAGS@" is a function word that pushes word flags of the given cfa.
14 .Defintion concept for CFA>FLAGS@
16 : CFA>FLAGS@ 16 - @ 16 + ;