chown :: FileSystem -> Path -> String -> String -> IO ()
chown (FileSystem fs) p u g =
  withCString p $ \path  ->
  withCString u $ \user  ->
  withCString g $ \group ->
    throwErrnoIfMinus1_ "chown" $ c_hdfs_chown fs path user group
chown :: FileSystem -> Path -> String -> String -> IO ()
chown (FileSystem fs) p u g =
  withCString p $ \path  ->
  withCString u $ \user  ->
  withCString g $ \group ->
    throwErrnoIfMinus1_ "chown" $ c_hdfs_chown fs path user group
chown (FileSystem fs) p u g =
  withCString p $ \path  ->
  withCString u $ \user  ->
  withCString g $ \group ->
    throwErrnoIfMinus1_ "chown" $ c_hdfs_chown fs path user group