resInt16 :: ArgRes Int16
resInt16 p          = readVarInt p >>= return.fromIntegral
resInt16 :: ArgRes Int16
resInt16 p          = readVarInt p >>= return.fromIntegral
resInt16 p          = readVarInt p >>= return.fromIntegral