{-# LANGUAGE ForeignFunctionInterface #-}
module Torch.FFI.THC.Short.Storage where
import Foreign
import Foreign.C.Types
import Data.Word
import Data.Int
import Torch.Types.TH
import Torch.Types.THC
foreign import ccall "THCStorage.h THCudaShortStorage_data"
  c_data :: Ptr C'THCState -> Ptr C'THCShortStorage -> IO (Ptr CShort)
foreign import ccall "THCStorage.h THCudaShortStorage_size"
  c_size :: Ptr C'THCState -> Ptr C'THCShortStorage -> IO CPtrdiff
foreign import ccall "THCStorage.h THCudaShortStorage_set"
  c_set :: Ptr C'THCState -> Ptr C'THCShortStorage -> CPtrdiff -> CShort -> IO ()
foreign import ccall "THCStorage.h THCudaShortStorage_get"
  c_get :: Ptr C'THCState -> Ptr C'THCShortStorage -> CPtrdiff -> IO CShort
foreign import ccall "THCStorage.h THCudaShortStorage_new"
  c_new :: Ptr C'THCState -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_newWithSize"
  c_newWithSize :: Ptr C'THCState -> CPtrdiff -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_newWithSize1"
  c_newWithSize1 :: Ptr C'THCState -> CShort -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_newWithSize2"
  c_newWithSize2 :: Ptr C'THCState -> CShort -> CShort -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_newWithSize3"
  c_newWithSize3 :: Ptr C'THCState -> CShort -> CShort -> CShort -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_newWithSize4"
  c_newWithSize4 :: Ptr C'THCState -> CShort -> CShort -> CShort -> CShort -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_newWithMapping"
  c_newWithMapping :: Ptr C'THCState -> Ptr CChar -> CPtrdiff -> CInt -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_newWithData"
  c_newWithData :: Ptr C'THCState -> Ptr CShort -> CPtrdiff -> IO (Ptr C'THCShortStorage)
foreign import ccall "THCStorage.h THCudaShortStorage_setFlag"
  c_setFlag :: Ptr C'THCState -> Ptr C'THCShortStorage -> CChar -> IO ()
foreign import ccall "THCStorage.h THCudaShortStorage_clearFlag"
  c_clearFlag :: Ptr C'THCState -> Ptr C'THCShortStorage -> CChar -> IO ()
foreign import ccall "THCStorage.h THCudaShortStorage_retain"
  c_retain :: Ptr C'THCState -> Ptr C'THCShortStorage -> IO ()
foreign import ccall "THCStorage.h THCudaShortStorage_free"
  c_free :: Ptr C'THCState -> Ptr C'THCShortStorage -> IO ()
foreign import ccall "THCStorage.h THCudaShortStorage_resize"
  c_resize :: Ptr C'THCState -> Ptr C'THCShortStorage -> CPtrdiff -> IO ()
foreign import ccall "THCStorage.h THCudaShortStorage_fill"
  c_fill :: Ptr C'THCState -> Ptr C'THCShortStorage -> CShort -> IO ()
foreign import ccall "THCStorage.h THCudaShortStorage_getDevice"
  c_getDevice :: Ptr C'THCState -> Ptr C'THCShortStorage -> IO CInt
foreign import ccall "THCStorage.h &THCudaShortStorage_data"
  p_data :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> IO (Ptr CShort))
foreign import ccall "THCStorage.h &THCudaShortStorage_size"
  p_size :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> IO CPtrdiff)
foreign import ccall "THCStorage.h &THCudaShortStorage_set"
  p_set :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> CPtrdiff -> CShort -> IO ())
foreign import ccall "THCStorage.h &THCudaShortStorage_get"
  p_get :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> CPtrdiff -> IO CShort)
foreign import ccall "THCStorage.h &THCudaShortStorage_new"
  p_new :: FunPtr (Ptr C'THCState -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_newWithSize"
  p_newWithSize :: FunPtr (Ptr C'THCState -> CPtrdiff -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_newWithSize1"
  p_newWithSize1 :: FunPtr (Ptr C'THCState -> CShort -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_newWithSize2"
  p_newWithSize2 :: FunPtr (Ptr C'THCState -> CShort -> CShort -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_newWithSize3"
  p_newWithSize3 :: FunPtr (Ptr C'THCState -> CShort -> CShort -> CShort -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_newWithSize4"
  p_newWithSize4 :: FunPtr (Ptr C'THCState -> CShort -> CShort -> CShort -> CShort -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_newWithMapping"
  p_newWithMapping :: FunPtr (Ptr C'THCState -> Ptr CChar -> CPtrdiff -> CInt -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_newWithData"
  p_newWithData :: FunPtr (Ptr C'THCState -> Ptr CShort -> CPtrdiff -> IO (Ptr C'THCShortStorage))
foreign import ccall "THCStorage.h &THCudaShortStorage_setFlag"
  p_setFlag :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> CChar -> IO ())
foreign import ccall "THCStorage.h &THCudaShortStorage_clearFlag"
  p_clearFlag :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> CChar -> IO ())
foreign import ccall "THCStorage.h &THCudaShortStorage_retain"
  p_retain :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> IO ())
foreign import ccall "THCStorage.h &THCudaShortStorage_free"
  p_free :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> IO ())
foreign import ccall "THCStorage.h &THCudaShortStorage_resize"
  p_resize :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> CPtrdiff -> IO ())
foreign import ccall "THCStorage.h &THCudaShortStorage_fill"
  p_fill :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> CShort -> IO ())
foreign import ccall "THCStorage.h &THCudaShortStorage_getDevice"
  p_getDevice :: FunPtr (Ptr C'THCState -> Ptr C'THCShortStorage -> IO CInt)