( show_mem)

: show ( low addr, top addr ..)
 SWAP  HEX DO I CR DUP . SPACE C@ DUP . SPACE EMIT LOOP CR ; 
