1 2 3 4 5: mkthing create , , does> dup @ 2 * swap cell+ @ + ; 5 7 mkthing thing depth . \ 0 thing . \ 19
1 2 3 4 5
: mkthing create , , does> dup @ 2 * swap cell+ @ + ; 5 7 mkthing thing depth . \ 0 thing . \ 19