( CARRAY                                  create an byte array )

( used in the form:   )
(    n CARRAY <name>  )

: carray                          ( n --- )        ( compiling)
                                  ( n --- addr )   ( executing)
  <builds                         ( put <name> into dictionary)
    allot                         ( and allocate n bytes)
  does>                           ( at execution time)
    +                             ( addr = base-addr + n)
;