{-# LANGUAGE ForeignFunctionInterface #-}
module Torch.FFI.TH.DiskFile where
import Foreign
import Foreign.C.Types
import Data.Word
import Data.Int
import Torch.Types.TH
foreign import ccall "THDiskFile.h THDiskFile_new"
c_THDiskFile_new :: Ptr CChar -> Ptr CChar -> CInt -> IO (Ptr C'THFile)
foreign import ccall "THDiskFile.h THPipeFile_new"
c_THPipeFile_new :: Ptr CChar -> Ptr CChar -> CInt -> IO (Ptr C'THFile)
foreign import ccall "THDiskFile.h THDiskFile_name"
c_THDiskFile_name :: Ptr C'THFile -> IO (Ptr CChar)
foreign import ccall "THDiskFile.h THDiskFile_isLittleEndianCPU"
c_THDiskFile_isLittleEndianCPU :: IO CInt
foreign import ccall "THDiskFile.h THDiskFile_isBigEndianCPU"
c_THDiskFile_isBigEndianCPU :: IO CInt
foreign import ccall "THDiskFile.h THDiskFile_nativeEndianEncoding"
c_THDiskFile_nativeEndianEncoding :: Ptr C'THFile -> IO ()
foreign import ccall "THDiskFile.h THDiskFile_littleEndianEncoding"
c_THDiskFile_littleEndianEncoding :: Ptr C'THFile -> IO ()
foreign import ccall "THDiskFile.h THDiskFile_bigEndianEncoding"
c_THDiskFile_bigEndianEncoding :: Ptr C'THFile -> IO ()
foreign import ccall "THDiskFile.h THDiskFile_longSize"
c_THDiskFile_longSize :: Ptr C'THFile -> CInt -> IO ()
foreign import ccall "THDiskFile.h THDiskFile_noBuffer"
c_THDiskFile_noBuffer :: Ptr C'THFile -> IO ()
foreign import ccall "THDiskFile.h &THDiskFile_new"
p_THDiskFile_new :: FunPtr (Ptr CChar -> Ptr CChar -> CInt -> IO (Ptr C'THFile))
foreign import ccall "THDiskFile.h &THPipeFile_new"
p_THPipeFile_new :: FunPtr (Ptr CChar -> Ptr CChar -> CInt -> IO (Ptr C'THFile))
foreign import ccall "THDiskFile.h &THDiskFile_name"
p_THDiskFile_name :: FunPtr (Ptr C'THFile -> IO (Ptr CChar))
foreign import ccall "THDiskFile.h &THDiskFile_isLittleEndianCPU"
p_THDiskFile_isLittleEndianCPU :: FunPtr (IO CInt)
foreign import ccall "THDiskFile.h &THDiskFile_isBigEndianCPU"
p_THDiskFile_isBigEndianCPU :: FunPtr (IO CInt)
foreign import ccall "THDiskFile.h &THDiskFile_nativeEndianEncoding"
p_THDiskFile_nativeEndianEncoding :: FunPtr (Ptr C'THFile -> IO ())
foreign import ccall "THDiskFile.h &THDiskFile_littleEndianEncoding"
p_THDiskFile_littleEndianEncoding :: FunPtr (Ptr C'THFile -> IO ())
foreign import ccall "THDiskFile.h &THDiskFile_bigEndianEncoding"
p_THDiskFile_bigEndianEncoding :: FunPtr (Ptr C'THFile -> IO ())
foreign import ccall "THDiskFile.h &THDiskFile_longSize"
p_THDiskFile_longSize :: FunPtr (Ptr C'THFile -> CInt -> IO ())
foreign import ccall "THDiskFile.h &THDiskFile_noBuffer"
p_THDiskFile_noBuffer :: FunPtr (Ptr C'THFile -> IO ())