chmod :: FileSystem -> Path -> Int16 -> IO ()
chmod (FileSystem fs) p m =
  withCString p $ \path ->
    throwErrnoIfMinus1_ "chmod" $ c_hdfs_chmod fs path (fromIntegral m)
chmod :: FileSystem -> Path -> Int16 -> IO ()
chmod (FileSystem fs) p m =
  withCString p $ \path ->
    throwErrnoIfMinus1_ "chmod" $ c_hdfs_chmod fs path (fromIntegral m)
chmod (FileSystem fs) p m =
  withCString p $ \path ->
    throwErrnoIfMinus1_ "chmod" $ c_hdfs_chmod fs path (fromIntegral m)