Non-exhaustive pattern in Socket.hsc

[Simon Marlow]

Dominic Steinitz wrote:
> I'm getting
> 
> [root at tility pcap]# ./test
> test: Socket.hsc:(1434,17)-(1523,20): Non-exhaustive patterns in case
> 
> The problem is caused because pcap_findalldevs is returning an address family 
> value of 17
> 
> #define PF_PACKET       17      /* Packet family.  */
> 
> #define AF_PACKET       PF_PACKET
> 
> and the ghc Family datatype doesn't support it :-(
> 
> data Family
>   = AF_UNSPEC
>     | AF_UNIX
>     | AF_INET
>     | AF_INET6
>     | AF_SNA
>     | AF_DECnet
>     | AF_APPLETALK
>     | AF_ROUTE
>     | AF_X25
>     | AF_AX25
>     | AF_IPX
>         -- Imported from Network.Socket

I've now fixed this, the fix will be in GHC 6.6 and future releases of 
the network library.

Cheers,
	Simon