{-# LANGUAGE ForeignFunctionInterface #-}
module Torch.FFI.TH.Storage where
import Foreign
import Foreign.C.Types
import Data.Word
import Data.Int
import Torch.Types.TH
foreign import ccall "THStorage.h THLongStorage_sizeDesc"
c_THLongStorage_sizeDesc :: Ptr C'THLongStorage -> IO (Ptr C'THDescBuff)
foreign import ccall "THStorage.h THLongStorage_newInferSize"
c_THLongStorage_newInferSize :: Ptr C'THLongStorage -> CPtrdiff -> IO (Ptr C'THLongStorage)
foreign import ccall "THStorage.h THLongStorage_inferSize2"
c_THLongStorage_inferSize2 :: Ptr C'THLongStorage -> Ptr CLLong -> CLLong -> Ptr CLLong -> CLLong -> Ptr CChar -> CInt -> IO CInt
foreign import ccall "THStorage.h THLongStorage_inferSizeN"
c_THLongStorage_inferSizeN :: Ptr C'THLongStorage -> CInt -> Ptr (Ptr CLLong) -> Ptr CLLong -> Ptr CChar -> CInt -> IO CInt
foreign import ccall "THStorage.h THLongStorage_inferExpandGeometry"
c_THLongStorage_inferExpandGeometry :: Ptr CLLong -> Ptr CLLong -> CLLong -> Ptr C'THLongStorage -> Ptr (Ptr CLLong) -> Ptr (Ptr CLLong) -> Ptr CChar -> CInt -> IO CInt
foreign import ccall "THStorage.h &THLongStorage_sizeDesc"
p_THLongStorage_sizeDesc :: FunPtr (Ptr C'THLongStorage -> IO (Ptr C'THDescBuff))
foreign import ccall "THStorage.h &THLongStorage_newInferSize"
p_THLongStorage_newInferSize :: FunPtr (Ptr C'THLongStorage -> CPtrdiff -> IO (Ptr C'THLongStorage))
foreign import ccall "THStorage.h &THLongStorage_inferSize2"
p_THLongStorage_inferSize2 :: FunPtr (Ptr C'THLongStorage -> Ptr CLLong -> CLLong -> Ptr CLLong -> CLLong -> Ptr CChar -> CInt -> IO CInt)
foreign import ccall "THStorage.h &THLongStorage_inferSizeN"
p_THLongStorage_inferSizeN :: FunPtr (Ptr C'THLongStorage -> CInt -> Ptr (Ptr CLLong) -> Ptr CLLong -> Ptr CChar -> CInt -> IO CInt)
foreign import ccall "THStorage.h &THLongStorage_inferExpandGeometry"
p_THLongStorage_inferExpandGeometry :: FunPtr (Ptr CLLong -> Ptr CLLong -> CLLong -> Ptr C'THLongStorage -> Ptr (Ptr CLLong) -> Ptr (Ptr CLLong) -> Ptr CChar -> CInt -> IO CInt)