: STRUCT:
  VOCABULARY GET-CURRENT
  ALSO LATEST NAME> EXECUTE DEFINITIONS
  0
;

: ;STRUCT
  S" /SIZE" ['] CONSTANT EVALUATE-WITH
  ;MODULE
;