;C @ a-addr -- x fetch cell from memory CODEHEADER(XT_FETCH,1,"@") MOV @TOS,TOS NEXT