// (addr -- ) (F: f -- )
private int DFStoreAction()
{
_interpreter.StackExpect(1);
_interpreter.FStackExpect(1);
var addr = _interpreter.Pop();
_interpreter.CheckCellAlignedAddress(addr);
_interpreter.CheckAddressesRange(addr, Heap.DoubleCellSize);
_interpreter.State.Heap.Write(addr, _interpreter.FPop());
return(1);
}