warning
This commit is contained in:
parent
7c5261efb1
commit
5b0cb642c9
1 changed files with 2 additions and 0 deletions
|
@ -43,6 +43,8 @@ getDiskFree path = catchMaybeIO $ do
|
|||
return $ toInteger sectors * toInteger bytes * toInteger nfree
|
||||
#else
|
||||
|
||||
#warning Building without disk free space checking support
|
||||
|
||||
getDiskFree :: FilePath -> IO (Maybe Integer)
|
||||
getDiskFree _ = return Nothing
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue