resInt :: ArgRes Int
resInt p              = readVarInt p >>= return.fromIntegral
resInt :: ArgRes Int
resInt p              = readVarInt p >>= return.fromIntegral
resInt p              = readVarInt p >>= return.fromIntegral