SUBRECORD
* SUBRECORD ( outer-offset "name" -- outer-offset here zero-offset )

begin definition of a subrecord (mpe.000)
 : STRUCT CREATE  
   HERE
   0 DUP ,
 DOES>
   @
 ;

EXTENSIONS struct ordinary primitive