?? NEWTITLE := 'nft$user_message_list' ??

{ nft$user_message_list }

  TYPE
    nft$user_message_list = record
      next_message: ^nft$user_message_list,
      case ve_message: boolean of
      = TRUE =
        message: ost$status,
      = FALSE =
        message_string: ^string ( * ),
      casend,
    recend;

*copyc ost$status
?? OLDTITLE ??
