[fpc-pascal] TUN/TAP

[Jürgen Hestermann]

 > Jorge Aldo G. de F. Junior schrieb:
> type ifreq = record
>           ifr_ifrn : record
>               case longint of
>                  0 : ( ifrn_name : array[0..15] of char );
>               end;
>           ifr_ifru : record
>               case longint of
>                  0 : ( ifru_addr : sockaddr );
>                  1 : ( ifru_dstaddr : sockaddr );
>                  2 : ( ifru_broadaddr : sockaddr );
>                  3 : ( ifru_netmask : sockaddr );
>                  4 : ( ifru_hwaddr : sockaddr );
>                  5 : ( ifru_flags : smallint );
>                  6 : ( ifru_ivalue : longint );
>                  7 : ( ifru_mtu : longint );
>                  8 : ( ifru_map : ifmap );
>                  9 : ( ifru_slave : array[0..15] of char );
>                  10 : ( ifru_newname : array[0..15] of char );
>                  11 : ( ifru_data : __caddr_t );
>               end;
>        end;
> 

What is the reason of the first case statement in the record? There is 
only one variant so you can omit it.