IN: scratchpad (some-code-that-gives-an-allocated-alien)

--- Data stack:
ALIEN: 7fff0a00be40
IN: scratchpad { [ 0 alien-unsigned-1 ] [ 1 alien-unsigned-1 ] [ 2 alien-unsigned-1 ] [ 0 alien-unsigned-2 ] [ 1 alien-unsigned-2 ] } cleave

--- Data stack:
69
82
67
21061
17234
IN: scratchpad : add-2-bytes ( second first -- result ) 8 shift + ;

--- Data stack:
69
82
67
21061
17234
IN: scratchpad 82 67 add-2-bytes . .
17234
17234

--- Data stack:
69
82
67
21061
IN: scratchpad 69 82 add-2-bytes . . 
21061
21061

--- Data stack:
69
82
67
IN: scratchpad