#include <bindings.dsl.h>
#include <time.h>

-- |This module temporarily exists here, only because bindings-posix
-- currently doesn't have struct tm.

module Bindings.Posix.Time where
#strict_import

#starttype struct tm
#field tm_sec , CInt
#field tm_min , CInt
#field tm_hour , CInt
#field tm_mday , CInt
#field tm_mon , CInt
#field tm_year , CInt
#field tm_wday , CInt
#field tm_yday , CInt
#field tm_isdst , CInt
#stoptype

#num CLOCKS_PER_SEC

#ccall clock , IO CClock
#ccall difftime , CTime -> CTime -> IO CDouble
#ccall gmtime , Ptr CTime -> IO (Ptr <tm>)
#ccall localtime , Ptr CTime -> IO (Ptr <tm>)
#ccall mktime , Ptr <tm> -> IO CTime
#ccall strftime , CString -> CSize -> CString -> Ptr <tm> -> IO CSize
#ccall time , Ptr CTime -> IO CTime