netserver/Miscutils.hs
changeset 1617 30170c63a9dd
parent 1598 c853e02ed663
child 1618 2b9cadc232ab
equal deleted inserted replaced
1616:03d099ace39b 1617:30170c63a9dd
   188 
   188 
   189 proto2ver :: Word16 -> String
   189 proto2ver :: Word16 -> String
   190 proto2ver 17 = "0.9.7-dev"
   190 proto2ver 17 = "0.9.7-dev"
   191 proto2ver 19 = "0.9.7"
   191 proto2ver 19 = "0.9.7"
   192 proto2ver 20 = "0.9.8-dev"
   192 proto2ver 20 = "0.9.8-dev"
       
   193 proto2ver 21 = "0.9.8"
       
   194 proto2ver 22 = "0.9.9-dev"
   193 proto2ver _ = "Unknown"
   195 proto2ver _ = "Unknown"