resWord16 :: ArgRes Word16
resWord16 p              = readVarWord p >>= return.fromIntegral
resWord16 :: ArgRes Word16
resWord16 p              = readVarWord p >>= return.fromIntegral
resWord16 p              = readVarWord p >>= return.fromIntegral