EXPAND-FN EXIT EXPECT
EXPAND-FN
* EXPAND-FN ( addr1 u1 addr2 -- addr2 cnt2 )

misc ordinary primitive