Unlink

Author: garyb

README.md

@@ -52,6 +52,8 @@
 
     truncate :: forall eff. FilePath -> Number -> Callback eff Unit -> Eff (fs :: FS | eff) Unit
 
+    unlink :: forall eff. FilePath -> Callback eff Unit -> Eff (fs :: FS | eff) Unit
+
     writeFile :: forall eff. FilePath -> Buffer -> Callback eff Unit -> Eff (fs :: FS | eff) Unit
 
     writeTextFile :: forall eff. Encoding -> FilePath -> String -> Callback eff Unit -> Eff (fs :: FS | eff) Unit
@@ -123,6 +125,8 @@
 
     truncate :: forall eff. FilePath -> Number -> Eff (err :: Exception Error, fs :: FS | eff) Unit
 
+    unlink :: forall eff. FilePath -> Eff (err :: Exception Error, fs :: FS | eff) Unit
+
     writeFile :: forall eff. FilePath -> Buffer -> Eff (err :: Exception Error, fs :: FS | eff) Unit
 
     writeTextFile :: forall eff. Encoding -> FilePath -> String -> Eff (err :: Exception Error, fs :: FS | eff) Unit

src/Node/FS/Async.purs

@@ -10,6 +10,7 @@ module Node.FS.Async
   , readlink
   , realpath
   , realpath'
+  , unlink
   , readFile
   , readTextFile
   , writeFile
@@ -51,6 +52,7 @@ foreign import fs "var fs = require('fs');" ::
   , symlink :: Fn4 FilePath FilePath String (JSCallback Unit) Unit
   , readlink :: Fn2 FilePath (JSCallback FilePath) Unit
   , realpath :: forall cache. Fn3 FilePath { | cache } (JSCallback FilePath) Unit
+  , unlink :: Fn2 FilePath (JSCallback Unit) Unit
   , readFile :: forall a opts. Fn3 FilePath { | opts } (JSCallback a) Unit
   , writeFile :: forall a opts. Fn4 FilePath a { | opts } (JSCallback Unit) Unit
   }
@@ -125,7 +127,7 @@ link :: forall eff. FilePath
 
 link src dst cb = return $ runFn3
   fs.link src dst (handleCallback cb)
-  
+
 -- |
 -- Creates a symlink.
 --
@@ -157,7 +159,7 @@ realpath :: forall eff. FilePath
 
 realpath path cb = return $ runFn3
   fs.realpath path {} (handleCallback cb)
-  
+
 -- |
 -- Find the canonicalized absolute location for a path using a cache object for
 -- already resolved paths.
@@ -170,6 +172,16 @@ realpath' :: forall eff cache. FilePath
 realpath' path cache cb = return $ runFn3
   fs.realpath path cache (handleCallback cb)
 
+-- |
+-- Deletes a file.
+--
+unlink :: forall eff. FilePath
+                   -> Callback eff Unit
+                   -> Eff (fs :: FS | eff) Unit
+
+unlink file cb = return $ runFn2
+  fs.unlink file (handleCallback cb)
+
 -- |
 -- Reads the entire contents of a file returning the result as a raw buffer.
 --

src/Node/FS/Sync.purs

@@ -9,6 +9,7 @@ module Node.FS.Sync
   , readlink
   , realpath
   , realpath'
+  , unlink
   , readFile
   , readTextFile
   , writeFile
@@ -35,6 +36,7 @@ foreign import fs "var fs = require('fs');" ::
   , symlinkSync :: Fn3 FilePath FilePath String Unit
   , readlinkSync :: Fn1 FilePath FilePath
   , realpathSync :: forall cache. Fn2 FilePath { | cache } FilePath
+  , unlinkSync :: Fn1 FilePath Unit
   , readFileSync :: forall a opts. Fn2 FilePath { | opts } a
   , writeFileSync :: forall a opts. Fn3 FilePath a { | opts } Unit
   }
@@ -144,6 +146,15 @@ realpath' :: forall eff cache. FilePath
 realpath' path cache = mkEff $ \_ -> runFn2
   fs.realpathSync path cache
 
+-- |
+-- Deletes a file.
+--
+unlink :: forall eff. FilePath
+                   -> Eff (fs :: FS, err :: Exception Error | eff) Unit
+
+unlink file = mkEff $ \_ -> runFn1
+  fs.unlinkSync file
+
 -- |
 -- Reads the entire contents of a file returning the result as a raw buffer.
 --