hs-bindgen-1.0.0.0: test-artefacts/fixtures/comprehensive/c2hsc/th.txt
-- addDependentFile test-artefacts/headers/golden/comprehensive/c2hsc.h
-- #include <comprehensive/c2hsc.h>
-- void hs_bindgen_3fd2a5c6e681c44b (
-- signed int (*arg1) (
-- signed int arg1
-- )
-- )
-- {
-- (foo_function)(arg1);
-- }
-- unsigned int hs_bindgen_7978c370c45d3898 (
-- unsigned int arg1
-- )
-- {
-- return (foo_33_1)(arg1);
-- }
-- unsigned int hs_bindgen_44aef5175928343d (
-- unsigned int arg1
-- )
-- {
-- return (foo_33_2)(arg1);
-- }
-- signed long long hs_bindgen_9f0b65c4b469b3d8 (
-- signed long long arg1
-- )
-- {
-- return (foo_33_3)(arg1);
-- }
-- void hs_bindgen_bf542a744554a894 (
-- signed int (*arg1) (
-- signed int arg1
-- )
-- )
-- {
-- (foo_function)(arg1);
-- }
-- unsigned int hs_bindgen_11ca53f1ea9c8230 (
-- unsigned int arg1
-- )
-- {
-- return (foo_33_1)(arg1);
-- }
-- unsigned int hs_bindgen_2685a75b0196568e (
-- unsigned int arg1
-- )
-- {
-- return (foo_33_2)(arg1);
-- }
-- signed long long hs_bindgen_bc94ff083e65f7e0 (
-- signed long long arg1
-- )
-- {
-- return (foo_33_3)(arg1);
-- }
-- /* test_comprehensivec2hsc_Example_get_foo_function */
-- __attribute__ ((const))
-- void (*hs_bindgen_37f32218c55b498b (void)) (
-- signed int (*arg1) (
-- signed int arg1
-- )
-- )
-- {
-- return &foo_function;
-- }
-- /* test_comprehensivec2hsc_Example_get_foo_33_1 */
-- __attribute__ ((const))
-- unsigned int (*hs_bindgen_482f80da2191c5d6 (void)) (
-- unsigned int arg1
-- )
-- {
-- return &foo_33_1;
-- }
-- /* test_comprehensivec2hsc_Example_get_foo_33_2 */
-- __attribute__ ((const))
-- unsigned int (*hs_bindgen_c50591bcbfea3260 (void)) (
-- unsigned int arg1
-- )
-- {
-- return &foo_33_2;
-- }
-- /* test_comprehensivec2hsc_Example_get_foo_33_3 */
-- __attribute__ ((const))
-- signed long long (*hs_bindgen_26b60496f499680a (void)) (
-- signed long long arg1
-- )
-- {
-- return &foo_33_3;
-- }
-- /* test_comprehensivec2hsc_Example_get_my_array */
-- __attribute__ ((const))
-- signed int (*(*hs_bindgen_b2862a117942ba8c (void))[]) (
-- signed int arg1
-- )
-- {
-- return &my_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_float */
-- __attribute__ ((const))
-- float *hs_bindgen_fbe24203b7174cce (void)
-- {
-- return &ordinary_float;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_double */
-- __attribute__ ((const))
-- double *hs_bindgen_c996ca409147b439 (void)
-- {
-- return &ordinary_double;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_char */
-- __attribute__ ((const))
-- char *hs_bindgen_b5c47cbce17ba18f (void)
-- {
-- return &ordinary_char;
-- }
-- /* test_comprehensivec2hsc_Example_get_signed_char */
-- __attribute__ ((const))
-- signed char *hs_bindgen_74214b0c0c8011ef (void)
-- {
-- return &signed_char;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_char */
-- __attribute__ ((const))
-- unsigned char *hs_bindgen_074079404a90186b (void)
-- {
-- return &unsigned_char;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_short */
-- __attribute__ ((const))
-- signed short *hs_bindgen_e432ab522350f84b (void)
-- {
-- return &ordinary_signed_short;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_short */
-- __attribute__ ((const))
-- signed short *hs_bindgen_17fa3df7c6690161 (void)
-- {
-- return &explicit_signed_short;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_short */
-- __attribute__ ((const))
-- unsigned short *hs_bindgen_20f280e98d58aacc (void)
-- {
-- return &unsigned_short;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_int */
-- __attribute__ ((const))
-- signed int *hs_bindgen_78b4f07c60ef3ef7 (void)
-- {
-- return &ordinary_signed_int;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_int */
-- __attribute__ ((const))
-- signed int *hs_bindgen_41643d3737e9213c (void)
-- {
-- return &explicit_signed_int;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_int */
-- __attribute__ ((const))
-- unsigned int *hs_bindgen_6e686e175c956cb8 (void)
-- {
-- return &unsigned_int;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long */
-- __attribute__ ((const))
-- signed long *hs_bindgen_6a41c38f7fbb41d9 (void)
-- {
-- return &ordinary_signed_long;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long */
-- __attribute__ ((const))
-- signed long *hs_bindgen_a3b5191325da8230 (void)
-- {
-- return &explicit_signed_long;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long */
-- __attribute__ ((const))
-- unsigned long *hs_bindgen_df563b6d35ec4e8f (void)
-- {
-- return &unsigned_long;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long_long */
-- __attribute__ ((const))
-- signed long long *hs_bindgen_59c6159f8798505a (void)
-- {
-- return &ordinary_signed_long_long;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long_long */
-- __attribute__ ((const))
-- signed long long *hs_bindgen_bfd63280c68460d2 (void)
-- {
-- return &explicit_signed_long_long;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long_long */
-- __attribute__ ((const))
-- unsigned long long *hs_bindgen_8654be9a041c2116 (void)
-- {
-- return &unsigned_long_long;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_void_pointer */
-- __attribute__ ((const))
-- void **hs_bindgen_d6cafaa0834895a2 (void)
-- {
-- return &ordinary_void_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_float_pointer */
-- __attribute__ ((const))
-- float **hs_bindgen_35ef3ffa1a5167f7 (void)
-- {
-- return &ordinary_float_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_double_pointer */
-- __attribute__ ((const))
-- double **hs_bindgen_5e831159f7556399 (void)
-- {
-- return &ordinary_double_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_char_pointer */
-- __attribute__ ((const))
-- char **hs_bindgen_08236e44cabe67f4 (void)
-- {
-- return &ordinary_char_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_signed_char_pointer */
-- __attribute__ ((const))
-- signed char **hs_bindgen_66d08eddc2fecb35 (void)
-- {
-- return &signed_char_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_char_pointer */
-- __attribute__ ((const))
-- unsigned char **hs_bindgen_5c76c506cb4fd78e (void)
-- {
-- return &unsigned_char_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer */
-- __attribute__ ((const))
-- signed short **hs_bindgen_cd114d033253fe37 (void)
-- {
-- return &ordinary_signed_short_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer */
-- __attribute__ ((const))
-- signed short **hs_bindgen_49ffa4c56ce34e2f (void)
-- {
-- return &explicit_signed_short_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_short_pointer */
-- __attribute__ ((const))
-- unsigned short **hs_bindgen_fb80ad6945c7151d (void)
-- {
-- return &unsigned_short_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer */
-- __attribute__ ((const))
-- signed int **hs_bindgen_dfef04ad64871bf8 (void)
-- {
-- return &ordinary_signed_int_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer */
-- __attribute__ ((const))
-- signed int **hs_bindgen_515d5232453c4285 (void)
-- {
-- return &explicit_signed_int_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_int_pointer */
-- __attribute__ ((const))
-- unsigned int **hs_bindgen_9f2724dae8d3b3fa (void)
-- {
-- return &unsigned_int_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer */
-- __attribute__ ((const))
-- signed long **hs_bindgen_a6b4a786a6644424 (void)
-- {
-- return &ordinary_signed_long_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer */
-- __attribute__ ((const))
-- signed long **hs_bindgen_4df40729ac557753 (void)
-- {
-- return &explicit_signed_long_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long_pointer */
-- __attribute__ ((const))
-- unsigned long **hs_bindgen_30379268a6bf43b0 (void)
-- {
-- return &unsigned_long_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer */
-- __attribute__ ((const))
-- signed long long **hs_bindgen_63dedd7015d9ed47 (void)
-- {
-- return &ordinary_signed_long_long_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer */
-- __attribute__ ((const))
-- signed long long **hs_bindgen_9f47ed329f79e647 (void)
-- {
-- return &explicit_signed_long_long_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer */
-- __attribute__ ((const))
-- unsigned long long **hs_bindgen_7d2dd0a78dde4b41 (void)
-- {
-- return &unsigned_long_long_pointer;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_float_array */
-- __attribute__ ((const))
-- float (*hs_bindgen_dbf314f660deda12 (void))[10]
-- {
-- return &ordinary_float_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_double_array */
-- __attribute__ ((const))
-- double (*hs_bindgen_d554c83416b4ffaa (void))[10]
-- {
-- return &ordinary_double_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_char_array */
-- __attribute__ ((const))
-- char (*hs_bindgen_9a57c94ff3fad985 (void))[10]
-- {
-- return &ordinary_signed_char_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_char_array */
-- __attribute__ ((const))
-- signed char (*hs_bindgen_335217e9e2c8fe6a (void))[10]
-- {
-- return &explicit_signed_char_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_char_array */
-- __attribute__ ((const))
-- unsigned char (*hs_bindgen_1e72daddbfe2b7ac (void))[10]
-- {
-- return &unsigned_char_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_short_array */
-- __attribute__ ((const))
-- signed short (*hs_bindgen_109462175baa2bdf (void))[10]
-- {
-- return &ordinary_signed_short_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_short_array */
-- __attribute__ ((const))
-- signed short (*hs_bindgen_50f788c18928793d (void))[10]
-- {
-- return &explicit_signed_short_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_short_array */
-- __attribute__ ((const))
-- unsigned short (*hs_bindgen_d5ccc3314ab2eb42 (void))[10]
-- {
-- return &unsigned_short_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_int_array */
-- __attribute__ ((const))
-- signed int (*hs_bindgen_f7824c4ee10b0b90 (void))[10]
-- {
-- return &ordinary_signed_int_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_int_array */
-- __attribute__ ((const))
-- signed int (*hs_bindgen_448c7a47209c8b7a (void))[10]
-- {
-- return &explicit_signed_int_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_int_array */
-- __attribute__ ((const))
-- unsigned int (*hs_bindgen_66499a8ae9382b9e (void))[10]
-- {
-- return &unsigned_int_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long_array */
-- __attribute__ ((const))
-- signed long (*hs_bindgen_896d3ba25d886356 (void))[10]
-- {
-- return &ordinary_signed_long_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long_array */
-- __attribute__ ((const))
-- signed long (*hs_bindgen_c4ec5e2d6cf5b5ed (void))[10]
-- {
-- return &explicit_signed_long_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long_array */
-- __attribute__ ((const))
-- unsigned long (*hs_bindgen_e3fb79df55414b09 (void))[10]
-- {
-- return &unsigned_long_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_array */
-- __attribute__ ((const))
-- signed long long (*hs_bindgen_02c15bdcdfc54945 (void))[10]
-- {
-- return &ordinary_signed_long_long_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long_long_array */
-- __attribute__ ((const))
-- signed long long (*hs_bindgen_4c934e5832898551 (void))[10]
-- {
-- return &explicit_signed_long_long_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long_long_array */
-- __attribute__ ((const))
-- unsigned long long (*hs_bindgen_af47cf5cc0016405 (void))[10]
-- {
-- return &unsigned_long_long_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_void_pointer_array */
-- __attribute__ ((const))
-- void *(*hs_bindgen_b0da135021f97e27 (void))[10]
-- {
-- return &ordinary_void_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_float_pointer_array */
-- __attribute__ ((const))
-- float *(*hs_bindgen_41ce3a49f177f5a8 (void))[10]
-- {
-- return &ordinary_float_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_double_pointer_array */
-- __attribute__ ((const))
-- double *(*hs_bindgen_cfe3890477df51c8 (void))[10]
-- {
-- return &ordinary_double_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_char_pointer_array */
-- __attribute__ ((const))
-- char *(*hs_bindgen_e92be5e29785f22b (void))[10]
-- {
-- return &ordinary_signed_char_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_char_pointer_array */
-- __attribute__ ((const))
-- signed char *(*hs_bindgen_c8caf99249e8ad58 (void))[10]
-- {
-- return &explicit_signed_char_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_char_pointer_array */
-- __attribute__ ((const))
-- unsigned char *(*hs_bindgen_7028963176c7a21d (void))[10]
-- {
-- return &unsigned_char_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer_array */
-- __attribute__ ((const))
-- signed short *(*hs_bindgen_1866849231d566a0 (void))[10]
-- {
-- return &ordinary_signed_short_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer_array */
-- __attribute__ ((const))
-- signed short *(*hs_bindgen_68ed6d444e1b6011 (void))[10]
-- {
-- return &explicit_signed_short_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_short_pointer_array */
-- __attribute__ ((const))
-- unsigned short *(*hs_bindgen_7c0ca48c3269649a (void))[10]
-- {
-- return &unsigned_short_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer_array */
-- __attribute__ ((const))
-- signed int *(*hs_bindgen_58e6503e8ccbeb70 (void))[10]
-- {
-- return &ordinary_signed_int_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer_array */
-- __attribute__ ((const))
-- signed int *(*hs_bindgen_21b8395de873bc0a (void))[10]
-- {
-- return &explicit_signed_int_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_int_pointer_array */
-- __attribute__ ((const))
-- unsigned int *(*hs_bindgen_667d31d5b7b5106e (void))[10]
-- {
-- return &unsigned_int_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer_array */
-- __attribute__ ((const))
-- signed long *(*hs_bindgen_eb34bb7d213dcd3d (void))[10]
-- {
-- return &ordinary_signed_long_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer_array */
-- __attribute__ ((const))
-- signed long *(*hs_bindgen_3386ff9d0e54545d (void))[10]
-- {
-- return &explicit_signed_long_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long_pointer_array */
-- __attribute__ ((const))
-- unsigned long *(*hs_bindgen_510be86496a28c91 (void))[10]
-- {
-- return &unsigned_long_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer_array */
-- __attribute__ ((const))
-- signed long long *(*hs_bindgen_25f60aa140d341a7 (void))[10]
-- {
-- return &ordinary_signed_long_long_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer_array */
-- __attribute__ ((const))
-- signed long long *(*hs_bindgen_aced8afe33f53905 (void))[10]
-- {
-- return &explicit_signed_long_long_pointer_array;
-- }
-- /* test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer_array */
-- __attribute__ ((const))
-- unsigned long long *(*hs_bindgen_9534a7c84390edc4 (void))[10]
-- {
-- return &unsigned_long_long_pointer_array;
-- }
{-| Issues
__C declaration:__ @an_pchar@
__defined at:__ @comprehensive\/c2hsc.h 12:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype An_pchar
= An_pchar {unwrap :: (PtrConst CChar)}
deriving stock (Eq, Generic, Ord, Show)
deriving newtype (HasFFIType,
ReadRaw,
StaticSize,
Storable,
WriteRaw)
instance (~) ty (PtrConst CChar) => HasField "unwrap" An_pchar ty
where hasField = \x_0 -> (\y_1 -> An_pchar{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty (PtrConst CChar) =>
HasField "unwrap" (Ptr An_pchar) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField An_pchar "unwrap"
where type CFieldType An_pchar "unwrap" = PtrConst CChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct MyCoolStruct@
__defined at:__ @comprehensive\/c2hsc.h 15:9@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data MyCoolStruct
= MyCoolStruct {listOfNames :: (ConstantArray 8
(ConstantArray 255 CChar))
{- ^ __C declaration:__ @listOfNames@
__defined at:__ @comprehensive\/c2hsc.h 16:10@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize MyCoolStruct
where staticSizeOf = \_ -> 2040 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw MyCoolStruct
where readRaw = \ptr_0 -> pure MyCoolStruct <*> readRaw (Proxy @"listOfNames") ptr_0
instance WriteRaw MyCoolStruct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
MyCoolStruct listOfNames_2 -> writeRaw (Proxy @"listOfNames") ptr_0 listOfNames_2
deriving via (EquivStorable MyCoolStruct) instance Storable MyCoolStruct
deriving via (IsStructViaReadRaw MyCoolStruct) instance IsStruct MyCoolStruct
instance (~) ty (ConstantArray 8 (ConstantArray 255 CChar)) =>
HasField "listOfNames" MyCoolStruct ty
where hasField = \x_0 -> (\y_1 -> MyCoolStruct{listOfNames = y_1},
getField @"listOfNames" x_0)
instance (~) ty (ConstantArray 8 (ConstantArray 255 CChar)) =>
HasField "listOfNames" (Ptr MyCoolStruct) (Ptr ty)
where getField = fromPtr (Proxy @"listOfNames")
instance HasCField MyCoolStruct "listOfNames"
where type CFieldType MyCoolStruct "listOfNames" = ConstantArray 8
(ConstantArray 255 CChar)
offset# = \_ -> \_ -> 0
{-| Auxiliary type used by 'Foo'
__C declaration:__ @foo@
__defined at:__ @comprehensive\/c2hsc.h 20:15@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype Foo_Aux
= Foo_Aux {unwrap :: (CInt -> IO CInt)}
deriving stock Generic
-- __unique:__ @toFoo_Aux@
foreign import ccall safe "wrapper" hs_bindgen_b5a7b5e83ffee6b4_base ::
CInt -> IO CInt
-> IO (FunPtr (CInt -> IO CInt))
-- __unique:__ @toFoo_Aux@
hs_bindgen_b5a7b5e83ffee6b4 :: Foo_Aux -> IO (FunPtr Foo_Aux)
-- __unique:__ @toFoo_Aux@
hs_bindgen_b5a7b5e83ffee6b4 = \fun_0 -> fmap castFunPtr (hs_bindgen_b5a7b5e83ffee6b4_base (\x_1 -> fmap toFFIType (getField @"unwrap" fun_0 (fromFFIType x_1))))
-- __unique:__ @fromFoo_Aux@
foreign import ccall safe "dynamic" hs_bindgen_223d08172bb37c01_base ::
FunPtr (CInt -> IO CInt)
-> CInt
-> IO CInt
-- __unique:__ @fromFoo_Aux@
hs_bindgen_223d08172bb37c01 :: FunPtr Foo_Aux -> Foo_Aux
-- __unique:__ @fromFoo_Aux@
hs_bindgen_223d08172bb37c01 = \funPtr_0 -> Foo_Aux (\x_1 -> fmap fromFFIType (hs_bindgen_223d08172bb37c01_base (castFunPtr funPtr_0) (toFFIType x_1)))
instance ToFunPtr Foo_Aux
where toFunPtr = hs_bindgen_b5a7b5e83ffee6b4
instance FromFunPtr Foo_Aux
where fromFunPtr = hs_bindgen_223d08172bb37c01
instance (~) ty (CInt -> IO CInt) => HasField "unwrap" Foo_Aux ty
where hasField = \x_0 -> (\y_1 -> Foo_Aux{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty (CInt -> IO CInt) =>
HasField "unwrap" (Ptr Foo_Aux) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField Foo_Aux "unwrap"
where type CFieldType Foo_Aux "unwrap" = CInt -> IO CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @foo@
__defined at:__ @comprehensive\/c2hsc.h 20:15@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype Foo
= Foo {unwrap :: (FunPtr Foo_Aux)}
deriving stock (Eq, Generic, Ord, Show)
deriving newtype (HasFFIType,
ReadRaw,
StaticSize,
Storable,
WriteRaw)
instance (~) ty (FunPtr Foo_Aux) => HasField "unwrap" Foo ty
where hasField = \x_0 -> (\y_1 -> Foo{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty (FunPtr Foo_Aux) =>
HasField "unwrap" (Ptr Foo) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField Foo "unwrap"
where type CFieldType Foo "unwrap" = FunPtr Foo_Aux
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct foo_t@
__defined at:__ @comprehensive\/c2hsc.h 31:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Foo_t
= Foo_t {foo_member :: (FunPtr (CInt -> IO CInt))
{- ^ __C declaration:__ @foo_member@
__defined at:__ @comprehensive\/c2hsc.h 32:11@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Foo_t
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Foo_t
where readRaw = \ptr_0 -> pure Foo_t <*> readRaw (Proxy @"foo_member") ptr_0
instance WriteRaw Foo_t
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Foo_t foo_member_2 -> writeRaw (Proxy @"foo_member") ptr_0 foo_member_2
deriving via (EquivStorable Foo_t) instance Storable Foo_t
deriving via (IsStructViaReadRaw Foo_t) instance IsStruct Foo_t
instance (~) ty (FunPtr (CInt -> IO CInt)) =>
HasField "foo_member" Foo_t ty
where hasField = \x_0 -> (\y_1 -> Foo_t{foo_member = y_1},
getField @"foo_member" x_0)
instance (~) ty (FunPtr (CInt -> IO CInt)) =>
HasField "foo_member" (Ptr Foo_t) (Ptr ty)
where getField = fromPtr (Proxy @"foo_member")
instance HasCField Foo_t "foo_member"
where type CFieldType Foo_t "foo_member" = FunPtr (CInt -> IO CInt)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct Foo_10_@
__defined at:__ @comprehensive\/c2hsc.h 44:16@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Foo_10
{-| __C declaration:__ @enum Bar_10_@
__defined at:__ @comprehensive\/c2hsc.h 45:14@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype Bar_10
= Bar_10 {unwrap :: CUInt}
deriving stock (Eq, Generic, Ord)
deriving newtype HasFFIType
instance StaticSize Bar_10
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Bar_10
where readRaw = \ptr_0 -> pure Bar_10 <*> readRawByteOff ptr_0 (0 :: Int)
instance WriteRaw Bar_10
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Bar_10 unwrap_2 -> writeRawByteOff ptr_0 (0 :: Int) unwrap_2
deriving via (EquivStorable Bar_10) instance Storable Bar_10
deriving via CUInt instance Prim Bar_10
instance CEnum Bar_10
where type CEnumZ Bar_10 = CUInt
toCEnum = Bar_10
fromCEnum = getField @"unwrap"
declaredValues = \_ -> declaredValuesFromList [(0,
singleton "BAR")]
showsUndeclared = showsWrappedUndeclared "Bar_10"
readPrecUndeclared = readPrecWrappedUndeclared "Bar_10"
isDeclared = seqIsDeclared
mkDeclared = seqMkDeclared
instance SequentialCEnum Bar_10
where minDeclaredValue = BAR
maxDeclaredValue = BAR
instance Show Bar_10
where showsPrec = shows
instance Read Bar_10
where readPrec = readPrec
readList = readListDefault
readListPrec = readListPrecDefault
instance (~) ty CUInt => HasField "unwrap" Bar_10 ty
where hasField = \x_0 -> (\y_1 -> Bar_10{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty CUInt => HasField "unwrap" (Ptr Bar_10) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField Bar_10 "unwrap"
where type CFieldType Bar_10 "unwrap" = CUInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @BAR@
__defined at:__ @comprehensive\/c2hsc.h 45:24@
__exported by:__ @comprehensive\/c2hsc.h@
-}
pattern BAR :: Bar_10
pattern BAR = Bar_10 0
{-| __C declaration:__ @struct st@
__defined at:__ @comprehensive\/c2hsc.h 48:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data St
= St {i :: CInt
{- ^ __C declaration:__ @i@
__defined at:__ @comprehensive\/c2hsc.h 49:7@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize St
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw St
where readRaw = \ptr_0 -> pure St <*> readRaw (Proxy @"i") ptr_0
instance WriteRaw St
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
St i_2 -> writeRaw (Proxy @"i") ptr_0 i_2
deriving via (EquivStorable St) instance Storable St
deriving via (IsStructViaReadRaw St) instance IsStruct St
instance (~) ty CInt => HasField "i" St ty
where hasField = \x_0 -> (\y_1 -> St{i = y_1}, getField @"i" x_0)
instance (~) ty CInt => HasField "i" (Ptr St) (Ptr ty)
where getField = fromPtr (Proxy @"i")
instance HasCField St "i"
where type CFieldType St "i" = CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @enum e@
__defined at:__ @comprehensive\/c2hsc.h 52:6@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype E
= E {unwrap :: CUInt}
deriving stock (Eq, Generic, Ord)
deriving newtype HasFFIType
instance StaticSize E
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw E
where readRaw = \ptr_0 -> pure E <*> readRawByteOff ptr_0 (0 :: Int)
instance WriteRaw E
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
E unwrap_2 -> writeRawByteOff ptr_0 (0 :: Int) unwrap_2
deriving via (EquivStorable E) instance Storable E
deriving via CUInt instance Prim E
instance CEnum E
where type CEnumZ E = CUInt
toCEnum = E
fromCEnum = getField @"unwrap"
declaredValues = \_ -> declaredValuesFromList [(0,
singleton "CONST")]
showsUndeclared = showsWrappedUndeclared "E"
readPrecUndeclared = readPrecWrappedUndeclared "E"
isDeclared = seqIsDeclared
mkDeclared = seqMkDeclared
instance SequentialCEnum E
where minDeclaredValue = CONST
maxDeclaredValue = CONST
instance Show E
where showsPrec = shows
instance Read E
where readPrec = readPrec
readList = readListDefault
readListPrec = readListPrecDefault
instance (~) ty CUInt => HasField "unwrap" E ty
where hasField = \x_0 -> (\y_1 -> E{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty CUInt => HasField "unwrap" (Ptr E) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField E "unwrap"
where type CFieldType E "unwrap" = CUInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @CONST@
__defined at:__ @comprehensive\/c2hsc.h 53:3@
__exported by:__ @comprehensive\/c2hsc.h@
-}
pattern CONST :: E
pattern CONST = E 0
{-| __C declaration:__ @union u@
__defined at:__ @comprehensive\/c2hsc.h 56:7@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype U = U {unwrap :: ByteArray} deriving stock Generic
deriving via (SizedByteArray 1 1) instance StaticSize U
deriving via (SizedByteArray 1 1) instance ReadRaw U
deriving via (SizedByteArray 1 1) instance WriteRaw U
deriving via (EquivStorable U) instance Storable U
deriving via (SizedByteArray 1 1) instance IsUnion U
instance (~) ty CChar => HasField "c" U ty
where getField = getUnionPayload
instance (~) ty CChar => HasField "c" U ty
where hasField = \x_0 -> (\y_1 -> setUnionPayload y_1 x_0,
getField @"c" x_0)
instance (~) ty CChar => HasField "c" (Ptr U) (Ptr ty)
where getField = fromPtr (Proxy @"c")
instance HasCField U "c"
where type CFieldType U "c" = CChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct MyTypeImpl@
__defined at:__ @comprehensive\/c2hsc.h 61:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data MyTypeImpl
{-| __C declaration:__ @MyType@
__defined at:__ @comprehensive\/c2hsc.h 62:28@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype MyType
= MyType {unwrap :: (Ptr MyTypeImpl)}
deriving stock (Eq, Generic, Ord, Show)
deriving newtype (HasFFIType,
ReadRaw,
StaticSize,
Storable,
WriteRaw)
instance (~) ty (Ptr MyTypeImpl) => HasField "unwrap" MyType ty
where hasField = \x_0 -> (\y_1 -> MyType{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty (Ptr MyTypeImpl) =>
HasField "unwrap" (Ptr MyType) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField MyType "unwrap"
where type CFieldType MyType "unwrap" = Ptr MyTypeImpl
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct MyStruct@
__defined at:__ @comprehensive\/c2hsc.h 64:16@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data MyStructType
= MyStructType {x :: CInt
{- ^ __C declaration:__ @x@
__defined at:__ @comprehensive\/c2hsc.h 65:7@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize MyStructType
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw MyStructType
where readRaw = \ptr_0 -> pure MyStructType <*> readRaw (Proxy @"x") ptr_0
instance WriteRaw MyStructType
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
MyStructType x_2 -> writeRaw (Proxy @"x") ptr_0 x_2
deriving via (EquivStorable MyStructType) instance Storable MyStructType
deriving via (IsStructViaReadRaw MyStructType) instance IsStruct MyStructType
instance (~) ty CInt => HasField "x" MyStructType ty
where hasField = \x_0 -> (\y_1 -> MyStructType{x = y_1},
getField @"x" x_0)
instance (~) ty CInt => HasField "x" (Ptr MyStructType) (Ptr ty)
where getField = fromPtr (Proxy @"x")
instance HasCField MyStructType "x"
where type CFieldType MyStructType "x" = CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct MyStructEmpty@
__defined at:__ @comprehensive\/c2hsc.h 68:16@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data MyStructEmptyType
{-| Structs: primitive types
__C declaration:__ @struct ordinary_float_struct@
__defined at:__ @comprehensive\/c2hsc.h 204:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_float_struct
= Ordinary_float_struct {ordinary_float_member :: CFloat
{- ^ __C declaration:__ @ordinary_float_member@
__defined at:__ @comprehensive\/c2hsc.h 204:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_float_struct
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Ordinary_float_struct
where readRaw = \ptr_0 -> pure Ordinary_float_struct <*> readRaw (Proxy @"ordinary_float_member") ptr_0
instance WriteRaw Ordinary_float_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_float_struct ordinary_float_member_2 -> writeRaw (Proxy @"ordinary_float_member") ptr_0 ordinary_float_member_2
deriving via (EquivStorable Ordinary_float_struct) instance Storable Ordinary_float_struct
deriving via (IsStructViaReadRaw Ordinary_float_struct) instance IsStruct Ordinary_float_struct
instance (~) ty CFloat =>
HasField "ordinary_float_member" Ordinary_float_struct ty
where hasField = \x_0 -> (\y_1 -> Ordinary_float_struct{ordinary_float_member = y_1},
getField @"ordinary_float_member" x_0)
instance (~) ty CFloat =>
HasField "ordinary_float_member"
(Ptr Ordinary_float_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_float_member")
instance HasCField Ordinary_float_struct "ordinary_float_member"
where type CFieldType Ordinary_float_struct
"ordinary_float_member" = CFloat
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_double_struct@
__defined at:__ @comprehensive\/c2hsc.h 205:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_double_struct
= Ordinary_double_struct {ordinary_double_member :: CDouble
{- ^ __C declaration:__ @ordinary_double_member@
__defined at:__ @comprehensive\/c2hsc.h 205:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_double_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_double_struct
where readRaw = \ptr_0 -> pure Ordinary_double_struct <*> readRaw (Proxy @"ordinary_double_member") ptr_0
instance WriteRaw Ordinary_double_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_double_struct ordinary_double_member_2 -> writeRaw (Proxy @"ordinary_double_member") ptr_0 ordinary_double_member_2
deriving via (EquivStorable Ordinary_double_struct) instance Storable Ordinary_double_struct
deriving via (IsStructViaReadRaw Ordinary_double_struct) instance IsStruct Ordinary_double_struct
instance (~) ty CDouble =>
HasField "ordinary_double_member" Ordinary_double_struct ty
where hasField = \x_0 -> (\y_1 -> Ordinary_double_struct{ordinary_double_member = y_1},
getField @"ordinary_double_member" x_0)
instance (~) ty CDouble =>
HasField "ordinary_double_member"
(Ptr Ordinary_double_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_double_member")
instance HasCField Ordinary_double_struct "ordinary_double_member"
where type CFieldType Ordinary_double_struct
"ordinary_double_member" = CDouble
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_char_struct@
__defined at:__ @comprehensive\/c2hsc.h 208:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_char_struct
= Ordinary_signed_char_struct {ordinary_signed_char_member :: CChar
{- ^ __C declaration:__ @ordinary_signed_char_member@
__defined at:__ @comprehensive\/c2hsc.h 208:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_char_struct
where staticSizeOf = \_ -> 1 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw Ordinary_signed_char_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_char_struct <*> readRaw (Proxy @"ordinary_signed_char_member") ptr_0
instance WriteRaw Ordinary_signed_char_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_char_struct ordinary_signed_char_member_2 -> writeRaw (Proxy @"ordinary_signed_char_member") ptr_0 ordinary_signed_char_member_2
deriving via (EquivStorable Ordinary_signed_char_struct) instance Storable Ordinary_signed_char_struct
deriving via (IsStructViaReadRaw Ordinary_signed_char_struct) instance IsStruct Ordinary_signed_char_struct
instance (~) ty CChar =>
HasField "ordinary_signed_char_member"
Ordinary_signed_char_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_char_struct{ordinary_signed_char_member = y_1},
getField @"ordinary_signed_char_member" x_0)
instance (~) ty CChar =>
HasField "ordinary_signed_char_member"
(Ptr Ordinary_signed_char_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_char_member")
instance HasCField Ordinary_signed_char_struct
"ordinary_signed_char_member"
where type CFieldType Ordinary_signed_char_struct
"ordinary_signed_char_member" = CChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_char_struct@
__defined at:__ @comprehensive\/c2hsc.h 209:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_char_struct
= Explicit_signed_char_struct {explicit_signed_char_member :: CSChar
{- ^ __C declaration:__ @explicit_signed_char_member@
__defined at:__ @comprehensive\/c2hsc.h 209:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_char_struct
where staticSizeOf = \_ -> 1 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw Explicit_signed_char_struct
where readRaw = \ptr_0 -> pure Explicit_signed_char_struct <*> readRaw (Proxy @"explicit_signed_char_member") ptr_0
instance WriteRaw Explicit_signed_char_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_char_struct explicit_signed_char_member_2 -> writeRaw (Proxy @"explicit_signed_char_member") ptr_0 explicit_signed_char_member_2
deriving via (EquivStorable Explicit_signed_char_struct) instance Storable Explicit_signed_char_struct
deriving via (IsStructViaReadRaw Explicit_signed_char_struct) instance IsStruct Explicit_signed_char_struct
instance (~) ty CSChar =>
HasField "explicit_signed_char_member"
Explicit_signed_char_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_char_struct{explicit_signed_char_member = y_1},
getField @"explicit_signed_char_member" x_0)
instance (~) ty CSChar =>
HasField "explicit_signed_char_member"
(Ptr Explicit_signed_char_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_char_member")
instance HasCField Explicit_signed_char_struct
"explicit_signed_char_member"
where type CFieldType Explicit_signed_char_struct
"explicit_signed_char_member" = CSChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_char_struct@
__defined at:__ @comprehensive\/c2hsc.h 210:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_char_struct
= Unsigned_char_struct {unsigned_char_member :: CUChar
{- ^ __C declaration:__ @unsigned_char_member@
__defined at:__ @comprehensive\/c2hsc.h 210:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_char_struct
where staticSizeOf = \_ -> 1 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw Unsigned_char_struct
where readRaw = \ptr_0 -> pure Unsigned_char_struct <*> readRaw (Proxy @"unsigned_char_member") ptr_0
instance WriteRaw Unsigned_char_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_char_struct unsigned_char_member_2 -> writeRaw (Proxy @"unsigned_char_member") ptr_0 unsigned_char_member_2
deriving via (EquivStorable Unsigned_char_struct) instance Storable Unsigned_char_struct
deriving via (IsStructViaReadRaw Unsigned_char_struct) instance IsStruct Unsigned_char_struct
instance (~) ty CUChar =>
HasField "unsigned_char_member" Unsigned_char_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_char_struct{unsigned_char_member = y_1},
getField @"unsigned_char_member" x_0)
instance (~) ty CUChar =>
HasField "unsigned_char_member" (Ptr Unsigned_char_struct) (Ptr ty)
where getField = fromPtr (Proxy @"unsigned_char_member")
instance HasCField Unsigned_char_struct "unsigned_char_member"
where type CFieldType Unsigned_char_struct
"unsigned_char_member" = CUChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_short_struct@
__defined at:__ @comprehensive\/c2hsc.h 212:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_short_struct
= Ordinary_signed_short_struct {ordinary_signed_short_member :: CShort
{- ^ __C declaration:__ @ordinary_signed_short_member@
__defined at:__ @comprehensive\/c2hsc.h 212:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_short_struct
where staticSizeOf = \_ -> 2 :: Int
staticAlignment = \_ -> 2 :: Int
instance ReadRaw Ordinary_signed_short_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_short_struct <*> readRaw (Proxy @"ordinary_signed_short_member") ptr_0
instance WriteRaw Ordinary_signed_short_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_short_struct ordinary_signed_short_member_2 -> writeRaw (Proxy @"ordinary_signed_short_member") ptr_0 ordinary_signed_short_member_2
deriving via (EquivStorable Ordinary_signed_short_struct) instance Storable Ordinary_signed_short_struct
deriving via (IsStructViaReadRaw Ordinary_signed_short_struct) instance IsStruct Ordinary_signed_short_struct
instance (~) ty CShort =>
HasField "ordinary_signed_short_member"
Ordinary_signed_short_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_short_struct{ordinary_signed_short_member = y_1},
getField @"ordinary_signed_short_member" x_0)
instance (~) ty CShort =>
HasField "ordinary_signed_short_member"
(Ptr Ordinary_signed_short_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_short_member")
instance HasCField Ordinary_signed_short_struct
"ordinary_signed_short_member"
where type CFieldType Ordinary_signed_short_struct
"ordinary_signed_short_member" = CShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_short_struct@
__defined at:__ @comprehensive\/c2hsc.h 213:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_short_struct
= Explicit_signed_short_struct {explicit_signed_short_member :: CShort
{- ^ __C declaration:__ @explicit_signed_short_member@
__defined at:__ @comprehensive\/c2hsc.h 213:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_short_struct
where staticSizeOf = \_ -> 2 :: Int
staticAlignment = \_ -> 2 :: Int
instance ReadRaw Explicit_signed_short_struct
where readRaw = \ptr_0 -> pure Explicit_signed_short_struct <*> readRaw (Proxy @"explicit_signed_short_member") ptr_0
instance WriteRaw Explicit_signed_short_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_short_struct explicit_signed_short_member_2 -> writeRaw (Proxy @"explicit_signed_short_member") ptr_0 explicit_signed_short_member_2
deriving via (EquivStorable Explicit_signed_short_struct) instance Storable Explicit_signed_short_struct
deriving via (IsStructViaReadRaw Explicit_signed_short_struct) instance IsStruct Explicit_signed_short_struct
instance (~) ty CShort =>
HasField "explicit_signed_short_member"
Explicit_signed_short_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_short_struct{explicit_signed_short_member = y_1},
getField @"explicit_signed_short_member" x_0)
instance (~) ty CShort =>
HasField "explicit_signed_short_member"
(Ptr Explicit_signed_short_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_short_member")
instance HasCField Explicit_signed_short_struct
"explicit_signed_short_member"
where type CFieldType Explicit_signed_short_struct
"explicit_signed_short_member" = CShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_short_struct@
__defined at:__ @comprehensive\/c2hsc.h 214:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_short_struct
= Unsigned_short_struct {unsigned_short_member :: CUShort
{- ^ __C declaration:__ @unsigned_short_member@
__defined at:__ @comprehensive\/c2hsc.h 214:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_short_struct
where staticSizeOf = \_ -> 2 :: Int
staticAlignment = \_ -> 2 :: Int
instance ReadRaw Unsigned_short_struct
where readRaw = \ptr_0 -> pure Unsigned_short_struct <*> readRaw (Proxy @"unsigned_short_member") ptr_0
instance WriteRaw Unsigned_short_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_short_struct unsigned_short_member_2 -> writeRaw (Proxy @"unsigned_short_member") ptr_0 unsigned_short_member_2
deriving via (EquivStorable Unsigned_short_struct) instance Storable Unsigned_short_struct
deriving via (IsStructViaReadRaw Unsigned_short_struct) instance IsStruct Unsigned_short_struct
instance (~) ty CUShort =>
HasField "unsigned_short_member" Unsigned_short_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_short_struct{unsigned_short_member = y_1},
getField @"unsigned_short_member" x_0)
instance (~) ty CUShort =>
HasField "unsigned_short_member"
(Ptr Unsigned_short_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_short_member")
instance HasCField Unsigned_short_struct "unsigned_short_member"
where type CFieldType Unsigned_short_struct
"unsigned_short_member" = CUShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_int_struct@
__defined at:__ @comprehensive\/c2hsc.h 216:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_int_struct
= Ordinary_signed_int_struct {ordinary_signed_int_member :: CInt
{- ^ __C declaration:__ @ordinary_signed_int_member@
__defined at:__ @comprehensive\/c2hsc.h 216:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_int_struct
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Ordinary_signed_int_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_int_struct <*> readRaw (Proxy @"ordinary_signed_int_member") ptr_0
instance WriteRaw Ordinary_signed_int_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_int_struct ordinary_signed_int_member_2 -> writeRaw (Proxy @"ordinary_signed_int_member") ptr_0 ordinary_signed_int_member_2
deriving via (EquivStorable Ordinary_signed_int_struct) instance Storable Ordinary_signed_int_struct
deriving via (IsStructViaReadRaw Ordinary_signed_int_struct) instance IsStruct Ordinary_signed_int_struct
instance (~) ty CInt =>
HasField "ordinary_signed_int_member" Ordinary_signed_int_struct ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_int_struct{ordinary_signed_int_member = y_1},
getField @"ordinary_signed_int_member" x_0)
instance (~) ty CInt =>
HasField "ordinary_signed_int_member"
(Ptr Ordinary_signed_int_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_int_member")
instance HasCField Ordinary_signed_int_struct
"ordinary_signed_int_member"
where type CFieldType Ordinary_signed_int_struct
"ordinary_signed_int_member" = CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_int_struct@
__defined at:__ @comprehensive\/c2hsc.h 217:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_int_struct
= Explicit_signed_int_struct {explicit_signed_int_member :: CInt
{- ^ __C declaration:__ @explicit_signed_int_member@
__defined at:__ @comprehensive\/c2hsc.h 217:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_int_struct
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Explicit_signed_int_struct
where readRaw = \ptr_0 -> pure Explicit_signed_int_struct <*> readRaw (Proxy @"explicit_signed_int_member") ptr_0
instance WriteRaw Explicit_signed_int_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_int_struct explicit_signed_int_member_2 -> writeRaw (Proxy @"explicit_signed_int_member") ptr_0 explicit_signed_int_member_2
deriving via (EquivStorable Explicit_signed_int_struct) instance Storable Explicit_signed_int_struct
deriving via (IsStructViaReadRaw Explicit_signed_int_struct) instance IsStruct Explicit_signed_int_struct
instance (~) ty CInt =>
HasField "explicit_signed_int_member" Explicit_signed_int_struct ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_int_struct{explicit_signed_int_member = y_1},
getField @"explicit_signed_int_member" x_0)
instance (~) ty CInt =>
HasField "explicit_signed_int_member"
(Ptr Explicit_signed_int_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_int_member")
instance HasCField Explicit_signed_int_struct
"explicit_signed_int_member"
where type CFieldType Explicit_signed_int_struct
"explicit_signed_int_member" = CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_int_struct@
__defined at:__ @comprehensive\/c2hsc.h 218:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_int_struct
= Unsigned_int_struct {unsigned_int_member :: CUInt
{- ^ __C declaration:__ @unsigned_int_member@
__defined at:__ @comprehensive\/c2hsc.h 218:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_int_struct
where staticSizeOf = \_ -> 4 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Unsigned_int_struct
where readRaw = \ptr_0 -> pure Unsigned_int_struct <*> readRaw (Proxy @"unsigned_int_member") ptr_0
instance WriteRaw Unsigned_int_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_int_struct unsigned_int_member_2 -> writeRaw (Proxy @"unsigned_int_member") ptr_0 unsigned_int_member_2
deriving via (EquivStorable Unsigned_int_struct) instance Storable Unsigned_int_struct
deriving via (IsStructViaReadRaw Unsigned_int_struct) instance IsStruct Unsigned_int_struct
instance (~) ty CUInt =>
HasField "unsigned_int_member" Unsigned_int_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_int_struct{unsigned_int_member = y_1},
getField @"unsigned_int_member" x_0)
instance (~) ty CUInt =>
HasField "unsigned_int_member" (Ptr Unsigned_int_struct) (Ptr ty)
where getField = fromPtr (Proxy @"unsigned_int_member")
instance HasCField Unsigned_int_struct "unsigned_int_member"
where type CFieldType Unsigned_int_struct
"unsigned_int_member" = CUInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_struct@
__defined at:__ @comprehensive\/c2hsc.h 220:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_struct
= Ordinary_signed_long_struct {ordinary_signed_long_member :: CLong
{- ^ __C declaration:__ @ordinary_signed_long_member@
__defined at:__ @comprehensive\/c2hsc.h 220:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_struct <*> readRaw (Proxy @"ordinary_signed_long_member") ptr_0
instance WriteRaw Ordinary_signed_long_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_struct ordinary_signed_long_member_2 -> writeRaw (Proxy @"ordinary_signed_long_member") ptr_0 ordinary_signed_long_member_2
deriving via (EquivStorable Ordinary_signed_long_struct) instance Storable Ordinary_signed_long_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_struct) instance IsStruct Ordinary_signed_long_struct
instance (~) ty CLong =>
HasField "ordinary_signed_long_member"
Ordinary_signed_long_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_struct{ordinary_signed_long_member = y_1},
getField @"ordinary_signed_long_member" x_0)
instance (~) ty CLong =>
HasField "ordinary_signed_long_member"
(Ptr Ordinary_signed_long_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_member")
instance HasCField Ordinary_signed_long_struct
"ordinary_signed_long_member"
where type CFieldType Ordinary_signed_long_struct
"ordinary_signed_long_member" = CLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_struct@
__defined at:__ @comprehensive\/c2hsc.h 221:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_struct
= Explicit_signed_long_struct {explicit_signed_long_member :: CLong
{- ^ __C declaration:__ @explicit_signed_long_member@
__defined at:__ @comprehensive\/c2hsc.h 221:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_struct <*> readRaw (Proxy @"explicit_signed_long_member") ptr_0
instance WriteRaw Explicit_signed_long_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_struct explicit_signed_long_member_2 -> writeRaw (Proxy @"explicit_signed_long_member") ptr_0 explicit_signed_long_member_2
deriving via (EquivStorable Explicit_signed_long_struct) instance Storable Explicit_signed_long_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_struct) instance IsStruct Explicit_signed_long_struct
instance (~) ty CLong =>
HasField "explicit_signed_long_member"
Explicit_signed_long_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_struct{explicit_signed_long_member = y_1},
getField @"explicit_signed_long_member" x_0)
instance (~) ty CLong =>
HasField "explicit_signed_long_member"
(Ptr Explicit_signed_long_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_member")
instance HasCField Explicit_signed_long_struct
"explicit_signed_long_member"
where type CFieldType Explicit_signed_long_struct
"explicit_signed_long_member" = CLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_struct@
__defined at:__ @comprehensive\/c2hsc.h 222:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_struct
= Unsigned_long_struct {unsigned_long_member :: CULong
{- ^ __C declaration:__ @unsigned_long_member@
__defined at:__ @comprehensive\/c2hsc.h 222:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_struct
where readRaw = \ptr_0 -> pure Unsigned_long_struct <*> readRaw (Proxy @"unsigned_long_member") ptr_0
instance WriteRaw Unsigned_long_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_struct unsigned_long_member_2 -> writeRaw (Proxy @"unsigned_long_member") ptr_0 unsigned_long_member_2
deriving via (EquivStorable Unsigned_long_struct) instance Storable Unsigned_long_struct
deriving via (IsStructViaReadRaw Unsigned_long_struct) instance IsStruct Unsigned_long_struct
instance (~) ty CULong =>
HasField "unsigned_long_member" Unsigned_long_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_struct{unsigned_long_member = y_1},
getField @"unsigned_long_member" x_0)
instance (~) ty CULong =>
HasField "unsigned_long_member" (Ptr Unsigned_long_struct) (Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_member")
instance HasCField Unsigned_long_struct "unsigned_long_member"
where type CFieldType Unsigned_long_struct
"unsigned_long_member" = CULong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_long_struct@
__defined at:__ @comprehensive\/c2hsc.h 224:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_long_struct
= Ordinary_signed_long_long_struct {ordinary_signed_long_long_member :: CLLong
{- ^ __C declaration:__ @ordinary_signed_long_long_member@
__defined at:__ @comprehensive\/c2hsc.h 224:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_long_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_long_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_long_struct <*> readRaw (Proxy @"ordinary_signed_long_long_member") ptr_0
instance WriteRaw Ordinary_signed_long_long_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_long_struct ordinary_signed_long_long_member_2 -> writeRaw (Proxy @"ordinary_signed_long_long_member") ptr_0 ordinary_signed_long_long_member_2
deriving via (EquivStorable Ordinary_signed_long_long_struct) instance Storable Ordinary_signed_long_long_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_long_struct) instance IsStruct Ordinary_signed_long_long_struct
instance (~) ty CLLong =>
HasField "ordinary_signed_long_long_member"
Ordinary_signed_long_long_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_long_struct{ordinary_signed_long_long_member = y_1},
getField @"ordinary_signed_long_long_member" x_0)
instance (~) ty CLLong =>
HasField "ordinary_signed_long_long_member"
(Ptr Ordinary_signed_long_long_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_long_member")
instance HasCField Ordinary_signed_long_long_struct
"ordinary_signed_long_long_member"
where type CFieldType Ordinary_signed_long_long_struct
"ordinary_signed_long_long_member" = CLLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_long_struct@
__defined at:__ @comprehensive\/c2hsc.h 225:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_long_struct
= Explicit_signed_long_long_struct {explicit_signed_long_long_member :: CLLong
{- ^ __C declaration:__ @explicit_signed_long_long_member@
__defined at:__ @comprehensive\/c2hsc.h 225:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_long_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_long_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_long_struct <*> readRaw (Proxy @"explicit_signed_long_long_member") ptr_0
instance WriteRaw Explicit_signed_long_long_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_long_struct explicit_signed_long_long_member_2 -> writeRaw (Proxy @"explicit_signed_long_long_member") ptr_0 explicit_signed_long_long_member_2
deriving via (EquivStorable Explicit_signed_long_long_struct) instance Storable Explicit_signed_long_long_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_long_struct) instance IsStruct Explicit_signed_long_long_struct
instance (~) ty CLLong =>
HasField "explicit_signed_long_long_member"
Explicit_signed_long_long_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_long_struct{explicit_signed_long_long_member = y_1},
getField @"explicit_signed_long_long_member" x_0)
instance (~) ty CLLong =>
HasField "explicit_signed_long_long_member"
(Ptr Explicit_signed_long_long_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_long_member")
instance HasCField Explicit_signed_long_long_struct
"explicit_signed_long_long_member"
where type CFieldType Explicit_signed_long_long_struct
"explicit_signed_long_long_member" = CLLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_long_struct@
__defined at:__ @comprehensive\/c2hsc.h 226:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_long_struct
= Unsigned_long_long_struct {unsigned_long_long_member :: CULLong
{- ^ __C declaration:__ @unsigned_long_long_member@
__defined at:__ @comprehensive\/c2hsc.h 226:62@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_long_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_long_struct
where readRaw = \ptr_0 -> pure Unsigned_long_long_struct <*> readRaw (Proxy @"unsigned_long_long_member") ptr_0
instance WriteRaw Unsigned_long_long_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_long_struct unsigned_long_long_member_2 -> writeRaw (Proxy @"unsigned_long_long_member") ptr_0 unsigned_long_long_member_2
deriving via (EquivStorable Unsigned_long_long_struct) instance Storable Unsigned_long_long_struct
deriving via (IsStructViaReadRaw Unsigned_long_long_struct) instance IsStruct Unsigned_long_long_struct
instance (~) ty CULLong =>
HasField "unsigned_long_long_member" Unsigned_long_long_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_long_struct{unsigned_long_long_member = y_1},
getField @"unsigned_long_long_member" x_0)
instance (~) ty CULLong =>
HasField "unsigned_long_long_member"
(Ptr Unsigned_long_long_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_long_member")
instance HasCField Unsigned_long_long_struct
"unsigned_long_long_member"
where type CFieldType Unsigned_long_long_struct
"unsigned_long_long_member" = CULLong
offset# = \_ -> \_ -> 0
{-| Structs: pointers
NOTE: @'Ordinary_signed_char_pointer_struct'@ is commented out in the original test suite, unclear why (no reason is given).
__C declaration:__ @struct ordinary_void_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 235:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_void_pointer_struct
= Ordinary_void_pointer_struct {ordinary_void_pointer_member :: (Ptr Void)
{- ^ __C declaration:__ @ordinary_void_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 235:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_void_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_void_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_void_pointer_struct <*> readRaw (Proxy @"ordinary_void_pointer_member") ptr_0
instance WriteRaw Ordinary_void_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_void_pointer_struct ordinary_void_pointer_member_2 -> writeRaw (Proxy @"ordinary_void_pointer_member") ptr_0 ordinary_void_pointer_member_2
deriving via (EquivStorable Ordinary_void_pointer_struct) instance Storable Ordinary_void_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_void_pointer_struct) instance IsStruct Ordinary_void_pointer_struct
instance (~) ty (Ptr Void) =>
HasField "ordinary_void_pointer_member"
Ordinary_void_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_void_pointer_struct{ordinary_void_pointer_member = y_1},
getField @"ordinary_void_pointer_member" x_0)
instance (~) ty (Ptr Void) =>
HasField "ordinary_void_pointer_member"
(Ptr Ordinary_void_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_void_pointer_member")
instance HasCField Ordinary_void_pointer_struct
"ordinary_void_pointer_member"
where type CFieldType Ordinary_void_pointer_struct
"ordinary_void_pointer_member" = Ptr Void
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_float_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 237:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_float_pointer_struct
= Ordinary_float_pointer_struct {ordinary_float_pointer_member :: (Ptr CFloat)
{- ^ __C declaration:__ @ordinary_float_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 237:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_float_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_float_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_float_pointer_struct <*> readRaw (Proxy @"ordinary_float_pointer_member") ptr_0
instance WriteRaw Ordinary_float_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_float_pointer_struct ordinary_float_pointer_member_2 -> writeRaw (Proxy @"ordinary_float_pointer_member") ptr_0 ordinary_float_pointer_member_2
deriving via (EquivStorable Ordinary_float_pointer_struct) instance Storable Ordinary_float_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_float_pointer_struct) instance IsStruct Ordinary_float_pointer_struct
instance (~) ty (Ptr CFloat) =>
HasField "ordinary_float_pointer_member"
Ordinary_float_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_float_pointer_struct{ordinary_float_pointer_member = y_1},
getField @"ordinary_float_pointer_member" x_0)
instance (~) ty (Ptr CFloat) =>
HasField "ordinary_float_pointer_member"
(Ptr Ordinary_float_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_float_pointer_member")
instance HasCField Ordinary_float_pointer_struct
"ordinary_float_pointer_member"
where type CFieldType Ordinary_float_pointer_struct
"ordinary_float_pointer_member" = Ptr CFloat
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_double_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 238:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_double_pointer_struct
= Ordinary_double_pointer_struct {ordinary_double_pointer_member :: (Ptr CDouble)
{- ^ __C declaration:__ @ordinary_double_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 238:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_double_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_double_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_double_pointer_struct <*> readRaw (Proxy @"ordinary_double_pointer_member") ptr_0
instance WriteRaw Ordinary_double_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_double_pointer_struct ordinary_double_pointer_member_2 -> writeRaw (Proxy @"ordinary_double_pointer_member") ptr_0 ordinary_double_pointer_member_2
deriving via (EquivStorable Ordinary_double_pointer_struct) instance Storable Ordinary_double_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_double_pointer_struct) instance IsStruct Ordinary_double_pointer_struct
instance (~) ty (Ptr CDouble) =>
HasField "ordinary_double_pointer_member"
Ordinary_double_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_double_pointer_struct{ordinary_double_pointer_member = y_1},
getField @"ordinary_double_pointer_member" x_0)
instance (~) ty (Ptr CDouble) =>
HasField "ordinary_double_pointer_member"
(Ptr Ordinary_double_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_double_pointer_member")
instance HasCField Ordinary_double_pointer_struct
"ordinary_double_pointer_member"
where type CFieldType Ordinary_double_pointer_struct
"ordinary_double_pointer_member" = Ptr CDouble
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_char_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 241:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_char_pointer_struct
= Ordinary_signed_char_pointer_struct {ordinary_signed_char_pointer_member :: (Ptr CChar)
{- ^ __C declaration:__ @ordinary_signed_char_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 241:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_char_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_char_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_char_pointer_struct <*> readRaw (Proxy @"ordinary_signed_char_pointer_member") ptr_0
instance WriteRaw Ordinary_signed_char_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_char_pointer_struct ordinary_signed_char_pointer_member_2 -> writeRaw (Proxy @"ordinary_signed_char_pointer_member") ptr_0 ordinary_signed_char_pointer_member_2
deriving via (EquivStorable Ordinary_signed_char_pointer_struct) instance Storable Ordinary_signed_char_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_signed_char_pointer_struct) instance IsStruct Ordinary_signed_char_pointer_struct
instance (~) ty (Ptr CChar) =>
HasField "ordinary_signed_char_pointer_member"
Ordinary_signed_char_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_char_pointer_struct{ordinary_signed_char_pointer_member = y_1},
getField @"ordinary_signed_char_pointer_member" x_0)
instance (~) ty (Ptr CChar) =>
HasField "ordinary_signed_char_pointer_member"
(Ptr Ordinary_signed_char_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_char_pointer_member")
instance HasCField Ordinary_signed_char_pointer_struct
"ordinary_signed_char_pointer_member"
where type CFieldType Ordinary_signed_char_pointer_struct
"ordinary_signed_char_pointer_member" = Ptr CChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_char_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 242:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_char_pointer_struct
= Explicit_signed_char_pointer_struct {explicit_signed_char_pointer_member :: (Ptr CSChar)
{- ^ __C declaration:__ @explicit_signed_char_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 242:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_char_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_char_pointer_struct
where readRaw = \ptr_0 -> pure Explicit_signed_char_pointer_struct <*> readRaw (Proxy @"explicit_signed_char_pointer_member") ptr_0
instance WriteRaw Explicit_signed_char_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_char_pointer_struct explicit_signed_char_pointer_member_2 -> writeRaw (Proxy @"explicit_signed_char_pointer_member") ptr_0 explicit_signed_char_pointer_member_2
deriving via (EquivStorable Explicit_signed_char_pointer_struct) instance Storable Explicit_signed_char_pointer_struct
deriving via (IsStructViaReadRaw Explicit_signed_char_pointer_struct) instance IsStruct Explicit_signed_char_pointer_struct
instance (~) ty (Ptr CSChar) =>
HasField "explicit_signed_char_pointer_member"
Explicit_signed_char_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_char_pointer_struct{explicit_signed_char_pointer_member = y_1},
getField @"explicit_signed_char_pointer_member" x_0)
instance (~) ty (Ptr CSChar) =>
HasField "explicit_signed_char_pointer_member"
(Ptr Explicit_signed_char_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_char_pointer_member")
instance HasCField Explicit_signed_char_pointer_struct
"explicit_signed_char_pointer_member"
where type CFieldType Explicit_signed_char_pointer_struct
"explicit_signed_char_pointer_member" = Ptr CSChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_char_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 243:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_char_pointer_struct
= Unsigned_char_pointer_struct {unsigned_char_pointer_member :: (Ptr CUChar)
{- ^ __C declaration:__ @unsigned_char_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 243:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_char_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_char_pointer_struct
where readRaw = \ptr_0 -> pure Unsigned_char_pointer_struct <*> readRaw (Proxy @"unsigned_char_pointer_member") ptr_0
instance WriteRaw Unsigned_char_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_char_pointer_struct unsigned_char_pointer_member_2 -> writeRaw (Proxy @"unsigned_char_pointer_member") ptr_0 unsigned_char_pointer_member_2
deriving via (EquivStorable Unsigned_char_pointer_struct) instance Storable Unsigned_char_pointer_struct
deriving via (IsStructViaReadRaw Unsigned_char_pointer_struct) instance IsStruct Unsigned_char_pointer_struct
instance (~) ty (Ptr CUChar) =>
HasField "unsigned_char_pointer_member"
Unsigned_char_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_char_pointer_struct{unsigned_char_pointer_member = y_1},
getField @"unsigned_char_pointer_member" x_0)
instance (~) ty (Ptr CUChar) =>
HasField "unsigned_char_pointer_member"
(Ptr Unsigned_char_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_char_pointer_member")
instance HasCField Unsigned_char_pointer_struct
"unsigned_char_pointer_member"
where type CFieldType Unsigned_char_pointer_struct
"unsigned_char_pointer_member" = Ptr CUChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_short_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 245:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_short_pointer_struct
= Ordinary_signed_short_pointer_struct {ordinary_signed_short_pointer_member :: (Ptr CShort)
{- ^ __C declaration:__ @ordinary_signed_short_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 245:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_short_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_short_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_short_pointer_struct <*> readRaw (Proxy @"ordinary_signed_short_pointer_member") ptr_0
instance WriteRaw Ordinary_signed_short_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_short_pointer_struct ordinary_signed_short_pointer_member_2 -> writeRaw (Proxy @"ordinary_signed_short_pointer_member") ptr_0 ordinary_signed_short_pointer_member_2
deriving via (EquivStorable Ordinary_signed_short_pointer_struct) instance Storable Ordinary_signed_short_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_signed_short_pointer_struct) instance IsStruct Ordinary_signed_short_pointer_struct
instance (~) ty (Ptr CShort) =>
HasField "ordinary_signed_short_pointer_member"
Ordinary_signed_short_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_short_pointer_struct{ordinary_signed_short_pointer_member = y_1},
getField @"ordinary_signed_short_pointer_member" x_0)
instance (~) ty (Ptr CShort) =>
HasField "ordinary_signed_short_pointer_member"
(Ptr Ordinary_signed_short_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_short_pointer_member")
instance HasCField Ordinary_signed_short_pointer_struct
"ordinary_signed_short_pointer_member"
where type CFieldType Ordinary_signed_short_pointer_struct
"ordinary_signed_short_pointer_member" = Ptr CShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_short_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 246:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_short_pointer_struct
= Explicit_signed_short_pointer_struct {explicit_signed_short_pointer_member :: (Ptr CShort)
{- ^ __C declaration:__ @explicit_signed_short_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 246:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_short_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_short_pointer_struct
where readRaw = \ptr_0 -> pure Explicit_signed_short_pointer_struct <*> readRaw (Proxy @"explicit_signed_short_pointer_member") ptr_0
instance WriteRaw Explicit_signed_short_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_short_pointer_struct explicit_signed_short_pointer_member_2 -> writeRaw (Proxy @"explicit_signed_short_pointer_member") ptr_0 explicit_signed_short_pointer_member_2
deriving via (EquivStorable Explicit_signed_short_pointer_struct) instance Storable Explicit_signed_short_pointer_struct
deriving via (IsStructViaReadRaw Explicit_signed_short_pointer_struct) instance IsStruct Explicit_signed_short_pointer_struct
instance (~) ty (Ptr CShort) =>
HasField "explicit_signed_short_pointer_member"
Explicit_signed_short_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_short_pointer_struct{explicit_signed_short_pointer_member = y_1},
getField @"explicit_signed_short_pointer_member" x_0)
instance (~) ty (Ptr CShort) =>
HasField "explicit_signed_short_pointer_member"
(Ptr Explicit_signed_short_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_short_pointer_member")
instance HasCField Explicit_signed_short_pointer_struct
"explicit_signed_short_pointer_member"
where type CFieldType Explicit_signed_short_pointer_struct
"explicit_signed_short_pointer_member" = Ptr CShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_short_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 247:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_short_pointer_struct
= Unsigned_short_pointer_struct {unsigned_short_pointer_member :: (Ptr CUShort)
{- ^ __C declaration:__ @unsigned_short_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 247:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_short_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_short_pointer_struct
where readRaw = \ptr_0 -> pure Unsigned_short_pointer_struct <*> readRaw (Proxy @"unsigned_short_pointer_member") ptr_0
instance WriteRaw Unsigned_short_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_short_pointer_struct unsigned_short_pointer_member_2 -> writeRaw (Proxy @"unsigned_short_pointer_member") ptr_0 unsigned_short_pointer_member_2
deriving via (EquivStorable Unsigned_short_pointer_struct) instance Storable Unsigned_short_pointer_struct
deriving via (IsStructViaReadRaw Unsigned_short_pointer_struct) instance IsStruct Unsigned_short_pointer_struct
instance (~) ty (Ptr CUShort) =>
HasField "unsigned_short_pointer_member"
Unsigned_short_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_short_pointer_struct{unsigned_short_pointer_member = y_1},
getField @"unsigned_short_pointer_member" x_0)
instance (~) ty (Ptr CUShort) =>
HasField "unsigned_short_pointer_member"
(Ptr Unsigned_short_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_short_pointer_member")
instance HasCField Unsigned_short_pointer_struct
"unsigned_short_pointer_member"
where type CFieldType Unsigned_short_pointer_struct
"unsigned_short_pointer_member" = Ptr CUShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_int_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 249:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_int_pointer_struct
= Ordinary_signed_int_pointer_struct {ordinary_signed_int_pointer_member :: (Ptr CInt)
{- ^ __C declaration:__ @ordinary_signed_int_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 249:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_int_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_int_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_int_pointer_struct <*> readRaw (Proxy @"ordinary_signed_int_pointer_member") ptr_0
instance WriteRaw Ordinary_signed_int_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_int_pointer_struct ordinary_signed_int_pointer_member_2 -> writeRaw (Proxy @"ordinary_signed_int_pointer_member") ptr_0 ordinary_signed_int_pointer_member_2
deriving via (EquivStorable Ordinary_signed_int_pointer_struct) instance Storable Ordinary_signed_int_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_signed_int_pointer_struct) instance IsStruct Ordinary_signed_int_pointer_struct
instance (~) ty (Ptr CInt) =>
HasField "ordinary_signed_int_pointer_member"
Ordinary_signed_int_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_int_pointer_struct{ordinary_signed_int_pointer_member = y_1},
getField @"ordinary_signed_int_pointer_member" x_0)
instance (~) ty (Ptr CInt) =>
HasField "ordinary_signed_int_pointer_member"
(Ptr Ordinary_signed_int_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_int_pointer_member")
instance HasCField Ordinary_signed_int_pointer_struct
"ordinary_signed_int_pointer_member"
where type CFieldType Ordinary_signed_int_pointer_struct
"ordinary_signed_int_pointer_member" = Ptr CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_int_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 250:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_int_pointer_struct
= Explicit_signed_int_pointer_struct {explicit_signed_int_pointer_member :: (Ptr CInt)
{- ^ __C declaration:__ @explicit_signed_int_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 250:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_int_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_int_pointer_struct
where readRaw = \ptr_0 -> pure Explicit_signed_int_pointer_struct <*> readRaw (Proxy @"explicit_signed_int_pointer_member") ptr_0
instance WriteRaw Explicit_signed_int_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_int_pointer_struct explicit_signed_int_pointer_member_2 -> writeRaw (Proxy @"explicit_signed_int_pointer_member") ptr_0 explicit_signed_int_pointer_member_2
deriving via (EquivStorable Explicit_signed_int_pointer_struct) instance Storable Explicit_signed_int_pointer_struct
deriving via (IsStructViaReadRaw Explicit_signed_int_pointer_struct) instance IsStruct Explicit_signed_int_pointer_struct
instance (~) ty (Ptr CInt) =>
HasField "explicit_signed_int_pointer_member"
Explicit_signed_int_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_int_pointer_struct{explicit_signed_int_pointer_member = y_1},
getField @"explicit_signed_int_pointer_member" x_0)
instance (~) ty (Ptr CInt) =>
HasField "explicit_signed_int_pointer_member"
(Ptr Explicit_signed_int_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_int_pointer_member")
instance HasCField Explicit_signed_int_pointer_struct
"explicit_signed_int_pointer_member"
where type CFieldType Explicit_signed_int_pointer_struct
"explicit_signed_int_pointer_member" = Ptr CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_int_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 251:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_int_pointer_struct
= Unsigned_int_pointer_struct {unsigned_int_pointer_member :: (Ptr CUInt)
{- ^ __C declaration:__ @unsigned_int_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 251:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_int_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_int_pointer_struct
where readRaw = \ptr_0 -> pure Unsigned_int_pointer_struct <*> readRaw (Proxy @"unsigned_int_pointer_member") ptr_0
instance WriteRaw Unsigned_int_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_int_pointer_struct unsigned_int_pointer_member_2 -> writeRaw (Proxy @"unsigned_int_pointer_member") ptr_0 unsigned_int_pointer_member_2
deriving via (EquivStorable Unsigned_int_pointer_struct) instance Storable Unsigned_int_pointer_struct
deriving via (IsStructViaReadRaw Unsigned_int_pointer_struct) instance IsStruct Unsigned_int_pointer_struct
instance (~) ty (Ptr CUInt) =>
HasField "unsigned_int_pointer_member"
Unsigned_int_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_int_pointer_struct{unsigned_int_pointer_member = y_1},
getField @"unsigned_int_pointer_member" x_0)
instance (~) ty (Ptr CUInt) =>
HasField "unsigned_int_pointer_member"
(Ptr Unsigned_int_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_int_pointer_member")
instance HasCField Unsigned_int_pointer_struct
"unsigned_int_pointer_member"
where type CFieldType Unsigned_int_pointer_struct
"unsigned_int_pointer_member" = Ptr CUInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 253:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_pointer_struct
= Ordinary_signed_long_pointer_struct {ordinary_signed_long_pointer_member :: (Ptr CLong)
{- ^ __C declaration:__ @ordinary_signed_long_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 253:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_pointer_struct <*> readRaw (Proxy @"ordinary_signed_long_pointer_member") ptr_0
instance WriteRaw Ordinary_signed_long_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_pointer_struct ordinary_signed_long_pointer_member_2 -> writeRaw (Proxy @"ordinary_signed_long_pointer_member") ptr_0 ordinary_signed_long_pointer_member_2
deriving via (EquivStorable Ordinary_signed_long_pointer_struct) instance Storable Ordinary_signed_long_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_pointer_struct) instance IsStruct Ordinary_signed_long_pointer_struct
instance (~) ty (Ptr CLong) =>
HasField "ordinary_signed_long_pointer_member"
Ordinary_signed_long_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_pointer_struct{ordinary_signed_long_pointer_member = y_1},
getField @"ordinary_signed_long_pointer_member" x_0)
instance (~) ty (Ptr CLong) =>
HasField "ordinary_signed_long_pointer_member"
(Ptr Ordinary_signed_long_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_pointer_member")
instance HasCField Ordinary_signed_long_pointer_struct
"ordinary_signed_long_pointer_member"
where type CFieldType Ordinary_signed_long_pointer_struct
"ordinary_signed_long_pointer_member" = Ptr CLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 254:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_pointer_struct
= Explicit_signed_long_pointer_struct {explicit_signed_long_pointer_member :: (Ptr CLong)
{- ^ __C declaration:__ @explicit_signed_long_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 254:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_pointer_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_pointer_struct <*> readRaw (Proxy @"explicit_signed_long_pointer_member") ptr_0
instance WriteRaw Explicit_signed_long_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_pointer_struct explicit_signed_long_pointer_member_2 -> writeRaw (Proxy @"explicit_signed_long_pointer_member") ptr_0 explicit_signed_long_pointer_member_2
deriving via (EquivStorable Explicit_signed_long_pointer_struct) instance Storable Explicit_signed_long_pointer_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_pointer_struct) instance IsStruct Explicit_signed_long_pointer_struct
instance (~) ty (Ptr CLong) =>
HasField "explicit_signed_long_pointer_member"
Explicit_signed_long_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_pointer_struct{explicit_signed_long_pointer_member = y_1},
getField @"explicit_signed_long_pointer_member" x_0)
instance (~) ty (Ptr CLong) =>
HasField "explicit_signed_long_pointer_member"
(Ptr Explicit_signed_long_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_pointer_member")
instance HasCField Explicit_signed_long_pointer_struct
"explicit_signed_long_pointer_member"
where type CFieldType Explicit_signed_long_pointer_struct
"explicit_signed_long_pointer_member" = Ptr CLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 255:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_pointer_struct
= Unsigned_long_pointer_struct {unsigned_long_pointer_member :: (Ptr CULong)
{- ^ __C declaration:__ @unsigned_long_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 255:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_pointer_struct
where readRaw = \ptr_0 -> pure Unsigned_long_pointer_struct <*> readRaw (Proxy @"unsigned_long_pointer_member") ptr_0
instance WriteRaw Unsigned_long_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_pointer_struct unsigned_long_pointer_member_2 -> writeRaw (Proxy @"unsigned_long_pointer_member") ptr_0 unsigned_long_pointer_member_2
deriving via (EquivStorable Unsigned_long_pointer_struct) instance Storable Unsigned_long_pointer_struct
deriving via (IsStructViaReadRaw Unsigned_long_pointer_struct) instance IsStruct Unsigned_long_pointer_struct
instance (~) ty (Ptr CULong) =>
HasField "unsigned_long_pointer_member"
Unsigned_long_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_pointer_struct{unsigned_long_pointer_member = y_1},
getField @"unsigned_long_pointer_member" x_0)
instance (~) ty (Ptr CULong) =>
HasField "unsigned_long_pointer_member"
(Ptr Unsigned_long_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_pointer_member")
instance HasCField Unsigned_long_pointer_struct
"unsigned_long_pointer_member"
where type CFieldType Unsigned_long_pointer_struct
"unsigned_long_pointer_member" = Ptr CULong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_long_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 257:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_long_pointer_struct
= Ordinary_signed_long_long_pointer_struct {ordinary_signed_long_long_pointer_member :: (Ptr CLLong)
{- ^ __C declaration:__ @ordinary_signed_long_long_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 257:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_long_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_long_pointer_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_long_pointer_struct <*> readRaw (Proxy @"ordinary_signed_long_long_pointer_member") ptr_0
instance WriteRaw Ordinary_signed_long_long_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_long_pointer_struct ordinary_signed_long_long_pointer_member_2 -> writeRaw (Proxy @"ordinary_signed_long_long_pointer_member") ptr_0 ordinary_signed_long_long_pointer_member_2
deriving via (EquivStorable Ordinary_signed_long_long_pointer_struct) instance Storable Ordinary_signed_long_long_pointer_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_long_pointer_struct) instance IsStruct Ordinary_signed_long_long_pointer_struct
instance (~) ty (Ptr CLLong) =>
HasField "ordinary_signed_long_long_pointer_member"
Ordinary_signed_long_long_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_long_pointer_struct{ordinary_signed_long_long_pointer_member = y_1},
getField @"ordinary_signed_long_long_pointer_member" x_0)
instance (~) ty (Ptr CLLong) =>
HasField "ordinary_signed_long_long_pointer_member"
(Ptr Ordinary_signed_long_long_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_long_pointer_member")
instance HasCField Ordinary_signed_long_long_pointer_struct
"ordinary_signed_long_long_pointer_member"
where type CFieldType Ordinary_signed_long_long_pointer_struct
"ordinary_signed_long_long_pointer_member" = Ptr CLLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_long_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 258:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_long_pointer_struct
= Explicit_signed_long_long_pointer_struct {explicit_signed_long_long_pointer_member :: (Ptr CLLong)
{- ^ __C declaration:__ @explicit_signed_long_long_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 258:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_long_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_long_pointer_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_long_pointer_struct <*> readRaw (Proxy @"explicit_signed_long_long_pointer_member") ptr_0
instance WriteRaw Explicit_signed_long_long_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_long_pointer_struct explicit_signed_long_long_pointer_member_2 -> writeRaw (Proxy @"explicit_signed_long_long_pointer_member") ptr_0 explicit_signed_long_long_pointer_member_2
deriving via (EquivStorable Explicit_signed_long_long_pointer_struct) instance Storable Explicit_signed_long_long_pointer_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_long_pointer_struct) instance IsStruct Explicit_signed_long_long_pointer_struct
instance (~) ty (Ptr CLLong) =>
HasField "explicit_signed_long_long_pointer_member"
Explicit_signed_long_long_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_long_pointer_struct{explicit_signed_long_long_pointer_member = y_1},
getField @"explicit_signed_long_long_pointer_member" x_0)
instance (~) ty (Ptr CLLong) =>
HasField "explicit_signed_long_long_pointer_member"
(Ptr Explicit_signed_long_long_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_long_pointer_member")
instance HasCField Explicit_signed_long_long_pointer_struct
"explicit_signed_long_long_pointer_member"
where type CFieldType Explicit_signed_long_long_pointer_struct
"explicit_signed_long_long_pointer_member" = Ptr CLLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_long_pointer_struct@
__defined at:__ @comprehensive\/c2hsc.h 259:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_long_pointer_struct
= Unsigned_long_long_pointer_struct {unsigned_long_long_pointer_member :: (Ptr CULLong)
{- ^ __C declaration:__ @unsigned_long_long_pointer_member@
__defined at:__ @comprehensive\/c2hsc.h 259:71@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_long_pointer_struct
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_long_pointer_struct
where readRaw = \ptr_0 -> pure Unsigned_long_long_pointer_struct <*> readRaw (Proxy @"unsigned_long_long_pointer_member") ptr_0
instance WriteRaw Unsigned_long_long_pointer_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_long_pointer_struct unsigned_long_long_pointer_member_2 -> writeRaw (Proxy @"unsigned_long_long_pointer_member") ptr_0 unsigned_long_long_pointer_member_2
deriving via (EquivStorable Unsigned_long_long_pointer_struct) instance Storable Unsigned_long_long_pointer_struct
deriving via (IsStructViaReadRaw Unsigned_long_long_pointer_struct) instance IsStruct Unsigned_long_long_pointer_struct
instance (~) ty (Ptr CULLong) =>
HasField "unsigned_long_long_pointer_member"
Unsigned_long_long_pointer_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_long_pointer_struct{unsigned_long_long_pointer_member = y_1},
getField @"unsigned_long_long_pointer_member" x_0)
instance (~) ty (Ptr CULLong) =>
HasField "unsigned_long_long_pointer_member"
(Ptr Unsigned_long_long_pointer_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_long_pointer_member")
instance HasCField Unsigned_long_long_pointer_struct
"unsigned_long_long_pointer_member"
where type CFieldType Unsigned_long_long_pointer_struct
"unsigned_long_long_pointer_member" = Ptr CULLong
offset# = \_ -> \_ -> 0
{-| Structs: arrays
__C declaration:__ @struct ordinary_float_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 265:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_float_array_struct
= Ordinary_float_array_struct {ordinary_float_array_member :: (ConstantArray 10
CFloat)
{- ^ __C declaration:__ @ordinary_float_array_member@
__defined at:__ @comprehensive\/c2hsc.h 265:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_float_array_struct
where staticSizeOf = \_ -> 40 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Ordinary_float_array_struct
where readRaw = \ptr_0 -> pure Ordinary_float_array_struct <*> readRaw (Proxy @"ordinary_float_array_member") ptr_0
instance WriteRaw Ordinary_float_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_float_array_struct ordinary_float_array_member_2 -> writeRaw (Proxy @"ordinary_float_array_member") ptr_0 ordinary_float_array_member_2
deriving via (EquivStorable Ordinary_float_array_struct) instance Storable Ordinary_float_array_struct
deriving via (IsStructViaReadRaw Ordinary_float_array_struct) instance IsStruct Ordinary_float_array_struct
instance (~) ty (ConstantArray 10 CFloat) =>
HasField "ordinary_float_array_member"
Ordinary_float_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_float_array_struct{ordinary_float_array_member = y_1},
getField @"ordinary_float_array_member" x_0)
instance (~) ty (ConstantArray 10 CFloat) =>
HasField "ordinary_float_array_member"
(Ptr Ordinary_float_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_float_array_member")
instance HasCField Ordinary_float_array_struct
"ordinary_float_array_member"
where type CFieldType Ordinary_float_array_struct
"ordinary_float_array_member" = ConstantArray 10 CFloat
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_double_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 266:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_double_array_struct
= Ordinary_double_array_struct {ordinary_double_array_member :: (ConstantArray 10
CDouble)
{- ^ __C declaration:__ @ordinary_double_array_member@
__defined at:__ @comprehensive\/c2hsc.h 266:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_double_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_double_array_struct
where readRaw = \ptr_0 -> pure Ordinary_double_array_struct <*> readRaw (Proxy @"ordinary_double_array_member") ptr_0
instance WriteRaw Ordinary_double_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_double_array_struct ordinary_double_array_member_2 -> writeRaw (Proxy @"ordinary_double_array_member") ptr_0 ordinary_double_array_member_2
deriving via (EquivStorable Ordinary_double_array_struct) instance Storable Ordinary_double_array_struct
deriving via (IsStructViaReadRaw Ordinary_double_array_struct) instance IsStruct Ordinary_double_array_struct
instance (~) ty (ConstantArray 10 CDouble) =>
HasField "ordinary_double_array_member"
Ordinary_double_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_double_array_struct{ordinary_double_array_member = y_1},
getField @"ordinary_double_array_member" x_0)
instance (~) ty (ConstantArray 10 CDouble) =>
HasField "ordinary_double_array_member"
(Ptr Ordinary_double_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_double_array_member")
instance HasCField Ordinary_double_array_struct
"ordinary_double_array_member"
where type CFieldType Ordinary_double_array_struct
"ordinary_double_array_member" = ConstantArray 10 CDouble
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_char_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 269:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_char_array_struct
= Ordinary_signed_char_array_struct {ordinary_signed_char_array_member :: (ConstantArray 10
CChar)
{- ^ __C declaration:__ @ordinary_signed_char_array_member@
__defined at:__ @comprehensive\/c2hsc.h 269:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_char_array_struct
where staticSizeOf = \_ -> 10 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw Ordinary_signed_char_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_char_array_struct <*> readRaw (Proxy @"ordinary_signed_char_array_member") ptr_0
instance WriteRaw Ordinary_signed_char_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_char_array_struct ordinary_signed_char_array_member_2 -> writeRaw (Proxy @"ordinary_signed_char_array_member") ptr_0 ordinary_signed_char_array_member_2
deriving via (EquivStorable Ordinary_signed_char_array_struct) instance Storable Ordinary_signed_char_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_char_array_struct) instance IsStruct Ordinary_signed_char_array_struct
instance (~) ty (ConstantArray 10 CChar) =>
HasField "ordinary_signed_char_array_member"
Ordinary_signed_char_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_char_array_struct{ordinary_signed_char_array_member = y_1},
getField @"ordinary_signed_char_array_member" x_0)
instance (~) ty (ConstantArray 10 CChar) =>
HasField "ordinary_signed_char_array_member"
(Ptr Ordinary_signed_char_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_char_array_member")
instance HasCField Ordinary_signed_char_array_struct
"ordinary_signed_char_array_member"
where type CFieldType Ordinary_signed_char_array_struct
"ordinary_signed_char_array_member" = ConstantArray 10 CChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_char_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 270:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_char_array_struct
= Explicit_signed_char_array_struct {explicit_signed_char_array_member :: (ConstantArray 10
CSChar)
{- ^ __C declaration:__ @explicit_signed_char_array_member@
__defined at:__ @comprehensive\/c2hsc.h 270:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_char_array_struct
where staticSizeOf = \_ -> 10 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw Explicit_signed_char_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_char_array_struct <*> readRaw (Proxy @"explicit_signed_char_array_member") ptr_0
instance WriteRaw Explicit_signed_char_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_char_array_struct explicit_signed_char_array_member_2 -> writeRaw (Proxy @"explicit_signed_char_array_member") ptr_0 explicit_signed_char_array_member_2
deriving via (EquivStorable Explicit_signed_char_array_struct) instance Storable Explicit_signed_char_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_char_array_struct) instance IsStruct Explicit_signed_char_array_struct
instance (~) ty (ConstantArray 10 CSChar) =>
HasField "explicit_signed_char_array_member"
Explicit_signed_char_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_char_array_struct{explicit_signed_char_array_member = y_1},
getField @"explicit_signed_char_array_member" x_0)
instance (~) ty (ConstantArray 10 CSChar) =>
HasField "explicit_signed_char_array_member"
(Ptr Explicit_signed_char_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_char_array_member")
instance HasCField Explicit_signed_char_array_struct
"explicit_signed_char_array_member"
where type CFieldType Explicit_signed_char_array_struct
"explicit_signed_char_array_member" = ConstantArray 10 CSChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_char_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 271:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_char_array_struct
= Unsigned_char_array_struct {unsigned_char_array_member :: (ConstantArray 10
CUChar)
{- ^ __C declaration:__ @unsigned_char_array_member@
__defined at:__ @comprehensive\/c2hsc.h 271:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_char_array_struct
where staticSizeOf = \_ -> 10 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw Unsigned_char_array_struct
where readRaw = \ptr_0 -> pure Unsigned_char_array_struct <*> readRaw (Proxy @"unsigned_char_array_member") ptr_0
instance WriteRaw Unsigned_char_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_char_array_struct unsigned_char_array_member_2 -> writeRaw (Proxy @"unsigned_char_array_member") ptr_0 unsigned_char_array_member_2
deriving via (EquivStorable Unsigned_char_array_struct) instance Storable Unsigned_char_array_struct
deriving via (IsStructViaReadRaw Unsigned_char_array_struct) instance IsStruct Unsigned_char_array_struct
instance (~) ty (ConstantArray 10 CUChar) =>
HasField "unsigned_char_array_member" Unsigned_char_array_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_char_array_struct{unsigned_char_array_member = y_1},
getField @"unsigned_char_array_member" x_0)
instance (~) ty (ConstantArray 10 CUChar) =>
HasField "unsigned_char_array_member"
(Ptr Unsigned_char_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_char_array_member")
instance HasCField Unsigned_char_array_struct
"unsigned_char_array_member"
where type CFieldType Unsigned_char_array_struct
"unsigned_char_array_member" = ConstantArray 10 CUChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_short_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 273:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_short_array_struct
= Ordinary_signed_short_array_struct {ordinary_signed_short_array_member :: (ConstantArray 10
CShort)
{- ^ __C declaration:__ @ordinary_signed_short_array_member@
__defined at:__ @comprehensive\/c2hsc.h 273:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_short_array_struct
where staticSizeOf = \_ -> 20 :: Int
staticAlignment = \_ -> 2 :: Int
instance ReadRaw Ordinary_signed_short_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_short_array_struct <*> readRaw (Proxy @"ordinary_signed_short_array_member") ptr_0
instance WriteRaw Ordinary_signed_short_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_short_array_struct ordinary_signed_short_array_member_2 -> writeRaw (Proxy @"ordinary_signed_short_array_member") ptr_0 ordinary_signed_short_array_member_2
deriving via (EquivStorable Ordinary_signed_short_array_struct) instance Storable Ordinary_signed_short_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_short_array_struct) instance IsStruct Ordinary_signed_short_array_struct
instance (~) ty (ConstantArray 10 CShort) =>
HasField "ordinary_signed_short_array_member"
Ordinary_signed_short_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_short_array_struct{ordinary_signed_short_array_member = y_1},
getField @"ordinary_signed_short_array_member" x_0)
instance (~) ty (ConstantArray 10 CShort) =>
HasField "ordinary_signed_short_array_member"
(Ptr Ordinary_signed_short_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_short_array_member")
instance HasCField Ordinary_signed_short_array_struct
"ordinary_signed_short_array_member"
where type CFieldType Ordinary_signed_short_array_struct
"ordinary_signed_short_array_member" = ConstantArray 10 CShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_short_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 274:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_short_array_struct
= Explicit_signed_short_array_struct {explicit_signed_short_array_member :: (ConstantArray 10
CShort)
{- ^ __C declaration:__ @explicit_signed_short_array_member@
__defined at:__ @comprehensive\/c2hsc.h 274:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_short_array_struct
where staticSizeOf = \_ -> 20 :: Int
staticAlignment = \_ -> 2 :: Int
instance ReadRaw Explicit_signed_short_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_short_array_struct <*> readRaw (Proxy @"explicit_signed_short_array_member") ptr_0
instance WriteRaw Explicit_signed_short_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_short_array_struct explicit_signed_short_array_member_2 -> writeRaw (Proxy @"explicit_signed_short_array_member") ptr_0 explicit_signed_short_array_member_2
deriving via (EquivStorable Explicit_signed_short_array_struct) instance Storable Explicit_signed_short_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_short_array_struct) instance IsStruct Explicit_signed_short_array_struct
instance (~) ty (ConstantArray 10 CShort) =>
HasField "explicit_signed_short_array_member"
Explicit_signed_short_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_short_array_struct{explicit_signed_short_array_member = y_1},
getField @"explicit_signed_short_array_member" x_0)
instance (~) ty (ConstantArray 10 CShort) =>
HasField "explicit_signed_short_array_member"
(Ptr Explicit_signed_short_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_short_array_member")
instance HasCField Explicit_signed_short_array_struct
"explicit_signed_short_array_member"
where type CFieldType Explicit_signed_short_array_struct
"explicit_signed_short_array_member" = ConstantArray 10 CShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_short_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 275:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_short_array_struct
= Unsigned_short_array_struct {unsigned_short_array_member :: (ConstantArray 10
CUShort)
{- ^ __C declaration:__ @unsigned_short_array_member@
__defined at:__ @comprehensive\/c2hsc.h 275:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_short_array_struct
where staticSizeOf = \_ -> 20 :: Int
staticAlignment = \_ -> 2 :: Int
instance ReadRaw Unsigned_short_array_struct
where readRaw = \ptr_0 -> pure Unsigned_short_array_struct <*> readRaw (Proxy @"unsigned_short_array_member") ptr_0
instance WriteRaw Unsigned_short_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_short_array_struct unsigned_short_array_member_2 -> writeRaw (Proxy @"unsigned_short_array_member") ptr_0 unsigned_short_array_member_2
deriving via (EquivStorable Unsigned_short_array_struct) instance Storable Unsigned_short_array_struct
deriving via (IsStructViaReadRaw Unsigned_short_array_struct) instance IsStruct Unsigned_short_array_struct
instance (~) ty (ConstantArray 10 CUShort) =>
HasField "unsigned_short_array_member"
Unsigned_short_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_short_array_struct{unsigned_short_array_member = y_1},
getField @"unsigned_short_array_member" x_0)
instance (~) ty (ConstantArray 10 CUShort) =>
HasField "unsigned_short_array_member"
(Ptr Unsigned_short_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_short_array_member")
instance HasCField Unsigned_short_array_struct
"unsigned_short_array_member"
where type CFieldType Unsigned_short_array_struct
"unsigned_short_array_member" = ConstantArray 10 CUShort
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_int_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 277:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_int_array_struct
= Ordinary_signed_int_array_struct {ordinary_signed_int_array_member :: (ConstantArray 10
CInt)
{- ^ __C declaration:__ @ordinary_signed_int_array_member@
__defined at:__ @comprehensive\/c2hsc.h 277:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_int_array_struct
where staticSizeOf = \_ -> 40 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Ordinary_signed_int_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_int_array_struct <*> readRaw (Proxy @"ordinary_signed_int_array_member") ptr_0
instance WriteRaw Ordinary_signed_int_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_int_array_struct ordinary_signed_int_array_member_2 -> writeRaw (Proxy @"ordinary_signed_int_array_member") ptr_0 ordinary_signed_int_array_member_2
deriving via (EquivStorable Ordinary_signed_int_array_struct) instance Storable Ordinary_signed_int_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_int_array_struct) instance IsStruct Ordinary_signed_int_array_struct
instance (~) ty (ConstantArray 10 CInt) =>
HasField "ordinary_signed_int_array_member"
Ordinary_signed_int_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_int_array_struct{ordinary_signed_int_array_member = y_1},
getField @"ordinary_signed_int_array_member" x_0)
instance (~) ty (ConstantArray 10 CInt) =>
HasField "ordinary_signed_int_array_member"
(Ptr Ordinary_signed_int_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_int_array_member")
instance HasCField Ordinary_signed_int_array_struct
"ordinary_signed_int_array_member"
where type CFieldType Ordinary_signed_int_array_struct
"ordinary_signed_int_array_member" = ConstantArray 10 CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_int_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 278:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_int_array_struct
= Explicit_signed_int_array_struct {explicit_signed_int_array_member :: (ConstantArray 10
CInt)
{- ^ __C declaration:__ @explicit_signed_int_array_member@
__defined at:__ @comprehensive\/c2hsc.h 278:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_int_array_struct
where staticSizeOf = \_ -> 40 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Explicit_signed_int_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_int_array_struct <*> readRaw (Proxy @"explicit_signed_int_array_member") ptr_0
instance WriteRaw Explicit_signed_int_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_int_array_struct explicit_signed_int_array_member_2 -> writeRaw (Proxy @"explicit_signed_int_array_member") ptr_0 explicit_signed_int_array_member_2
deriving via (EquivStorable Explicit_signed_int_array_struct) instance Storable Explicit_signed_int_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_int_array_struct) instance IsStruct Explicit_signed_int_array_struct
instance (~) ty (ConstantArray 10 CInt) =>
HasField "explicit_signed_int_array_member"
Explicit_signed_int_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_int_array_struct{explicit_signed_int_array_member = y_1},
getField @"explicit_signed_int_array_member" x_0)
instance (~) ty (ConstantArray 10 CInt) =>
HasField "explicit_signed_int_array_member"
(Ptr Explicit_signed_int_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_int_array_member")
instance HasCField Explicit_signed_int_array_struct
"explicit_signed_int_array_member"
where type CFieldType Explicit_signed_int_array_struct
"explicit_signed_int_array_member" = ConstantArray 10 CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_int_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 279:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_int_array_struct
= Unsigned_int_array_struct {unsigned_int_array_member :: (ConstantArray 10
CUInt)
{- ^ __C declaration:__ @unsigned_int_array_member@
__defined at:__ @comprehensive\/c2hsc.h 279:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_int_array_struct
where staticSizeOf = \_ -> 40 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Unsigned_int_array_struct
where readRaw = \ptr_0 -> pure Unsigned_int_array_struct <*> readRaw (Proxy @"unsigned_int_array_member") ptr_0
instance WriteRaw Unsigned_int_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_int_array_struct unsigned_int_array_member_2 -> writeRaw (Proxy @"unsigned_int_array_member") ptr_0 unsigned_int_array_member_2
deriving via (EquivStorable Unsigned_int_array_struct) instance Storable Unsigned_int_array_struct
deriving via (IsStructViaReadRaw Unsigned_int_array_struct) instance IsStruct Unsigned_int_array_struct
instance (~) ty (ConstantArray 10 CUInt) =>
HasField "unsigned_int_array_member" Unsigned_int_array_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_int_array_struct{unsigned_int_array_member = y_1},
getField @"unsigned_int_array_member" x_0)
instance (~) ty (ConstantArray 10 CUInt) =>
HasField "unsigned_int_array_member"
(Ptr Unsigned_int_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_int_array_member")
instance HasCField Unsigned_int_array_struct
"unsigned_int_array_member"
where type CFieldType Unsigned_int_array_struct
"unsigned_int_array_member" = ConstantArray 10 CUInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 281:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_array_struct
= Ordinary_signed_long_array_struct {ordinary_signed_long_array_member :: (ConstantArray 10
CLong)
{- ^ __C declaration:__ @ordinary_signed_long_array_member@
__defined at:__ @comprehensive\/c2hsc.h 281:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_array_struct <*> readRaw (Proxy @"ordinary_signed_long_array_member") ptr_0
instance WriteRaw Ordinary_signed_long_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_array_struct ordinary_signed_long_array_member_2 -> writeRaw (Proxy @"ordinary_signed_long_array_member") ptr_0 ordinary_signed_long_array_member_2
deriving via (EquivStorable Ordinary_signed_long_array_struct) instance Storable Ordinary_signed_long_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_array_struct) instance IsStruct Ordinary_signed_long_array_struct
instance (~) ty (ConstantArray 10 CLong) =>
HasField "ordinary_signed_long_array_member"
Ordinary_signed_long_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_array_struct{ordinary_signed_long_array_member = y_1},
getField @"ordinary_signed_long_array_member" x_0)
instance (~) ty (ConstantArray 10 CLong) =>
HasField "ordinary_signed_long_array_member"
(Ptr Ordinary_signed_long_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_array_member")
instance HasCField Ordinary_signed_long_array_struct
"ordinary_signed_long_array_member"
where type CFieldType Ordinary_signed_long_array_struct
"ordinary_signed_long_array_member" = ConstantArray 10 CLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 282:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_array_struct
= Explicit_signed_long_array_struct {explicit_signed_long_array_member :: (ConstantArray 10
CLong)
{- ^ __C declaration:__ @explicit_signed_long_array_member@
__defined at:__ @comprehensive\/c2hsc.h 282:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_array_struct <*> readRaw (Proxy @"explicit_signed_long_array_member") ptr_0
instance WriteRaw Explicit_signed_long_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_array_struct explicit_signed_long_array_member_2 -> writeRaw (Proxy @"explicit_signed_long_array_member") ptr_0 explicit_signed_long_array_member_2
deriving via (EquivStorable Explicit_signed_long_array_struct) instance Storable Explicit_signed_long_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_array_struct) instance IsStruct Explicit_signed_long_array_struct
instance (~) ty (ConstantArray 10 CLong) =>
HasField "explicit_signed_long_array_member"
Explicit_signed_long_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_array_struct{explicit_signed_long_array_member = y_1},
getField @"explicit_signed_long_array_member" x_0)
instance (~) ty (ConstantArray 10 CLong) =>
HasField "explicit_signed_long_array_member"
(Ptr Explicit_signed_long_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_array_member")
instance HasCField Explicit_signed_long_array_struct
"explicit_signed_long_array_member"
where type CFieldType Explicit_signed_long_array_struct
"explicit_signed_long_array_member" = ConstantArray 10 CLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 283:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_array_struct
= Unsigned_long_array_struct {unsigned_long_array_member :: (ConstantArray 10
CULong)
{- ^ __C declaration:__ @unsigned_long_array_member@
__defined at:__ @comprehensive\/c2hsc.h 283:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_array_struct
where readRaw = \ptr_0 -> pure Unsigned_long_array_struct <*> readRaw (Proxy @"unsigned_long_array_member") ptr_0
instance WriteRaw Unsigned_long_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_array_struct unsigned_long_array_member_2 -> writeRaw (Proxy @"unsigned_long_array_member") ptr_0 unsigned_long_array_member_2
deriving via (EquivStorable Unsigned_long_array_struct) instance Storable Unsigned_long_array_struct
deriving via (IsStructViaReadRaw Unsigned_long_array_struct) instance IsStruct Unsigned_long_array_struct
instance (~) ty (ConstantArray 10 CULong) =>
HasField "unsigned_long_array_member" Unsigned_long_array_struct ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_array_struct{unsigned_long_array_member = y_1},
getField @"unsigned_long_array_member" x_0)
instance (~) ty (ConstantArray 10 CULong) =>
HasField "unsigned_long_array_member"
(Ptr Unsigned_long_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_array_member")
instance HasCField Unsigned_long_array_struct
"unsigned_long_array_member"
where type CFieldType Unsigned_long_array_struct
"unsigned_long_array_member" = ConstantArray 10 CULong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_long_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 285:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_long_array_struct
= Ordinary_signed_long_long_array_struct {ordinary_signed_long_long_array_member :: (ConstantArray 10
CLLong)
{- ^ __C declaration:__ @ordinary_signed_long_long_array_member@
__defined at:__ @comprehensive\/c2hsc.h 285:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_long_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_long_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_long_array_struct <*> readRaw (Proxy @"ordinary_signed_long_long_array_member") ptr_0
instance WriteRaw Ordinary_signed_long_long_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_long_array_struct ordinary_signed_long_long_array_member_2 -> writeRaw (Proxy @"ordinary_signed_long_long_array_member") ptr_0 ordinary_signed_long_long_array_member_2
deriving via (EquivStorable Ordinary_signed_long_long_array_struct) instance Storable Ordinary_signed_long_long_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_long_array_struct) instance IsStruct Ordinary_signed_long_long_array_struct
instance (~) ty (ConstantArray 10 CLLong) =>
HasField "ordinary_signed_long_long_array_member"
Ordinary_signed_long_long_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_long_array_struct{ordinary_signed_long_long_array_member = y_1},
getField @"ordinary_signed_long_long_array_member" x_0)
instance (~) ty (ConstantArray 10 CLLong) =>
HasField "ordinary_signed_long_long_array_member"
(Ptr Ordinary_signed_long_long_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_long_array_member")
instance HasCField Ordinary_signed_long_long_array_struct
"ordinary_signed_long_long_array_member"
where type CFieldType Ordinary_signed_long_long_array_struct
"ordinary_signed_long_long_array_member" = ConstantArray 10 CLLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_long_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 286:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_long_array_struct
= Explicit_signed_long_long_array_struct {explicit_signed_long_long_array_member :: (ConstantArray 10
CLLong)
{- ^ __C declaration:__ @explicit_signed_long_long_array_member@
__defined at:__ @comprehensive\/c2hsc.h 286:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_long_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_long_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_long_array_struct <*> readRaw (Proxy @"explicit_signed_long_long_array_member") ptr_0
instance WriteRaw Explicit_signed_long_long_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_long_array_struct explicit_signed_long_long_array_member_2 -> writeRaw (Proxy @"explicit_signed_long_long_array_member") ptr_0 explicit_signed_long_long_array_member_2
deriving via (EquivStorable Explicit_signed_long_long_array_struct) instance Storable Explicit_signed_long_long_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_long_array_struct) instance IsStruct Explicit_signed_long_long_array_struct
instance (~) ty (ConstantArray 10 CLLong) =>
HasField "explicit_signed_long_long_array_member"
Explicit_signed_long_long_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_long_array_struct{explicit_signed_long_long_array_member = y_1},
getField @"explicit_signed_long_long_array_member" x_0)
instance (~) ty (ConstantArray 10 CLLong) =>
HasField "explicit_signed_long_long_array_member"
(Ptr Explicit_signed_long_long_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_long_array_member")
instance HasCField Explicit_signed_long_long_array_struct
"explicit_signed_long_long_array_member"
where type CFieldType Explicit_signed_long_long_array_struct
"explicit_signed_long_long_array_member" = ConstantArray 10 CLLong
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_long_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 287:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_long_array_struct
= Unsigned_long_long_array_struct {unsigned_long_long_array_member :: (ConstantArray 10
CULLong)
{- ^ __C declaration:__ @unsigned_long_long_array_member@
__defined at:__ @comprehensive\/c2hsc.h 287:68@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_long_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_long_array_struct
where readRaw = \ptr_0 -> pure Unsigned_long_long_array_struct <*> readRaw (Proxy @"unsigned_long_long_array_member") ptr_0
instance WriteRaw Unsigned_long_long_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_long_array_struct unsigned_long_long_array_member_2 -> writeRaw (Proxy @"unsigned_long_long_array_member") ptr_0 unsigned_long_long_array_member_2
deriving via (EquivStorable Unsigned_long_long_array_struct) instance Storable Unsigned_long_long_array_struct
deriving via (IsStructViaReadRaw Unsigned_long_long_array_struct) instance IsStruct Unsigned_long_long_array_struct
instance (~) ty (ConstantArray 10 CULLong) =>
HasField "unsigned_long_long_array_member"
Unsigned_long_long_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_long_array_struct{unsigned_long_long_array_member = y_1},
getField @"unsigned_long_long_array_member" x_0)
instance (~) ty (ConstantArray 10 CULLong) =>
HasField "unsigned_long_long_array_member"
(Ptr Unsigned_long_long_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_long_array_member")
instance HasCField Unsigned_long_long_array_struct
"unsigned_long_long_array_member"
where type CFieldType Unsigned_long_long_array_struct
"unsigned_long_long_array_member" = ConstantArray 10 CULLong
offset# = \_ -> \_ -> 0
{-| Structs: arrays of pointers
NOTE: Here too @'Ordinary_signed_char_pointer_array_struct'@ was commented out in the original test suite, with no reason given.
__C declaration:__ @struct ordinary_void_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 296:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_void_pointer_array_struct
= Ordinary_void_pointer_array_struct {ordinary_void_pointer_array_member :: (ConstantArray 10
(Ptr Void))
{- ^ __C declaration:__ @ordinary_void_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 296:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_void_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_void_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_void_pointer_array_struct <*> readRaw (Proxy @"ordinary_void_pointer_array_member") ptr_0
instance WriteRaw Ordinary_void_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_void_pointer_array_struct ordinary_void_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_void_pointer_array_member") ptr_0 ordinary_void_pointer_array_member_2
deriving via (EquivStorable Ordinary_void_pointer_array_struct) instance Storable Ordinary_void_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_void_pointer_array_struct) instance IsStruct Ordinary_void_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr Void)) =>
HasField "ordinary_void_pointer_array_member"
Ordinary_void_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_void_pointer_array_struct{ordinary_void_pointer_array_member = y_1},
getField @"ordinary_void_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr Void)) =>
HasField "ordinary_void_pointer_array_member"
(Ptr Ordinary_void_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_void_pointer_array_member")
instance HasCField Ordinary_void_pointer_array_struct
"ordinary_void_pointer_array_member"
where type CFieldType Ordinary_void_pointer_array_struct
"ordinary_void_pointer_array_member" = ConstantArray 10 (Ptr Void)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_float_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 298:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_float_pointer_array_struct
= Ordinary_float_pointer_array_struct {ordinary_float_pointer_array_member :: (ConstantArray 10
(Ptr CFloat))
{- ^ __C declaration:__ @ordinary_float_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 298:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_float_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_float_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_float_pointer_array_struct <*> readRaw (Proxy @"ordinary_float_pointer_array_member") ptr_0
instance WriteRaw Ordinary_float_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_float_pointer_array_struct ordinary_float_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_float_pointer_array_member") ptr_0 ordinary_float_pointer_array_member_2
deriving via (EquivStorable Ordinary_float_pointer_array_struct) instance Storable Ordinary_float_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_float_pointer_array_struct) instance IsStruct Ordinary_float_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CFloat)) =>
HasField "ordinary_float_pointer_array_member"
Ordinary_float_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_float_pointer_array_struct{ordinary_float_pointer_array_member = y_1},
getField @"ordinary_float_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CFloat)) =>
HasField "ordinary_float_pointer_array_member"
(Ptr Ordinary_float_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_float_pointer_array_member")
instance HasCField Ordinary_float_pointer_array_struct
"ordinary_float_pointer_array_member"
where type CFieldType Ordinary_float_pointer_array_struct
"ordinary_float_pointer_array_member" = ConstantArray 10
(Ptr CFloat)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_double_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 299:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_double_pointer_array_struct
= Ordinary_double_pointer_array_struct {ordinary_double_pointer_array_member :: (ConstantArray 10
(Ptr CDouble))
{- ^ __C declaration:__ @ordinary_double_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 299:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_double_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_double_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_double_pointer_array_struct <*> readRaw (Proxy @"ordinary_double_pointer_array_member") ptr_0
instance WriteRaw Ordinary_double_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_double_pointer_array_struct ordinary_double_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_double_pointer_array_member") ptr_0 ordinary_double_pointer_array_member_2
deriving via (EquivStorable Ordinary_double_pointer_array_struct) instance Storable Ordinary_double_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_double_pointer_array_struct) instance IsStruct Ordinary_double_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CDouble)) =>
HasField "ordinary_double_pointer_array_member"
Ordinary_double_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_double_pointer_array_struct{ordinary_double_pointer_array_member = y_1},
getField @"ordinary_double_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CDouble)) =>
HasField "ordinary_double_pointer_array_member"
(Ptr Ordinary_double_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_double_pointer_array_member")
instance HasCField Ordinary_double_pointer_array_struct
"ordinary_double_pointer_array_member"
where type CFieldType Ordinary_double_pointer_array_struct
"ordinary_double_pointer_array_member" = ConstantArray 10
(Ptr CDouble)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_char_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 302:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_char_pointer_array_struct
= Ordinary_signed_char_pointer_array_struct {ordinary_signed_char_pointer_array_member :: (ConstantArray 10
(Ptr CChar))
{- ^ __C declaration:__ @ordinary_signed_char_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 302:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_char_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_char_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_char_pointer_array_struct <*> readRaw (Proxy @"ordinary_signed_char_pointer_array_member") ptr_0
instance WriteRaw Ordinary_signed_char_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_char_pointer_array_struct ordinary_signed_char_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_signed_char_pointer_array_member") ptr_0 ordinary_signed_char_pointer_array_member_2
deriving via (EquivStorable Ordinary_signed_char_pointer_array_struct) instance Storable Ordinary_signed_char_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_char_pointer_array_struct) instance IsStruct Ordinary_signed_char_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CChar)) =>
HasField "ordinary_signed_char_pointer_array_member"
Ordinary_signed_char_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_char_pointer_array_struct{ordinary_signed_char_pointer_array_member = y_1},
getField @"ordinary_signed_char_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CChar)) =>
HasField "ordinary_signed_char_pointer_array_member"
(Ptr Ordinary_signed_char_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_char_pointer_array_member")
instance HasCField Ordinary_signed_char_pointer_array_struct
"ordinary_signed_char_pointer_array_member"
where type CFieldType Ordinary_signed_char_pointer_array_struct
"ordinary_signed_char_pointer_array_member" = ConstantArray 10
(Ptr CChar)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_char_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 303:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_char_pointer_array_struct
= Explicit_signed_char_pointer_array_struct {explicit_signed_char_pointer_array_member :: (ConstantArray 10
(Ptr CSChar))
{- ^ __C declaration:__ @explicit_signed_char_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 303:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_char_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_char_pointer_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_char_pointer_array_struct <*> readRaw (Proxy @"explicit_signed_char_pointer_array_member") ptr_0
instance WriteRaw Explicit_signed_char_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_char_pointer_array_struct explicit_signed_char_pointer_array_member_2 -> writeRaw (Proxy @"explicit_signed_char_pointer_array_member") ptr_0 explicit_signed_char_pointer_array_member_2
deriving via (EquivStorable Explicit_signed_char_pointer_array_struct) instance Storable Explicit_signed_char_pointer_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_char_pointer_array_struct) instance IsStruct Explicit_signed_char_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CSChar)) =>
HasField "explicit_signed_char_pointer_array_member"
Explicit_signed_char_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_char_pointer_array_struct{explicit_signed_char_pointer_array_member = y_1},
getField @"explicit_signed_char_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CSChar)) =>
HasField "explicit_signed_char_pointer_array_member"
(Ptr Explicit_signed_char_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_char_pointer_array_member")
instance HasCField Explicit_signed_char_pointer_array_struct
"explicit_signed_char_pointer_array_member"
where type CFieldType Explicit_signed_char_pointer_array_struct
"explicit_signed_char_pointer_array_member" = ConstantArray 10
(Ptr CSChar)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_char_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 304:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_char_pointer_array_struct
= Unsigned_char_pointer_array_struct {unsigned_char_pointer_array_member :: (ConstantArray 10
(Ptr CUChar))
{- ^ __C declaration:__ @unsigned_char_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 304:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_char_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_char_pointer_array_struct
where readRaw = \ptr_0 -> pure Unsigned_char_pointer_array_struct <*> readRaw (Proxy @"unsigned_char_pointer_array_member") ptr_0
instance WriteRaw Unsigned_char_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_char_pointer_array_struct unsigned_char_pointer_array_member_2 -> writeRaw (Proxy @"unsigned_char_pointer_array_member") ptr_0 unsigned_char_pointer_array_member_2
deriving via (EquivStorable Unsigned_char_pointer_array_struct) instance Storable Unsigned_char_pointer_array_struct
deriving via (IsStructViaReadRaw Unsigned_char_pointer_array_struct) instance IsStruct Unsigned_char_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CUChar)) =>
HasField "unsigned_char_pointer_array_member"
Unsigned_char_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_char_pointer_array_struct{unsigned_char_pointer_array_member = y_1},
getField @"unsigned_char_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CUChar)) =>
HasField "unsigned_char_pointer_array_member"
(Ptr Unsigned_char_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_char_pointer_array_member")
instance HasCField Unsigned_char_pointer_array_struct
"unsigned_char_pointer_array_member"
where type CFieldType Unsigned_char_pointer_array_struct
"unsigned_char_pointer_array_member" = ConstantArray 10
(Ptr CUChar)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_short_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 306:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_short_pointer_array_struct
= Ordinary_signed_short_pointer_array_struct {ordinary_signed_short_pointer_array_member :: (ConstantArray 10
(Ptr CShort))
{- ^ __C declaration:__ @ordinary_signed_short_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 306:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_short_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_short_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_short_pointer_array_struct <*> readRaw (Proxy @"ordinary_signed_short_pointer_array_member") ptr_0
instance WriteRaw Ordinary_signed_short_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_short_pointer_array_struct ordinary_signed_short_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_signed_short_pointer_array_member") ptr_0 ordinary_signed_short_pointer_array_member_2
deriving via (EquivStorable Ordinary_signed_short_pointer_array_struct) instance Storable Ordinary_signed_short_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_short_pointer_array_struct) instance IsStruct Ordinary_signed_short_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CShort)) =>
HasField "ordinary_signed_short_pointer_array_member"
Ordinary_signed_short_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_short_pointer_array_struct{ordinary_signed_short_pointer_array_member = y_1},
getField @"ordinary_signed_short_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CShort)) =>
HasField "ordinary_signed_short_pointer_array_member"
(Ptr Ordinary_signed_short_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_short_pointer_array_member")
instance HasCField Ordinary_signed_short_pointer_array_struct
"ordinary_signed_short_pointer_array_member"
where type CFieldType Ordinary_signed_short_pointer_array_struct
"ordinary_signed_short_pointer_array_member" = ConstantArray 10
(Ptr CShort)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_short_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 307:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_short_pointer_array_struct
= Explicit_signed_short_pointer_array_struct {explicit_signed_short_pointer_array_member :: (ConstantArray 10
(Ptr CShort))
{- ^ __C declaration:__ @explicit_signed_short_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 307:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_short_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_short_pointer_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_short_pointer_array_struct <*> readRaw (Proxy @"explicit_signed_short_pointer_array_member") ptr_0
instance WriteRaw Explicit_signed_short_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_short_pointer_array_struct explicit_signed_short_pointer_array_member_2 -> writeRaw (Proxy @"explicit_signed_short_pointer_array_member") ptr_0 explicit_signed_short_pointer_array_member_2
deriving via (EquivStorable Explicit_signed_short_pointer_array_struct) instance Storable Explicit_signed_short_pointer_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_short_pointer_array_struct) instance IsStruct Explicit_signed_short_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CShort)) =>
HasField "explicit_signed_short_pointer_array_member"
Explicit_signed_short_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_short_pointer_array_struct{explicit_signed_short_pointer_array_member = y_1},
getField @"explicit_signed_short_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CShort)) =>
HasField "explicit_signed_short_pointer_array_member"
(Ptr Explicit_signed_short_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_short_pointer_array_member")
instance HasCField Explicit_signed_short_pointer_array_struct
"explicit_signed_short_pointer_array_member"
where type CFieldType Explicit_signed_short_pointer_array_struct
"explicit_signed_short_pointer_array_member" = ConstantArray 10
(Ptr CShort)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_short_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 308:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_short_pointer_array_struct
= Unsigned_short_pointer_array_struct {unsigned_short_pointer_array_member :: (ConstantArray 10
(Ptr CUShort))
{- ^ __C declaration:__ @unsigned_short_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 308:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_short_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_short_pointer_array_struct
where readRaw = \ptr_0 -> pure Unsigned_short_pointer_array_struct <*> readRaw (Proxy @"unsigned_short_pointer_array_member") ptr_0
instance WriteRaw Unsigned_short_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_short_pointer_array_struct unsigned_short_pointer_array_member_2 -> writeRaw (Proxy @"unsigned_short_pointer_array_member") ptr_0 unsigned_short_pointer_array_member_2
deriving via (EquivStorable Unsigned_short_pointer_array_struct) instance Storable Unsigned_short_pointer_array_struct
deriving via (IsStructViaReadRaw Unsigned_short_pointer_array_struct) instance IsStruct Unsigned_short_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CUShort)) =>
HasField "unsigned_short_pointer_array_member"
Unsigned_short_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_short_pointer_array_struct{unsigned_short_pointer_array_member = y_1},
getField @"unsigned_short_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CUShort)) =>
HasField "unsigned_short_pointer_array_member"
(Ptr Unsigned_short_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_short_pointer_array_member")
instance HasCField Unsigned_short_pointer_array_struct
"unsigned_short_pointer_array_member"
where type CFieldType Unsigned_short_pointer_array_struct
"unsigned_short_pointer_array_member" = ConstantArray 10
(Ptr CUShort)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_int_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 310:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_int_pointer_array_struct
= Ordinary_signed_int_pointer_array_struct {ordinary_signed_int_pointer_array_member :: (ConstantArray 10
(Ptr CInt))
{- ^ __C declaration:__ @ordinary_signed_int_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 310:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_int_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_int_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_int_pointer_array_struct <*> readRaw (Proxy @"ordinary_signed_int_pointer_array_member") ptr_0
instance WriteRaw Ordinary_signed_int_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_int_pointer_array_struct ordinary_signed_int_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_signed_int_pointer_array_member") ptr_0 ordinary_signed_int_pointer_array_member_2
deriving via (EquivStorable Ordinary_signed_int_pointer_array_struct) instance Storable Ordinary_signed_int_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_int_pointer_array_struct) instance IsStruct Ordinary_signed_int_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CInt)) =>
HasField "ordinary_signed_int_pointer_array_member"
Ordinary_signed_int_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_int_pointer_array_struct{ordinary_signed_int_pointer_array_member = y_1},
getField @"ordinary_signed_int_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CInt)) =>
HasField "ordinary_signed_int_pointer_array_member"
(Ptr Ordinary_signed_int_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_int_pointer_array_member")
instance HasCField Ordinary_signed_int_pointer_array_struct
"ordinary_signed_int_pointer_array_member"
where type CFieldType Ordinary_signed_int_pointer_array_struct
"ordinary_signed_int_pointer_array_member" = ConstantArray 10
(Ptr CInt)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_int_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 311:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_int_pointer_array_struct
= Explicit_signed_int_pointer_array_struct {explicit_signed_int_pointer_array_member :: (ConstantArray 10
(Ptr CInt))
{- ^ __C declaration:__ @explicit_signed_int_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 311:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_int_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_int_pointer_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_int_pointer_array_struct <*> readRaw (Proxy @"explicit_signed_int_pointer_array_member") ptr_0
instance WriteRaw Explicit_signed_int_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_int_pointer_array_struct explicit_signed_int_pointer_array_member_2 -> writeRaw (Proxy @"explicit_signed_int_pointer_array_member") ptr_0 explicit_signed_int_pointer_array_member_2
deriving via (EquivStorable Explicit_signed_int_pointer_array_struct) instance Storable Explicit_signed_int_pointer_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_int_pointer_array_struct) instance IsStruct Explicit_signed_int_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CInt)) =>
HasField "explicit_signed_int_pointer_array_member"
Explicit_signed_int_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_int_pointer_array_struct{explicit_signed_int_pointer_array_member = y_1},
getField @"explicit_signed_int_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CInt)) =>
HasField "explicit_signed_int_pointer_array_member"
(Ptr Explicit_signed_int_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_int_pointer_array_member")
instance HasCField Explicit_signed_int_pointer_array_struct
"explicit_signed_int_pointer_array_member"
where type CFieldType Explicit_signed_int_pointer_array_struct
"explicit_signed_int_pointer_array_member" = ConstantArray 10
(Ptr CInt)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_int_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 312:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_int_pointer_array_struct
= Unsigned_int_pointer_array_struct {unsigned_int_pointer_array_member :: (ConstantArray 10
(Ptr CUInt))
{- ^ __C declaration:__ @unsigned_int_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 312:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_int_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_int_pointer_array_struct
where readRaw = \ptr_0 -> pure Unsigned_int_pointer_array_struct <*> readRaw (Proxy @"unsigned_int_pointer_array_member") ptr_0
instance WriteRaw Unsigned_int_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_int_pointer_array_struct unsigned_int_pointer_array_member_2 -> writeRaw (Proxy @"unsigned_int_pointer_array_member") ptr_0 unsigned_int_pointer_array_member_2
deriving via (EquivStorable Unsigned_int_pointer_array_struct) instance Storable Unsigned_int_pointer_array_struct
deriving via (IsStructViaReadRaw Unsigned_int_pointer_array_struct) instance IsStruct Unsigned_int_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CUInt)) =>
HasField "unsigned_int_pointer_array_member"
Unsigned_int_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_int_pointer_array_struct{unsigned_int_pointer_array_member = y_1},
getField @"unsigned_int_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CUInt)) =>
HasField "unsigned_int_pointer_array_member"
(Ptr Unsigned_int_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_int_pointer_array_member")
instance HasCField Unsigned_int_pointer_array_struct
"unsigned_int_pointer_array_member"
where type CFieldType Unsigned_int_pointer_array_struct
"unsigned_int_pointer_array_member" = ConstantArray 10 (Ptr CUInt)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 314:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_pointer_array_struct
= Ordinary_signed_long_pointer_array_struct {ordinary_signed_long_pointer_array_member :: (ConstantArray 10
(Ptr CLong))
{- ^ __C declaration:__ @ordinary_signed_long_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 314:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_pointer_array_struct <*> readRaw (Proxy @"ordinary_signed_long_pointer_array_member") ptr_0
instance WriteRaw Ordinary_signed_long_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_pointer_array_struct ordinary_signed_long_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_signed_long_pointer_array_member") ptr_0 ordinary_signed_long_pointer_array_member_2
deriving via (EquivStorable Ordinary_signed_long_pointer_array_struct) instance Storable Ordinary_signed_long_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_pointer_array_struct) instance IsStruct Ordinary_signed_long_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CLong)) =>
HasField "ordinary_signed_long_pointer_array_member"
Ordinary_signed_long_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_pointer_array_struct{ordinary_signed_long_pointer_array_member = y_1},
getField @"ordinary_signed_long_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CLong)) =>
HasField "ordinary_signed_long_pointer_array_member"
(Ptr Ordinary_signed_long_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_pointer_array_member")
instance HasCField Ordinary_signed_long_pointer_array_struct
"ordinary_signed_long_pointer_array_member"
where type CFieldType Ordinary_signed_long_pointer_array_struct
"ordinary_signed_long_pointer_array_member" = ConstantArray 10
(Ptr CLong)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 315:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_pointer_array_struct
= Explicit_signed_long_pointer_array_struct {explicit_signed_long_pointer_array_member :: (ConstantArray 10
(Ptr CLong))
{- ^ __C declaration:__ @explicit_signed_long_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 315:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_pointer_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_pointer_array_struct <*> readRaw (Proxy @"explicit_signed_long_pointer_array_member") ptr_0
instance WriteRaw Explicit_signed_long_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_pointer_array_struct explicit_signed_long_pointer_array_member_2 -> writeRaw (Proxy @"explicit_signed_long_pointer_array_member") ptr_0 explicit_signed_long_pointer_array_member_2
deriving via (EquivStorable Explicit_signed_long_pointer_array_struct) instance Storable Explicit_signed_long_pointer_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_pointer_array_struct) instance IsStruct Explicit_signed_long_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CLong)) =>
HasField "explicit_signed_long_pointer_array_member"
Explicit_signed_long_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_pointer_array_struct{explicit_signed_long_pointer_array_member = y_1},
getField @"explicit_signed_long_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CLong)) =>
HasField "explicit_signed_long_pointer_array_member"
(Ptr Explicit_signed_long_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_pointer_array_member")
instance HasCField Explicit_signed_long_pointer_array_struct
"explicit_signed_long_pointer_array_member"
where type CFieldType Explicit_signed_long_pointer_array_struct
"explicit_signed_long_pointer_array_member" = ConstantArray 10
(Ptr CLong)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 316:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_pointer_array_struct
= Unsigned_long_pointer_array_struct {unsigned_long_pointer_array_member :: (ConstantArray 10
(Ptr CULong))
{- ^ __C declaration:__ @unsigned_long_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 316:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_pointer_array_struct
where readRaw = \ptr_0 -> pure Unsigned_long_pointer_array_struct <*> readRaw (Proxy @"unsigned_long_pointer_array_member") ptr_0
instance WriteRaw Unsigned_long_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_pointer_array_struct unsigned_long_pointer_array_member_2 -> writeRaw (Proxy @"unsigned_long_pointer_array_member") ptr_0 unsigned_long_pointer_array_member_2
deriving via (EquivStorable Unsigned_long_pointer_array_struct) instance Storable Unsigned_long_pointer_array_struct
deriving via (IsStructViaReadRaw Unsigned_long_pointer_array_struct) instance IsStruct Unsigned_long_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CULong)) =>
HasField "unsigned_long_pointer_array_member"
Unsigned_long_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_pointer_array_struct{unsigned_long_pointer_array_member = y_1},
getField @"unsigned_long_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CULong)) =>
HasField "unsigned_long_pointer_array_member"
(Ptr Unsigned_long_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_pointer_array_member")
instance HasCField Unsigned_long_pointer_array_struct
"unsigned_long_pointer_array_member"
where type CFieldType Unsigned_long_pointer_array_struct
"unsigned_long_pointer_array_member" = ConstantArray 10
(Ptr CULong)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct ordinary_signed_long_long_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 318:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Ordinary_signed_long_long_pointer_array_struct
= Ordinary_signed_long_long_pointer_array_struct {ordinary_signed_long_long_pointer_array_member :: (ConstantArray 10
(Ptr CLLong))
{- ^ __C declaration:__ @ordinary_signed_long_long_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 318:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Ordinary_signed_long_long_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Ordinary_signed_long_long_pointer_array_struct
where readRaw = \ptr_0 -> pure Ordinary_signed_long_long_pointer_array_struct <*> readRaw (Proxy @"ordinary_signed_long_long_pointer_array_member") ptr_0
instance WriteRaw Ordinary_signed_long_long_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Ordinary_signed_long_long_pointer_array_struct ordinary_signed_long_long_pointer_array_member_2 -> writeRaw (Proxy @"ordinary_signed_long_long_pointer_array_member") ptr_0 ordinary_signed_long_long_pointer_array_member_2
deriving via (EquivStorable Ordinary_signed_long_long_pointer_array_struct) instance Storable Ordinary_signed_long_long_pointer_array_struct
deriving via (IsStructViaReadRaw Ordinary_signed_long_long_pointer_array_struct) instance IsStruct Ordinary_signed_long_long_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CLLong)) =>
HasField "ordinary_signed_long_long_pointer_array_member"
Ordinary_signed_long_long_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Ordinary_signed_long_long_pointer_array_struct{ordinary_signed_long_long_pointer_array_member = y_1},
getField @"ordinary_signed_long_long_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CLLong)) =>
HasField "ordinary_signed_long_long_pointer_array_member"
(Ptr Ordinary_signed_long_long_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"ordinary_signed_long_long_pointer_array_member")
instance HasCField Ordinary_signed_long_long_pointer_array_struct
"ordinary_signed_long_long_pointer_array_member"
where type CFieldType Ordinary_signed_long_long_pointer_array_struct
"ordinary_signed_long_long_pointer_array_member" = ConstantArray 10
(Ptr CLLong)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct explicit_signed_long_long_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 319:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Explicit_signed_long_long_pointer_array_struct
= Explicit_signed_long_long_pointer_array_struct {explicit_signed_long_long_pointer_array_member :: (ConstantArray 10
(Ptr CLLong))
{- ^ __C declaration:__ @explicit_signed_long_long_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 319:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Explicit_signed_long_long_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Explicit_signed_long_long_pointer_array_struct
where readRaw = \ptr_0 -> pure Explicit_signed_long_long_pointer_array_struct <*> readRaw (Proxy @"explicit_signed_long_long_pointer_array_member") ptr_0
instance WriteRaw Explicit_signed_long_long_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Explicit_signed_long_long_pointer_array_struct explicit_signed_long_long_pointer_array_member_2 -> writeRaw (Proxy @"explicit_signed_long_long_pointer_array_member") ptr_0 explicit_signed_long_long_pointer_array_member_2
deriving via (EquivStorable Explicit_signed_long_long_pointer_array_struct) instance Storable Explicit_signed_long_long_pointer_array_struct
deriving via (IsStructViaReadRaw Explicit_signed_long_long_pointer_array_struct) instance IsStruct Explicit_signed_long_long_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CLLong)) =>
HasField "explicit_signed_long_long_pointer_array_member"
Explicit_signed_long_long_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Explicit_signed_long_long_pointer_array_struct{explicit_signed_long_long_pointer_array_member = y_1},
getField @"explicit_signed_long_long_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CLLong)) =>
HasField "explicit_signed_long_long_pointer_array_member"
(Ptr Explicit_signed_long_long_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"explicit_signed_long_long_pointer_array_member")
instance HasCField Explicit_signed_long_long_pointer_array_struct
"explicit_signed_long_long_pointer_array_member"
where type CFieldType Explicit_signed_long_long_pointer_array_struct
"explicit_signed_long_long_pointer_array_member" = ConstantArray 10
(Ptr CLLong)
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct unsigned_long_long_pointer_array_struct@
__defined at:__ @comprehensive\/c2hsc.h 320:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Unsigned_long_long_pointer_array_struct
= Unsigned_long_long_pointer_array_struct {unsigned_long_long_pointer_array_member :: (ConstantArray 10
(Ptr CULLong))
{- ^ __C declaration:__ @unsigned_long_long_pointer_array_member@
__defined at:__ @comprehensive\/c2hsc.h 320:77@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Unsigned_long_long_pointer_array_struct
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 8 :: Int
instance ReadRaw Unsigned_long_long_pointer_array_struct
where readRaw = \ptr_0 -> pure Unsigned_long_long_pointer_array_struct <*> readRaw (Proxy @"unsigned_long_long_pointer_array_member") ptr_0
instance WriteRaw Unsigned_long_long_pointer_array_struct
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Unsigned_long_long_pointer_array_struct unsigned_long_long_pointer_array_member_2 -> writeRaw (Proxy @"unsigned_long_long_pointer_array_member") ptr_0 unsigned_long_long_pointer_array_member_2
deriving via (EquivStorable Unsigned_long_long_pointer_array_struct) instance Storable Unsigned_long_long_pointer_array_struct
deriving via (IsStructViaReadRaw Unsigned_long_long_pointer_array_struct) instance IsStruct Unsigned_long_long_pointer_array_struct
instance (~) ty (ConstantArray 10 (Ptr CULLong)) =>
HasField "unsigned_long_long_pointer_array_member"
Unsigned_long_long_pointer_array_struct
ty
where hasField = \x_0 -> (\y_1 -> Unsigned_long_long_pointer_array_struct{unsigned_long_long_pointer_array_member = y_1},
getField @"unsigned_long_long_pointer_array_member" x_0)
instance (~) ty (ConstantArray 10 (Ptr CULLong)) =>
HasField "unsigned_long_long_pointer_array_member"
(Ptr Unsigned_long_long_pointer_array_struct)
(Ptr ty)
where getField = fromPtr (Proxy @"unsigned_long_long_pointer_array_member")
instance HasCField Unsigned_long_long_pointer_array_struct
"unsigned_long_long_pointer_array_member"
where type CFieldType Unsigned_long_long_pointer_array_struct
"unsigned_long_long_pointer_array_member" = ConstantArray 10
(Ptr CULLong)
offset# = \_ -> \_ -> 0
{-| Sanity checks
NOTE: The @smoke.h@ test is moved to a separate header.
__C declaration:__ @an_int@
__defined at:__ @comprehensive\/c2hsc.h 329:13@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype An_int
= An_int {unwrap :: CInt}
deriving stock (Eq, Generic, Ord, Read, Show)
deriving newtype (Bitfield,
Bits,
Bounded,
Enum,
FiniteBits,
HasFFIType,
Integral,
Ix,
Num,
Prim,
ReadRaw,
Real,
StaticSize,
Storable,
WriteRaw)
instance (~) ty CInt => HasField "unwrap" An_int ty
where hasField = \x_0 -> (\y_1 -> An_int{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty CInt => HasField "unwrap" (Ptr An_int) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField An_int "unwrap"
where type CFieldType An_int "unwrap" = CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct \@cal_table_table@
__defined at:__ @comprehensive\/c2hsc.h 341:5@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Cal_table_table
= Cal_table_table {raw :: CInt
{- ^ __C declaration:__ @raw@
__defined at:__ @comprehensive\/c2hsc.h 342:13@
__exported by:__ @comprehensive\/c2hsc.h@
-},
val :: CInt
{- ^ __C declaration:__ @val@
__defined at:__ @comprehensive\/c2hsc.h 342:22@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Cal_table_table
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Cal_table_table
where readRaw = \ptr_0 -> (pure Cal_table_table <*> readRaw (Proxy @"raw") ptr_0) <*> readRaw (Proxy @"val") ptr_0
instance WriteRaw Cal_table_table
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Cal_table_table raw_2
val_3 -> writeRaw (Proxy @"raw") ptr_0 raw_2 >> writeRaw (Proxy @"val") ptr_0 val_3
deriving via (EquivStorable Cal_table_table) instance Storable Cal_table_table
deriving via (IsStructViaReadRaw Cal_table_table) instance IsStruct Cal_table_table
instance (~) ty CInt => HasField "raw" Cal_table_table ty
where hasField = \x_0 -> (\y_1 -> Cal_table_table{raw = y_1,
val = getField @"val" x_0},
getField @"raw" x_0)
instance (~) ty CInt =>
HasField "raw" (Ptr Cal_table_table) (Ptr ty)
where getField = fromPtr (Proxy @"raw")
instance HasCField Cal_table_table "raw"
where type CFieldType Cal_table_table "raw" = CInt
offset# = \_ -> \_ -> 0
instance (~) ty CInt => HasField "val" Cal_table_table ty
where hasField = \x_0 -> (\y_1 -> Cal_table_table{val = y_1,
raw = getField @"raw" x_0},
getField @"val" x_0)
instance (~) ty CInt =>
HasField "val" (Ptr Cal_table_table) (Ptr ty)
where getField = fromPtr (Proxy @"val")
instance HasCField Cal_table_table "val"
where type CFieldType Cal_table_table "val" = CInt
offset# = \_ -> \_ -> 4
{-| Issues without test cases in the original test suite
These are examples from open issues on the c2hsc repository, that don't (yet) have corresponding test cases in the c2hsc test suite.
__C declaration:__ @struct cal_table@
__defined at:__ @comprehensive\/c2hsc.h 339:8@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Cal_table
= Cal_table {size :: CInt
{- ^ __C declaration:__ @size@
__defined at:__ @comprehensive\/c2hsc.h 340:9@
__exported by:__ @comprehensive\/c2hsc.h@
-},
table :: (ConstantArray 32 Cal_table_table)
{- ^ __C declaration:__ @table@
__defined at:__ @comprehensive\/c2hsc.h 343:7@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize Cal_table
where staticSizeOf = \_ -> 260 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw Cal_table
where readRaw = \ptr_0 -> (pure Cal_table <*> readRaw (Proxy @"size") ptr_0) <*> readRaw (Proxy @"table") ptr_0
instance WriteRaw Cal_table
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Cal_table size_2
table_3 -> writeRaw (Proxy @"size") ptr_0 size_2 >> writeRaw (Proxy @"table") ptr_0 table_3
deriving via (EquivStorable Cal_table) instance Storable Cal_table
deriving via (IsStructViaReadRaw Cal_table) instance IsStruct Cal_table
instance (~) ty CInt => HasField "size" Cal_table ty
where hasField = \x_0 -> (\y_1 -> Cal_table{size = y_1,
table = getField @"table" x_0},
getField @"size" x_0)
instance (~) ty CInt => HasField "size" (Ptr Cal_table) (Ptr ty)
where getField = fromPtr (Proxy @"size")
instance HasCField Cal_table "size"
where type CFieldType Cal_table "size" = CInt
offset# = \_ -> \_ -> 0
instance (~) ty (ConstantArray 32 Cal_table_table) =>
HasField "table" Cal_table ty
where hasField = \x_0 -> (\y_1 -> Cal_table{table = y_1,
size = getField @"size" x_0},
getField @"table" x_0)
instance (~) ty (ConstantArray 32 Cal_table_table) =>
HasField "table" (Ptr Cal_table) (Ptr ty)
where getField = fromPtr (Proxy @"table")
instance HasCField Cal_table "table"
where type CFieldType Cal_table "table" = ConstantArray 32
Cal_table_table
offset# = \_ -> \_ -> 4
{-| __C declaration:__ @union \@Elf32_External_Dyn_d_un@
__defined at:__ @comprehensive\/c2hsc.h 349:3@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype Elf32_External_Dyn_d_un
= Elf32_External_Dyn_d_un {unwrap :: ByteArray}
deriving stock Generic
deriving via (SizedByteArray 4
1) instance StaticSize Elf32_External_Dyn_d_un
deriving via (SizedByteArray 4
1) instance ReadRaw Elf32_External_Dyn_d_un
deriving via (SizedByteArray 4
1) instance WriteRaw Elf32_External_Dyn_d_un
deriving via (EquivStorable Elf32_External_Dyn_d_un) instance Storable Elf32_External_Dyn_d_un
deriving via (SizedByteArray 4
1) instance IsUnion Elf32_External_Dyn_d_un
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_val" Elf32_External_Dyn_d_un ty
where getField = getUnionPayload
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_val" Elf32_External_Dyn_d_un ty
where hasField = \x_0 -> (\y_1 -> setUnionPayload y_1 x_0,
getField @"d_val" x_0)
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_val" (Ptr Elf32_External_Dyn_d_un) (Ptr ty)
where getField = fromPtr (Proxy @"d_val")
instance HasCField Elf32_External_Dyn_d_un "d_val"
where type CFieldType Elf32_External_Dyn_d_un
"d_val" = ConstantArray 4 CUChar
offset# = \_ -> \_ -> 0
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_ptr" Elf32_External_Dyn_d_un ty
where getField = getUnionPayload
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_ptr" Elf32_External_Dyn_d_un ty
where hasField = \x_0 -> (\y_1 -> setUnionPayload y_1 x_0,
getField @"d_ptr" x_0)
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_ptr" (Ptr Elf32_External_Dyn_d_un) (Ptr ty)
where getField = fromPtr (Proxy @"d_ptr")
instance HasCField Elf32_External_Dyn_d_un "d_ptr"
where type CFieldType Elf32_External_Dyn_d_un
"d_ptr" = ConstantArray 4 CUChar
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct Elf32_External_Dyn@
__defined at:__ @comprehensive\/c2hsc.h 347:9@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data Elf32_External_Dyn
= Elf32_External_Dyn {d_tag :: (ConstantArray 4 CUChar)
{- ^ __C declaration:__ @d_tag@
__defined at:__ @comprehensive\/c2hsc.h 348:17@
__exported by:__ @comprehensive\/c2hsc.h@
-},
d_un :: Elf32_External_Dyn_d_un
{- ^ __C declaration:__ @d_un@
__defined at:__ @comprehensive\/c2hsc.h 352:5@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock Generic
instance StaticSize Elf32_External_Dyn
where staticSizeOf = \_ -> 8 :: Int
staticAlignment = \_ -> 1 :: Int
instance ReadRaw Elf32_External_Dyn
where readRaw = \ptr_0 -> (pure Elf32_External_Dyn <*> readRaw (Proxy @"d_tag") ptr_0) <*> readRaw (Proxy @"d_un") ptr_0
instance WriteRaw Elf32_External_Dyn
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
Elf32_External_Dyn d_tag_2
d_un_3 -> writeRaw (Proxy @"d_tag") ptr_0 d_tag_2 >> writeRaw (Proxy @"d_un") ptr_0 d_un_3
deriving via (EquivStorable Elf32_External_Dyn) instance Storable Elf32_External_Dyn
deriving via (IsStructViaReadRaw Elf32_External_Dyn) instance IsStruct Elf32_External_Dyn
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_tag" Elf32_External_Dyn ty
where hasField = \x_0 -> (\y_1 -> Elf32_External_Dyn{d_tag = y_1,
d_un = getField @"d_un" x_0},
getField @"d_tag" x_0)
instance (~) ty (ConstantArray 4 CUChar) =>
HasField "d_tag" (Ptr Elf32_External_Dyn) (Ptr ty)
where getField = fromPtr (Proxy @"d_tag")
instance HasCField Elf32_External_Dyn "d_tag"
where type CFieldType Elf32_External_Dyn "d_tag" = ConstantArray 4
CUChar
offset# = \_ -> \_ -> 0
instance (~) ty Elf32_External_Dyn_d_un =>
HasField "d_un" Elf32_External_Dyn ty
where hasField = \x_0 -> (\y_1 -> Elf32_External_Dyn{d_un = y_1,
d_tag = getField @"d_tag" x_0},
getField @"d_un" x_0)
instance (~) ty Elf32_External_Dyn_d_un =>
HasField "d_un" (Ptr Elf32_External_Dyn) (Ptr ty)
where getField = fromPtr (Proxy @"d_un")
instance HasCField Elf32_External_Dyn "d_un"
where type CFieldType Elf32_External_Dyn
"d_un" = Elf32_External_Dyn_d_un
offset# = \_ -> \_ -> 4
{-| __C declaration:__ @bug_24@
__defined at:__ @comprehensive\/c2hsc.h 358:15@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype Bug_24
= Bug_24 {unwrap :: (Ptr CInt)}
deriving stock (Eq, Generic, Ord, Show)
deriving newtype (HasFFIType,
ReadRaw,
StaticSize,
Storable,
WriteRaw)
instance (~) ty (Ptr CInt) => HasField "unwrap" Bug_24 ty
where hasField = \x_0 -> (\y_1 -> Bug_24{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty (Ptr CInt) =>
HasField "unwrap" (Ptr Bug_24) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField Bug_24 "unwrap"
where type CFieldType Bug_24 "unwrap" = Ptr CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @bug_24_2@
__defined at:__ @comprehensive\/c2hsc.h 359:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype Bug_24_2
= Bug_24_2 {unwrap :: (PtrConst CInt)}
deriving stock (Eq, Generic, Ord, Show)
deriving newtype (HasFFIType,
ReadRaw,
StaticSize,
Storable,
WriteRaw)
instance (~) ty (PtrConst CInt) => HasField "unwrap" Bug_24_2 ty
where hasField = \x_0 -> (\y_1 -> Bug_24_2{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty (PtrConst CInt) =>
HasField "unwrap" (Ptr Bug_24_2) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField Bug_24_2 "unwrap"
where type CFieldType Bug_24_2 "unwrap" = PtrConst CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @MyArray_27@
__defined at:__ @comprehensive\/c2hsc.h 364:13@
__exported by:__ @comprehensive\/c2hsc.h@
-}
newtype MyArray_27
= MyArray_27 {unwrap :: (ConstantArray 20 CInt)}
deriving stock (Eq, Generic, Show)
deriving newtype (IsArray, ReadRaw, StaticSize, Storable, WriteRaw)
instance (~) ty (ConstantArray 20 CInt) =>
HasField "unwrap" MyArray_27 ty
where hasField = \x_0 -> (\y_1 -> MyArray_27{unwrap = y_1},
getField @"unwrap" x_0)
instance (~) ty (ConstantArray 20 CInt) =>
HasField "unwrap" (Ptr MyArray_27) (Ptr ty)
where getField = fromPtr (Proxy @"unwrap")
instance HasCField MyArray_27 "unwrap"
where type CFieldType MyArray_27 "unwrap" = ConstantArray 20 CInt
offset# = \_ -> \_ -> 0
{-| __C declaration:__ @struct MyStruct_27@
__defined at:__ @comprehensive\/c2hsc.h 365:9@
__exported by:__ @comprehensive\/c2hsc.h@
-}
data MyStruct_27
= MyStruct_27 {x :: MyArray_27
{- ^ __C declaration:__ @x@
__defined at:__ @comprehensive\/c2hsc.h 366:14@
__exported by:__ @comprehensive\/c2hsc.h@
-}}
deriving stock (Eq, Generic, Show)
instance StaticSize MyStruct_27
where staticSizeOf = \_ -> 80 :: Int
staticAlignment = \_ -> 4 :: Int
instance ReadRaw MyStruct_27
where readRaw = \ptr_0 -> pure MyStruct_27 <*> readRaw (Proxy @"x") ptr_0
instance WriteRaw MyStruct_27
where writeRaw = \ptr_0 -> \s_1 -> case s_1 of
MyStruct_27 x_2 -> writeRaw (Proxy @"x") ptr_0 x_2
deriving via (EquivStorable MyStruct_27) instance Storable MyStruct_27
deriving via (IsStructViaReadRaw MyStruct_27) instance IsStruct MyStruct_27
instance (~) ty MyArray_27 => HasField "x" MyStruct_27 ty
where hasField = \x_0 -> (\y_1 -> MyStruct_27{x = y_1},
getField @"x" x_0)
instance (~) ty MyArray_27 =>
HasField "x" (Ptr MyStruct_27) (Ptr ty)
where getField = fromPtr (Proxy @"x")
instance HasCField MyStruct_27 "x"
where type CFieldType MyStruct_27 "x" = MyArray_27
offset# = \_ -> \_ -> 0
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_function@
foreign import ccall safe "hs_bindgen_3fd2a5c6e681c44b" hs_bindgen_3fd2a5c6e681c44b_base ::
FunPtr Void
-> IO ()
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_function@
hs_bindgen_3fd2a5c6e681c44b :: FunPtr (CInt -> IO CInt) -> IO ()
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_function@
hs_bindgen_3fd2a5c6e681c44b = \x_0 -> hs_bindgen_3fd2a5c6e681c44b_base (toFFIType x_0)
{-| __C declaration:__ @foo_function@
__defined at:__ @comprehensive\/c2hsc.h 38:6@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_function_safe :: FunPtr (CInt -> IO CInt) -> IO ()
{-| __C declaration:__ @foo_function@
__defined at:__ @comprehensive\/c2hsc.h 38:6@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_function_safe = hs_bindgen_3fd2a5c6e681c44b
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_1@
foreign import ccall safe "hs_bindgen_7978c370c45d3898" hs_bindgen_7978c370c45d3898_base ::
CUInt
-> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_1@
hs_bindgen_7978c370c45d3898 :: CUInt -> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_1@
hs_bindgen_7978c370c45d3898 = \x_0 -> fmap fromFFIType (hs_bindgen_7978c370c45d3898_base (toFFIType x_0))
{-| __C declaration:__ @foo_33_1@
__defined at:__ @comprehensive\/c2hsc.h 73:10@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_1_safe :: CUInt -> IO CUInt
{-| __C declaration:__ @foo_33_1@
__defined at:__ @comprehensive\/c2hsc.h 73:10@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_1_safe = hs_bindgen_7978c370c45d3898
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_2@
foreign import ccall safe "hs_bindgen_44aef5175928343d" hs_bindgen_44aef5175928343d_base ::
CUInt
-> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_2@
hs_bindgen_44aef5175928343d :: CUInt -> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_2@
hs_bindgen_44aef5175928343d = \x_0 -> fmap fromFFIType (hs_bindgen_44aef5175928343d_base (toFFIType x_0))
{-| __C declaration:__ @foo_33_2@
__defined at:__ @comprehensive\/c2hsc.h 74:51@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_2_safe :: CUInt -> IO CUInt
{-| __C declaration:__ @foo_33_2@
__defined at:__ @comprehensive\/c2hsc.h 74:51@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_2_safe = hs_bindgen_44aef5175928343d
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_3@
foreign import ccall safe "hs_bindgen_9f0b65c4b469b3d8" hs_bindgen_9f0b65c4b469b3d8_base ::
CLLong
-> IO CLLong
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_3@
hs_bindgen_9f0b65c4b469b3d8 :: CLLong -> IO CLLong
-- __unique:__ @test_comprehensivec2hsc_Example_Safe_foo_33_3@
hs_bindgen_9f0b65c4b469b3d8 = \x_0 -> fmap fromFFIType (hs_bindgen_9f0b65c4b469b3d8_base (toFFIType x_0))
{-| __C declaration:__ @foo_33_3@
__defined at:__ @comprehensive\/c2hsc.h 75:52@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_3_safe :: CLLong -> IO CLLong
{-| __C declaration:__ @foo_33_3@
__defined at:__ @comprehensive\/c2hsc.h 75:52@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_3_safe = hs_bindgen_9f0b65c4b469b3d8
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_function@
foreign import ccall unsafe "hs_bindgen_bf542a744554a894" hs_bindgen_bf542a744554a894_base ::
FunPtr Void
-> IO ()
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_function@
hs_bindgen_bf542a744554a894 :: FunPtr (CInt -> IO CInt) -> IO ()
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_function@
hs_bindgen_bf542a744554a894 = \x_0 -> hs_bindgen_bf542a744554a894_base (toFFIType x_0)
{-| __C declaration:__ @foo_function@
__defined at:__ @comprehensive\/c2hsc.h 38:6@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_function_unsafe :: FunPtr (CInt -> IO CInt) -> IO ()
{-| __C declaration:__ @foo_function@
__defined at:__ @comprehensive\/c2hsc.h 38:6@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_function_unsafe = hs_bindgen_bf542a744554a894
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_1@
foreign import ccall unsafe "hs_bindgen_11ca53f1ea9c8230" hs_bindgen_11ca53f1ea9c8230_base ::
CUInt
-> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_1@
hs_bindgen_11ca53f1ea9c8230 :: CUInt -> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_1@
hs_bindgen_11ca53f1ea9c8230 = \x_0 -> fmap fromFFIType (hs_bindgen_11ca53f1ea9c8230_base (toFFIType x_0))
{-| __C declaration:__ @foo_33_1@
__defined at:__ @comprehensive\/c2hsc.h 73:10@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_1_unsafe :: CUInt -> IO CUInt
{-| __C declaration:__ @foo_33_1@
__defined at:__ @comprehensive\/c2hsc.h 73:10@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_1_unsafe = hs_bindgen_11ca53f1ea9c8230
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_2@
foreign import ccall unsafe "hs_bindgen_2685a75b0196568e" hs_bindgen_2685a75b0196568e_base ::
CUInt
-> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_2@
hs_bindgen_2685a75b0196568e :: CUInt -> IO CUInt
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_2@
hs_bindgen_2685a75b0196568e = \x_0 -> fmap fromFFIType (hs_bindgen_2685a75b0196568e_base (toFFIType x_0))
{-| __C declaration:__ @foo_33_2@
__defined at:__ @comprehensive\/c2hsc.h 74:51@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_2_unsafe :: CUInt -> IO CUInt
{-| __C declaration:__ @foo_33_2@
__defined at:__ @comprehensive\/c2hsc.h 74:51@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_2_unsafe = hs_bindgen_2685a75b0196568e
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_3@
foreign import ccall unsafe "hs_bindgen_bc94ff083e65f7e0" hs_bindgen_bc94ff083e65f7e0_base ::
CLLong
-> IO CLLong
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_3@
hs_bindgen_bc94ff083e65f7e0 :: CLLong -> IO CLLong
-- __unique:__ @test_comprehensivec2hsc_Example_Unsafe_foo_33_3@
hs_bindgen_bc94ff083e65f7e0 = \x_0 -> fmap fromFFIType (hs_bindgen_bc94ff083e65f7e0_base (toFFIType x_0))
{-| __C declaration:__ @foo_33_3@
__defined at:__ @comprehensive\/c2hsc.h 75:52@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_3_unsafe :: CLLong -> IO CLLong
{-| __C declaration:__ @foo_33_3@
__defined at:__ @comprehensive\/c2hsc.h 75:52@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_3_unsafe = hs_bindgen_bc94ff083e65f7e0
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_function@
foreign import ccall unsafe "hs_bindgen_37f32218c55b498b" hs_bindgen_37f32218c55b498b_base ::
IO (FunPtr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_function@
hs_bindgen_37f32218c55b498b :: IO (FunPtr (FunPtr (CInt ->
IO CInt) ->
IO ()))
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_function@
hs_bindgen_37f32218c55b498b = fmap fromFFIType hs_bindgen_37f32218c55b498b_base
{-# NOINLINE foo_function_funptr #-}
{-| __C declaration:__ @foo_function@
__defined at:__ @comprehensive\/c2hsc.h 38:6@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_function_funptr :: FunPtr (FunPtr (CInt -> IO CInt) -> IO ())
{-| __C declaration:__ @foo_function@
__defined at:__ @comprehensive\/c2hsc.h 38:6@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_function_funptr = unsafePerformIO hs_bindgen_37f32218c55b498b
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_1@
foreign import ccall unsafe "hs_bindgen_482f80da2191c5d6" hs_bindgen_482f80da2191c5d6_base ::
IO (FunPtr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_1@
hs_bindgen_482f80da2191c5d6 :: IO (FunPtr (CUInt -> IO CUInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_1@
hs_bindgen_482f80da2191c5d6 = fmap fromFFIType hs_bindgen_482f80da2191c5d6_base
{-# NOINLINE foo_33_1_funptr #-}
{-| __C declaration:__ @foo_33_1@
__defined at:__ @comprehensive\/c2hsc.h 73:10@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_1_funptr :: FunPtr (CUInt -> IO CUInt)
{-| __C declaration:__ @foo_33_1@
__defined at:__ @comprehensive\/c2hsc.h 73:10@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_1_funptr = unsafePerformIO hs_bindgen_482f80da2191c5d6
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_2@
foreign import ccall unsafe "hs_bindgen_c50591bcbfea3260" hs_bindgen_c50591bcbfea3260_base ::
IO (FunPtr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_2@
hs_bindgen_c50591bcbfea3260 :: IO (FunPtr (CUInt -> IO CUInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_2@
hs_bindgen_c50591bcbfea3260 = fmap fromFFIType hs_bindgen_c50591bcbfea3260_base
{-# NOINLINE foo_33_2_funptr #-}
{-| __C declaration:__ @foo_33_2@
__defined at:__ @comprehensive\/c2hsc.h 74:51@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_2_funptr :: FunPtr (CUInt -> IO CUInt)
{-| __C declaration:__ @foo_33_2@
__defined at:__ @comprehensive\/c2hsc.h 74:51@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_2_funptr = unsafePerformIO hs_bindgen_c50591bcbfea3260
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_3@
foreign import ccall unsafe "hs_bindgen_26b60496f499680a" hs_bindgen_26b60496f499680a_base ::
IO (FunPtr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_3@
hs_bindgen_26b60496f499680a :: IO (FunPtr (CLLong -> IO CLLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_foo_33_3@
hs_bindgen_26b60496f499680a = fmap fromFFIType hs_bindgen_26b60496f499680a_base
{-# NOINLINE foo_33_3_funptr #-}
{-| __C declaration:__ @foo_33_3@
__defined at:__ @comprehensive\/c2hsc.h 75:52@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_3_funptr :: FunPtr (CLLong -> IO CLLong)
{-| __C declaration:__ @foo_33_3@
__defined at:__ @comprehensive\/c2hsc.h 75:52@
__exported by:__ @comprehensive\/c2hsc.h@
-}
foo_33_3_funptr = unsafePerformIO hs_bindgen_26b60496f499680a
-- __unique:__ @test_comprehensivec2hsc_Example_get_my_array@
foreign import ccall unsafe "hs_bindgen_b2862a117942ba8c" hs_bindgen_b2862a117942ba8c_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_my_array@
hs_bindgen_b2862a117942ba8c :: IO (Ptr (IncompleteArray (FunPtr (CInt ->
IO CInt))))
-- __unique:__ @test_comprehensivec2hsc_Example_get_my_array@
hs_bindgen_b2862a117942ba8c = fmap fromFFIType hs_bindgen_b2862a117942ba8c_base
{-# NOINLINE my_array #-}
{-| __C declaration:__ @my_array@
__defined at:__ @comprehensive\/c2hsc.h 26:14@
__exported by:__ @comprehensive\/c2hsc.h@
-}
my_array :: Ptr (IncompleteArray (FunPtr (CInt -> IO CInt)))
{-| __C declaration:__ @my_array@
__defined at:__ @comprehensive\/c2hsc.h 26:14@
__exported by:__ @comprehensive\/c2hsc.h@
-}
my_array = unsafePerformIO hs_bindgen_b2862a117942ba8c
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float@
foreign import ccall unsafe "hs_bindgen_fbe24203b7174cce" hs_bindgen_fbe24203b7174cce_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float@
hs_bindgen_fbe24203b7174cce :: IO (Ptr CFloat)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float@
hs_bindgen_fbe24203b7174cce = fmap fromFFIType hs_bindgen_fbe24203b7174cce_base
{-# NOINLINE ordinary_float #-}
{-| Primitive types
NOTE: Here and elsewhere the original test suite has some references to @long double@ , some commented out, and some confusingly not, with an expectation of a translation to @CDouble@ ; the latter I think is a bug in the original test suite. Here we leave all of these test cases in; we emit an "unsupported" message for these and omit the declaration in the generated bindings.
__C declaration:__ @ordinary_float@
__defined at:__ @comprehensive\/c2hsc.h 88:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float :: Ptr CFloat
{-| Primitive types
NOTE: Here and elsewhere the original test suite has some references to @long double@ , some commented out, and some confusingly not, with an expectation of a translation to @CDouble@ ; the latter I think is a bug in the original test suite. Here we leave all of these test cases in; we emit an "unsupported" message for these and omit the declaration in the generated bindings.
__C declaration:__ @ordinary_float@
__defined at:__ @comprehensive\/c2hsc.h 88:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float = unsafePerformIO hs_bindgen_fbe24203b7174cce
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double@
foreign import ccall unsafe "hs_bindgen_c996ca409147b439" hs_bindgen_c996ca409147b439_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double@
hs_bindgen_c996ca409147b439 :: IO (Ptr CDouble)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double@
hs_bindgen_c996ca409147b439 = fmap fromFFIType hs_bindgen_c996ca409147b439_base
{-# NOINLINE ordinary_double #-}
{-| __C declaration:__ @ordinary_double@
__defined at:__ @comprehensive\/c2hsc.h 89:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double :: Ptr CDouble
{-| __C declaration:__ @ordinary_double@
__defined at:__ @comprehensive\/c2hsc.h 89:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double = unsafePerformIO hs_bindgen_c996ca409147b439
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_char@
foreign import ccall unsafe "hs_bindgen_b5c47cbce17ba18f" hs_bindgen_b5c47cbce17ba18f_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_char@
hs_bindgen_b5c47cbce17ba18f :: IO (Ptr CChar)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_char@
hs_bindgen_b5c47cbce17ba18f = fmap fromFFIType hs_bindgen_b5c47cbce17ba18f_base
{-# NOINLINE ordinary_char #-}
{-| __C declaration:__ @ordinary_char@
__defined at:__ @comprehensive\/c2hsc.h 92:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_char :: Ptr CChar
{-| __C declaration:__ @ordinary_char@
__defined at:__ @comprehensive\/c2hsc.h 92:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_char = unsafePerformIO hs_bindgen_b5c47cbce17ba18f
-- __unique:__ @test_comprehensivec2hsc_Example_get_signed_char@
foreign import ccall unsafe "hs_bindgen_74214b0c0c8011ef" hs_bindgen_74214b0c0c8011ef_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_signed_char@
hs_bindgen_74214b0c0c8011ef :: IO (Ptr CSChar)
-- __unique:__ @test_comprehensivec2hsc_Example_get_signed_char@
hs_bindgen_74214b0c0c8011ef = fmap fromFFIType hs_bindgen_74214b0c0c8011ef_base
{-# NOINLINE signed_char #-}
{-| __C declaration:__ @signed_char@
__defined at:__ @comprehensive\/c2hsc.h 93:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
signed_char :: Ptr CSChar
{-| __C declaration:__ @signed_char@
__defined at:__ @comprehensive\/c2hsc.h 93:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
signed_char = unsafePerformIO hs_bindgen_74214b0c0c8011ef
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char@
foreign import ccall unsafe "hs_bindgen_074079404a90186b" hs_bindgen_074079404a90186b_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char@
hs_bindgen_074079404a90186b :: IO (Ptr CUChar)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char@
hs_bindgen_074079404a90186b = fmap fromFFIType hs_bindgen_074079404a90186b_base
{-# NOINLINE unsigned_char #-}
{-| __C declaration:__ @unsigned_char@
__defined at:__ @comprehensive\/c2hsc.h 94:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char :: Ptr CUChar
{-| __C declaration:__ @unsigned_char@
__defined at:__ @comprehensive\/c2hsc.h 94:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char = unsafePerformIO hs_bindgen_074079404a90186b
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short@
foreign import ccall unsafe "hs_bindgen_e432ab522350f84b" hs_bindgen_e432ab522350f84b_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short@
hs_bindgen_e432ab522350f84b :: IO (Ptr CShort)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short@
hs_bindgen_e432ab522350f84b = fmap fromFFIType hs_bindgen_e432ab522350f84b_base
{-# NOINLINE ordinary_signed_short #-}
{-| __C declaration:__ @ordinary_signed_short@
__defined at:__ @comprehensive\/c2hsc.h 96:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short :: Ptr CShort
{-| __C declaration:__ @ordinary_signed_short@
__defined at:__ @comprehensive\/c2hsc.h 96:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short = unsafePerformIO hs_bindgen_e432ab522350f84b
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short@
foreign import ccall unsafe "hs_bindgen_17fa3df7c6690161" hs_bindgen_17fa3df7c6690161_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short@
hs_bindgen_17fa3df7c6690161 :: IO (Ptr CShort)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short@
hs_bindgen_17fa3df7c6690161 = fmap fromFFIType hs_bindgen_17fa3df7c6690161_base
{-# NOINLINE explicit_signed_short #-}
{-| __C declaration:__ @explicit_signed_short@
__defined at:__ @comprehensive\/c2hsc.h 97:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short :: Ptr CShort
{-| __C declaration:__ @explicit_signed_short@
__defined at:__ @comprehensive\/c2hsc.h 97:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short = unsafePerformIO hs_bindgen_17fa3df7c6690161
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short@
foreign import ccall unsafe "hs_bindgen_20f280e98d58aacc" hs_bindgen_20f280e98d58aacc_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short@
hs_bindgen_20f280e98d58aacc :: IO (Ptr CUShort)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short@
hs_bindgen_20f280e98d58aacc = fmap fromFFIType hs_bindgen_20f280e98d58aacc_base
{-# NOINLINE unsigned_short #-}
{-| __C declaration:__ @unsigned_short@
__defined at:__ @comprehensive\/c2hsc.h 98:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short :: Ptr CUShort
{-| __C declaration:__ @unsigned_short@
__defined at:__ @comprehensive\/c2hsc.h 98:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short = unsafePerformIO hs_bindgen_20f280e98d58aacc
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int@
foreign import ccall unsafe "hs_bindgen_78b4f07c60ef3ef7" hs_bindgen_78b4f07c60ef3ef7_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int@
hs_bindgen_78b4f07c60ef3ef7 :: IO (Ptr CInt)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int@
hs_bindgen_78b4f07c60ef3ef7 = fmap fromFFIType hs_bindgen_78b4f07c60ef3ef7_base
{-# NOINLINE ordinary_signed_int #-}
{-| __C declaration:__ @ordinary_signed_int@
__defined at:__ @comprehensive\/c2hsc.h 100:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int :: Ptr CInt
{-| __C declaration:__ @ordinary_signed_int@
__defined at:__ @comprehensive\/c2hsc.h 100:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int = unsafePerformIO hs_bindgen_78b4f07c60ef3ef7
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int@
foreign import ccall unsafe "hs_bindgen_41643d3737e9213c" hs_bindgen_41643d3737e9213c_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int@
hs_bindgen_41643d3737e9213c :: IO (Ptr CInt)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int@
hs_bindgen_41643d3737e9213c = fmap fromFFIType hs_bindgen_41643d3737e9213c_base
{-# NOINLINE explicit_signed_int #-}
{-| __C declaration:__ @explicit_signed_int@
__defined at:__ @comprehensive\/c2hsc.h 101:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int :: Ptr CInt
{-| __C declaration:__ @explicit_signed_int@
__defined at:__ @comprehensive\/c2hsc.h 101:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int = unsafePerformIO hs_bindgen_41643d3737e9213c
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int@
foreign import ccall unsafe "hs_bindgen_6e686e175c956cb8" hs_bindgen_6e686e175c956cb8_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int@
hs_bindgen_6e686e175c956cb8 :: IO (Ptr CUInt)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int@
hs_bindgen_6e686e175c956cb8 = fmap fromFFIType hs_bindgen_6e686e175c956cb8_base
{-# NOINLINE unsigned_int #-}
{-| __C declaration:__ @unsigned_int@
__defined at:__ @comprehensive\/c2hsc.h 102:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int :: Ptr CUInt
{-| __C declaration:__ @unsigned_int@
__defined at:__ @comprehensive\/c2hsc.h 102:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int = unsafePerformIO hs_bindgen_6e686e175c956cb8
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long@
foreign import ccall unsafe "hs_bindgen_6a41c38f7fbb41d9" hs_bindgen_6a41c38f7fbb41d9_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long@
hs_bindgen_6a41c38f7fbb41d9 :: IO (Ptr CLong)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long@
hs_bindgen_6a41c38f7fbb41d9 = fmap fromFFIType hs_bindgen_6a41c38f7fbb41d9_base
{-# NOINLINE ordinary_signed_long #-}
{-| __C declaration:__ @ordinary_signed_long@
__defined at:__ @comprehensive\/c2hsc.h 104:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long :: Ptr CLong
{-| __C declaration:__ @ordinary_signed_long@
__defined at:__ @comprehensive\/c2hsc.h 104:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long = unsafePerformIO hs_bindgen_6a41c38f7fbb41d9
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long@
foreign import ccall unsafe "hs_bindgen_a3b5191325da8230" hs_bindgen_a3b5191325da8230_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long@
hs_bindgen_a3b5191325da8230 :: IO (Ptr CLong)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long@
hs_bindgen_a3b5191325da8230 = fmap fromFFIType hs_bindgen_a3b5191325da8230_base
{-# NOINLINE explicit_signed_long #-}
{-| __C declaration:__ @explicit_signed_long@
__defined at:__ @comprehensive\/c2hsc.h 105:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long :: Ptr CLong
{-| __C declaration:__ @explicit_signed_long@
__defined at:__ @comprehensive\/c2hsc.h 105:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long = unsafePerformIO hs_bindgen_a3b5191325da8230
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long@
foreign import ccall unsafe "hs_bindgen_df563b6d35ec4e8f" hs_bindgen_df563b6d35ec4e8f_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long@
hs_bindgen_df563b6d35ec4e8f :: IO (Ptr CULong)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long@
hs_bindgen_df563b6d35ec4e8f = fmap fromFFIType hs_bindgen_df563b6d35ec4e8f_base
{-# NOINLINE unsigned_long #-}
{-| __C declaration:__ @unsigned_long@
__defined at:__ @comprehensive\/c2hsc.h 106:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long :: Ptr CULong
{-| __C declaration:__ @unsigned_long@
__defined at:__ @comprehensive\/c2hsc.h 106:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long = unsafePerformIO hs_bindgen_df563b6d35ec4e8f
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long@
foreign import ccall unsafe "hs_bindgen_59c6159f8798505a" hs_bindgen_59c6159f8798505a_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long@
hs_bindgen_59c6159f8798505a :: IO (Ptr CLLong)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long@
hs_bindgen_59c6159f8798505a = fmap fromFFIType hs_bindgen_59c6159f8798505a_base
{-# NOINLINE ordinary_signed_long_long #-}
{-| __C declaration:__ @ordinary_signed_long_long@
__defined at:__ @comprehensive\/c2hsc.h 108:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long :: Ptr CLLong
{-| __C declaration:__ @ordinary_signed_long_long@
__defined at:__ @comprehensive\/c2hsc.h 108:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long = unsafePerformIO hs_bindgen_59c6159f8798505a
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long@
foreign import ccall unsafe "hs_bindgen_bfd63280c68460d2" hs_bindgen_bfd63280c68460d2_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long@
hs_bindgen_bfd63280c68460d2 :: IO (Ptr CLLong)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long@
hs_bindgen_bfd63280c68460d2 = fmap fromFFIType hs_bindgen_bfd63280c68460d2_base
{-# NOINLINE explicit_signed_long_long #-}
{-| __C declaration:__ @explicit_signed_long_long@
__defined at:__ @comprehensive\/c2hsc.h 109:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long :: Ptr CLLong
{-| __C declaration:__ @explicit_signed_long_long@
__defined at:__ @comprehensive\/c2hsc.h 109:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long = unsafePerformIO hs_bindgen_bfd63280c68460d2
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long@
foreign import ccall unsafe "hs_bindgen_8654be9a041c2116" hs_bindgen_8654be9a041c2116_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long@
hs_bindgen_8654be9a041c2116 :: IO (Ptr CULLong)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long@
hs_bindgen_8654be9a041c2116 = fmap fromFFIType hs_bindgen_8654be9a041c2116_base
{-# NOINLINE unsigned_long_long #-}
{-| __C declaration:__ @unsigned_long_long@
__defined at:__ @comprehensive\/c2hsc.h 110:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long :: Ptr CULLong
{-| __C declaration:__ @unsigned_long_long@
__defined at:__ @comprehensive\/c2hsc.h 110:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long = unsafePerformIO hs_bindgen_8654be9a041c2116
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_void_pointer@
foreign import ccall unsafe "hs_bindgen_d6cafaa0834895a2" hs_bindgen_d6cafaa0834895a2_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_void_pointer@
hs_bindgen_d6cafaa0834895a2 :: IO (Ptr (Ptr Void))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_void_pointer@
hs_bindgen_d6cafaa0834895a2 = fmap fromFFIType hs_bindgen_d6cafaa0834895a2_base
{-# NOINLINE ordinary_void_pointer #-}
{-| Pointers: primitive types which cannot be signed
__C declaration:__ @ordinary_void_pointer@
__defined at:__ @comprehensive\/c2hsc.h 116:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_void_pointer :: Ptr (Ptr Void)
{-| Pointers: primitive types which cannot be signed
__C declaration:__ @ordinary_void_pointer@
__defined at:__ @comprehensive\/c2hsc.h 116:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_void_pointer = unsafePerformIO hs_bindgen_d6cafaa0834895a2
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_pointer@
foreign import ccall unsafe "hs_bindgen_35ef3ffa1a5167f7" hs_bindgen_35ef3ffa1a5167f7_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_pointer@
hs_bindgen_35ef3ffa1a5167f7 :: IO (Ptr (Ptr CFloat))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_pointer@
hs_bindgen_35ef3ffa1a5167f7 = fmap fromFFIType hs_bindgen_35ef3ffa1a5167f7_base
{-# NOINLINE ordinary_float_pointer #-}
{-| __C declaration:__ @ordinary_float_pointer@
__defined at:__ @comprehensive\/c2hsc.h 118:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float_pointer :: Ptr (Ptr CFloat)
{-| __C declaration:__ @ordinary_float_pointer@
__defined at:__ @comprehensive\/c2hsc.h 118:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float_pointer = unsafePerformIO hs_bindgen_35ef3ffa1a5167f7
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_pointer@
foreign import ccall unsafe "hs_bindgen_5e831159f7556399" hs_bindgen_5e831159f7556399_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_pointer@
hs_bindgen_5e831159f7556399 :: IO (Ptr (Ptr CDouble))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_pointer@
hs_bindgen_5e831159f7556399 = fmap fromFFIType hs_bindgen_5e831159f7556399_base
{-# NOINLINE ordinary_double_pointer #-}
{-| __C declaration:__ @ordinary_double_pointer@
__defined at:__ @comprehensive\/c2hsc.h 119:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double_pointer :: Ptr (Ptr CDouble)
{-| __C declaration:__ @ordinary_double_pointer@
__defined at:__ @comprehensive\/c2hsc.h 119:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double_pointer = unsafePerformIO hs_bindgen_5e831159f7556399
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_char_pointer@
foreign import ccall unsafe "hs_bindgen_08236e44cabe67f4" hs_bindgen_08236e44cabe67f4_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_char_pointer@
hs_bindgen_08236e44cabe67f4 :: IO (Ptr (Ptr CChar))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_char_pointer@
hs_bindgen_08236e44cabe67f4 = fmap fromFFIType hs_bindgen_08236e44cabe67f4_base
{-# NOINLINE ordinary_char_pointer #-}
{-| __C declaration:__ @ordinary_char_pointer@
__defined at:__ @comprehensive\/c2hsc.h 122:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_char_pointer :: Ptr (Ptr CChar)
{-| __C declaration:__ @ordinary_char_pointer@
__defined at:__ @comprehensive\/c2hsc.h 122:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_char_pointer = unsafePerformIO hs_bindgen_08236e44cabe67f4
-- __unique:__ @test_comprehensivec2hsc_Example_get_signed_char_pointer@
foreign import ccall unsafe "hs_bindgen_66d08eddc2fecb35" hs_bindgen_66d08eddc2fecb35_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_signed_char_pointer@
hs_bindgen_66d08eddc2fecb35 :: IO (Ptr (Ptr CSChar))
-- __unique:__ @test_comprehensivec2hsc_Example_get_signed_char_pointer@
hs_bindgen_66d08eddc2fecb35 = fmap fromFFIType hs_bindgen_66d08eddc2fecb35_base
{-# NOINLINE signed_char_pointer #-}
{-| __C declaration:__ @signed_char_pointer@
__defined at:__ @comprehensive\/c2hsc.h 123:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
signed_char_pointer :: Ptr (Ptr CSChar)
{-| __C declaration:__ @signed_char_pointer@
__defined at:__ @comprehensive\/c2hsc.h 123:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
signed_char_pointer = unsafePerformIO hs_bindgen_66d08eddc2fecb35
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_pointer@
foreign import ccall unsafe "hs_bindgen_5c76c506cb4fd78e" hs_bindgen_5c76c506cb4fd78e_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_pointer@
hs_bindgen_5c76c506cb4fd78e :: IO (Ptr (Ptr CUChar))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_pointer@
hs_bindgen_5c76c506cb4fd78e = fmap fromFFIType hs_bindgen_5c76c506cb4fd78e_base
{-# NOINLINE unsigned_char_pointer #-}
{-| __C declaration:__ @unsigned_char_pointer@
__defined at:__ @comprehensive\/c2hsc.h 124:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char_pointer :: Ptr (Ptr CUChar)
{-| __C declaration:__ @unsigned_char_pointer@
__defined at:__ @comprehensive\/c2hsc.h 124:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char_pointer = unsafePerformIO hs_bindgen_5c76c506cb4fd78e
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer@
foreign import ccall unsafe "hs_bindgen_cd114d033253fe37" hs_bindgen_cd114d033253fe37_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer@
hs_bindgen_cd114d033253fe37 :: IO (Ptr (Ptr CShort))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer@
hs_bindgen_cd114d033253fe37 = fmap fromFFIType hs_bindgen_cd114d033253fe37_base
{-# NOINLINE ordinary_signed_short_pointer #-}
{-| __C declaration:__ @ordinary_signed_short_pointer@
__defined at:__ @comprehensive\/c2hsc.h 126:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short_pointer :: Ptr (Ptr CShort)
{-| __C declaration:__ @ordinary_signed_short_pointer@
__defined at:__ @comprehensive\/c2hsc.h 126:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short_pointer = unsafePerformIO hs_bindgen_cd114d033253fe37
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer@
foreign import ccall unsafe "hs_bindgen_49ffa4c56ce34e2f" hs_bindgen_49ffa4c56ce34e2f_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer@
hs_bindgen_49ffa4c56ce34e2f :: IO (Ptr (Ptr CShort))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer@
hs_bindgen_49ffa4c56ce34e2f = fmap fromFFIType hs_bindgen_49ffa4c56ce34e2f_base
{-# NOINLINE explicit_signed_short_pointer #-}
{-| __C declaration:__ @explicit_signed_short_pointer@
__defined at:__ @comprehensive\/c2hsc.h 127:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short_pointer :: Ptr (Ptr CShort)
{-| __C declaration:__ @explicit_signed_short_pointer@
__defined at:__ @comprehensive\/c2hsc.h 127:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short_pointer = unsafePerformIO hs_bindgen_49ffa4c56ce34e2f
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_pointer@
foreign import ccall unsafe "hs_bindgen_fb80ad6945c7151d" hs_bindgen_fb80ad6945c7151d_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_pointer@
hs_bindgen_fb80ad6945c7151d :: IO (Ptr (Ptr CUShort))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_pointer@
hs_bindgen_fb80ad6945c7151d = fmap fromFFIType hs_bindgen_fb80ad6945c7151d_base
{-# NOINLINE unsigned_short_pointer #-}
{-| __C declaration:__ @unsigned_short_pointer@
__defined at:__ @comprehensive\/c2hsc.h 128:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short_pointer :: Ptr (Ptr CUShort)
{-| __C declaration:__ @unsigned_short_pointer@
__defined at:__ @comprehensive\/c2hsc.h 128:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short_pointer = unsafePerformIO hs_bindgen_fb80ad6945c7151d
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer@
foreign import ccall unsafe "hs_bindgen_dfef04ad64871bf8" hs_bindgen_dfef04ad64871bf8_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer@
hs_bindgen_dfef04ad64871bf8 :: IO (Ptr (Ptr CInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer@
hs_bindgen_dfef04ad64871bf8 = fmap fromFFIType hs_bindgen_dfef04ad64871bf8_base
{-# NOINLINE ordinary_signed_int_pointer #-}
{-| __C declaration:__ @ordinary_signed_int_pointer@
__defined at:__ @comprehensive\/c2hsc.h 130:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int_pointer :: Ptr (Ptr CInt)
{-| __C declaration:__ @ordinary_signed_int_pointer@
__defined at:__ @comprehensive\/c2hsc.h 130:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int_pointer = unsafePerformIO hs_bindgen_dfef04ad64871bf8
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer@
foreign import ccall unsafe "hs_bindgen_515d5232453c4285" hs_bindgen_515d5232453c4285_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer@
hs_bindgen_515d5232453c4285 :: IO (Ptr (Ptr CInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer@
hs_bindgen_515d5232453c4285 = fmap fromFFIType hs_bindgen_515d5232453c4285_base
{-# NOINLINE explicit_signed_int_pointer #-}
{-| __C declaration:__ @explicit_signed_int_pointer@
__defined at:__ @comprehensive\/c2hsc.h 131:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int_pointer :: Ptr (Ptr CInt)
{-| __C declaration:__ @explicit_signed_int_pointer@
__defined at:__ @comprehensive\/c2hsc.h 131:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int_pointer = unsafePerformIO hs_bindgen_515d5232453c4285
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_pointer@
foreign import ccall unsafe "hs_bindgen_9f2724dae8d3b3fa" hs_bindgen_9f2724dae8d3b3fa_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_pointer@
hs_bindgen_9f2724dae8d3b3fa :: IO (Ptr (Ptr CUInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_pointer@
hs_bindgen_9f2724dae8d3b3fa = fmap fromFFIType hs_bindgen_9f2724dae8d3b3fa_base
{-# NOINLINE unsigned_int_pointer #-}
{-| __C declaration:__ @unsigned_int_pointer@
__defined at:__ @comprehensive\/c2hsc.h 132:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int_pointer :: Ptr (Ptr CUInt)
{-| __C declaration:__ @unsigned_int_pointer@
__defined at:__ @comprehensive\/c2hsc.h 132:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int_pointer = unsafePerformIO hs_bindgen_9f2724dae8d3b3fa
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer@
foreign import ccall unsafe "hs_bindgen_a6b4a786a6644424" hs_bindgen_a6b4a786a6644424_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer@
hs_bindgen_a6b4a786a6644424 :: IO (Ptr (Ptr CLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer@
hs_bindgen_a6b4a786a6644424 = fmap fromFFIType hs_bindgen_a6b4a786a6644424_base
{-# NOINLINE ordinary_signed_long_pointer #-}
{-| __C declaration:__ @ordinary_signed_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 134:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_pointer :: Ptr (Ptr CLong)
{-| __C declaration:__ @ordinary_signed_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 134:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_pointer = unsafePerformIO hs_bindgen_a6b4a786a6644424
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer@
foreign import ccall unsafe "hs_bindgen_4df40729ac557753" hs_bindgen_4df40729ac557753_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer@
hs_bindgen_4df40729ac557753 :: IO (Ptr (Ptr CLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer@
hs_bindgen_4df40729ac557753 = fmap fromFFIType hs_bindgen_4df40729ac557753_base
{-# NOINLINE explicit_signed_long_pointer #-}
{-| __C declaration:__ @explicit_signed_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 135:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_pointer :: Ptr (Ptr CLong)
{-| __C declaration:__ @explicit_signed_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 135:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_pointer = unsafePerformIO hs_bindgen_4df40729ac557753
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_pointer@
foreign import ccall unsafe "hs_bindgen_30379268a6bf43b0" hs_bindgen_30379268a6bf43b0_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_pointer@
hs_bindgen_30379268a6bf43b0 :: IO (Ptr (Ptr CULong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_pointer@
hs_bindgen_30379268a6bf43b0 = fmap fromFFIType hs_bindgen_30379268a6bf43b0_base
{-# NOINLINE unsigned_long_pointer #-}
{-| __C declaration:__ @unsigned_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 136:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_pointer :: Ptr (Ptr CULong)
{-| __C declaration:__ @unsigned_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 136:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_pointer = unsafePerformIO hs_bindgen_30379268a6bf43b0
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer@
foreign import ccall unsafe "hs_bindgen_63dedd7015d9ed47" hs_bindgen_63dedd7015d9ed47_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer@
hs_bindgen_63dedd7015d9ed47 :: IO (Ptr (Ptr CLLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer@
hs_bindgen_63dedd7015d9ed47 = fmap fromFFIType hs_bindgen_63dedd7015d9ed47_base
{-# NOINLINE ordinary_signed_long_long_pointer #-}
{-| __C declaration:__ @ordinary_signed_long_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 138:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long_pointer :: Ptr (Ptr CLLong)
{-| __C declaration:__ @ordinary_signed_long_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 138:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long_pointer = unsafePerformIO hs_bindgen_63dedd7015d9ed47
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer@
foreign import ccall unsafe "hs_bindgen_9f47ed329f79e647" hs_bindgen_9f47ed329f79e647_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer@
hs_bindgen_9f47ed329f79e647 :: IO (Ptr (Ptr CLLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer@
hs_bindgen_9f47ed329f79e647 = fmap fromFFIType hs_bindgen_9f47ed329f79e647_base
{-# NOINLINE explicit_signed_long_long_pointer #-}
{-| __C declaration:__ @explicit_signed_long_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 139:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long_pointer :: Ptr (Ptr CLLong)
{-| __C declaration:__ @explicit_signed_long_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 139:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long_pointer = unsafePerformIO hs_bindgen_9f47ed329f79e647
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer@
foreign import ccall unsafe "hs_bindgen_7d2dd0a78dde4b41" hs_bindgen_7d2dd0a78dde4b41_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer@
hs_bindgen_7d2dd0a78dde4b41 :: IO (Ptr (Ptr CULLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer@
hs_bindgen_7d2dd0a78dde4b41 = fmap fromFFIType hs_bindgen_7d2dd0a78dde4b41_base
{-# NOINLINE unsigned_long_long_pointer #-}
{-| __C declaration:__ @unsigned_long_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 140:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long_pointer :: Ptr (Ptr CULLong)
{-| __C declaration:__ @unsigned_long_long_pointer@
__defined at:__ @comprehensive\/c2hsc.h 140:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long_pointer = unsafePerformIO hs_bindgen_7d2dd0a78dde4b41
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_array@
foreign import ccall unsafe "hs_bindgen_dbf314f660deda12" hs_bindgen_dbf314f660deda12_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_array@
hs_bindgen_dbf314f660deda12 :: IO (Ptr (ConstantArray 10 CFloat))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_array@
hs_bindgen_dbf314f660deda12 = fmap fromFFIType hs_bindgen_dbf314f660deda12_base
{-# NOINLINE ordinary_float_array #-}
{-| Arrays: primitive types which cannot be signed
__C declaration:__ @ordinary_float_array@
__defined at:__ @comprehensive\/c2hsc.h 146:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float_array :: Ptr (ConstantArray 10 CFloat)
{-| Arrays: primitive types which cannot be signed
__C declaration:__ @ordinary_float_array@
__defined at:__ @comprehensive\/c2hsc.h 146:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float_array = unsafePerformIO hs_bindgen_dbf314f660deda12
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_array@
foreign import ccall unsafe "hs_bindgen_d554c83416b4ffaa" hs_bindgen_d554c83416b4ffaa_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_array@
hs_bindgen_d554c83416b4ffaa :: IO (Ptr (ConstantArray 10 CDouble))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_array@
hs_bindgen_d554c83416b4ffaa = fmap fromFFIType hs_bindgen_d554c83416b4ffaa_base
{-# NOINLINE ordinary_double_array #-}
{-| __C declaration:__ @ordinary_double_array@
__defined at:__ @comprehensive\/c2hsc.h 147:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double_array :: Ptr (ConstantArray 10 CDouble)
{-| __C declaration:__ @ordinary_double_array@
__defined at:__ @comprehensive\/c2hsc.h 147:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double_array = unsafePerformIO hs_bindgen_d554c83416b4ffaa
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_char_array@
foreign import ccall unsafe "hs_bindgen_9a57c94ff3fad985" hs_bindgen_9a57c94ff3fad985_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_char_array@
hs_bindgen_9a57c94ff3fad985 :: IO (Ptr (ConstantArray 10 CChar))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_char_array@
hs_bindgen_9a57c94ff3fad985 = fmap fromFFIType hs_bindgen_9a57c94ff3fad985_base
{-# NOINLINE ordinary_signed_char_array #-}
{-| __C declaration:__ @ordinary_signed_char_array@
__defined at:__ @comprehensive\/c2hsc.h 150:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_char_array :: Ptr (ConstantArray 10 CChar)
{-| __C declaration:__ @ordinary_signed_char_array@
__defined at:__ @comprehensive\/c2hsc.h 150:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_char_array = unsafePerformIO hs_bindgen_9a57c94ff3fad985
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_char_array@
foreign import ccall unsafe "hs_bindgen_335217e9e2c8fe6a" hs_bindgen_335217e9e2c8fe6a_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_char_array@
hs_bindgen_335217e9e2c8fe6a :: IO (Ptr (ConstantArray 10 CSChar))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_char_array@
hs_bindgen_335217e9e2c8fe6a = fmap fromFFIType hs_bindgen_335217e9e2c8fe6a_base
{-# NOINLINE explicit_signed_char_array #-}
{-| __C declaration:__ @explicit_signed_char_array@
__defined at:__ @comprehensive\/c2hsc.h 151:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_char_array :: Ptr (ConstantArray 10 CSChar)
{-| __C declaration:__ @explicit_signed_char_array@
__defined at:__ @comprehensive\/c2hsc.h 151:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_char_array = unsafePerformIO hs_bindgen_335217e9e2c8fe6a
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_array@
foreign import ccall unsafe "hs_bindgen_1e72daddbfe2b7ac" hs_bindgen_1e72daddbfe2b7ac_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_array@
hs_bindgen_1e72daddbfe2b7ac :: IO (Ptr (ConstantArray 10 CUChar))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_array@
hs_bindgen_1e72daddbfe2b7ac = fmap fromFFIType hs_bindgen_1e72daddbfe2b7ac_base
{-# NOINLINE unsigned_char_array #-}
{-| __C declaration:__ @unsigned_char_array@
__defined at:__ @comprehensive\/c2hsc.h 152:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char_array :: Ptr (ConstantArray 10 CUChar)
{-| __C declaration:__ @unsigned_char_array@
__defined at:__ @comprehensive\/c2hsc.h 152:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char_array = unsafePerformIO hs_bindgen_1e72daddbfe2b7ac
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_array@
foreign import ccall unsafe "hs_bindgen_109462175baa2bdf" hs_bindgen_109462175baa2bdf_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_array@
hs_bindgen_109462175baa2bdf :: IO (Ptr (ConstantArray 10 CShort))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_array@
hs_bindgen_109462175baa2bdf = fmap fromFFIType hs_bindgen_109462175baa2bdf_base
{-# NOINLINE ordinary_signed_short_array #-}
{-| __C declaration:__ @ordinary_signed_short_array@
__defined at:__ @comprehensive\/c2hsc.h 154:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short_array :: Ptr (ConstantArray 10 CShort)
{-| __C declaration:__ @ordinary_signed_short_array@
__defined at:__ @comprehensive\/c2hsc.h 154:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short_array = unsafePerformIO hs_bindgen_109462175baa2bdf
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_array@
foreign import ccall unsafe "hs_bindgen_50f788c18928793d" hs_bindgen_50f788c18928793d_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_array@
hs_bindgen_50f788c18928793d :: IO (Ptr (ConstantArray 10 CShort))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_array@
hs_bindgen_50f788c18928793d = fmap fromFFIType hs_bindgen_50f788c18928793d_base
{-# NOINLINE explicit_signed_short_array #-}
{-| __C declaration:__ @explicit_signed_short_array@
__defined at:__ @comprehensive\/c2hsc.h 155:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short_array :: Ptr (ConstantArray 10 CShort)
{-| __C declaration:__ @explicit_signed_short_array@
__defined at:__ @comprehensive\/c2hsc.h 155:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short_array = unsafePerformIO hs_bindgen_50f788c18928793d
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_array@
foreign import ccall unsafe "hs_bindgen_d5ccc3314ab2eb42" hs_bindgen_d5ccc3314ab2eb42_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_array@
hs_bindgen_d5ccc3314ab2eb42 :: IO (Ptr (ConstantArray 10 CUShort))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_array@
hs_bindgen_d5ccc3314ab2eb42 = fmap fromFFIType hs_bindgen_d5ccc3314ab2eb42_base
{-# NOINLINE unsigned_short_array #-}
{-| __C declaration:__ @unsigned_short_array@
__defined at:__ @comprehensive\/c2hsc.h 156:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short_array :: Ptr (ConstantArray 10 CUShort)
{-| __C declaration:__ @unsigned_short_array@
__defined at:__ @comprehensive\/c2hsc.h 156:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short_array = unsafePerformIO hs_bindgen_d5ccc3314ab2eb42
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_array@
foreign import ccall unsafe "hs_bindgen_f7824c4ee10b0b90" hs_bindgen_f7824c4ee10b0b90_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_array@
hs_bindgen_f7824c4ee10b0b90 :: IO (Ptr (ConstantArray 10 CInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_array@
hs_bindgen_f7824c4ee10b0b90 = fmap fromFFIType hs_bindgen_f7824c4ee10b0b90_base
{-# NOINLINE ordinary_signed_int_array #-}
{-| __C declaration:__ @ordinary_signed_int_array@
__defined at:__ @comprehensive\/c2hsc.h 158:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int_array :: Ptr (ConstantArray 10 CInt)
{-| __C declaration:__ @ordinary_signed_int_array@
__defined at:__ @comprehensive\/c2hsc.h 158:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int_array = unsafePerformIO hs_bindgen_f7824c4ee10b0b90
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_array@
foreign import ccall unsafe "hs_bindgen_448c7a47209c8b7a" hs_bindgen_448c7a47209c8b7a_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_array@
hs_bindgen_448c7a47209c8b7a :: IO (Ptr (ConstantArray 10 CInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_array@
hs_bindgen_448c7a47209c8b7a = fmap fromFFIType hs_bindgen_448c7a47209c8b7a_base
{-# NOINLINE explicit_signed_int_array #-}
{-| __C declaration:__ @explicit_signed_int_array@
__defined at:__ @comprehensive\/c2hsc.h 159:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int_array :: Ptr (ConstantArray 10 CInt)
{-| __C declaration:__ @explicit_signed_int_array@
__defined at:__ @comprehensive\/c2hsc.h 159:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int_array = unsafePerformIO hs_bindgen_448c7a47209c8b7a
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_array@
foreign import ccall unsafe "hs_bindgen_66499a8ae9382b9e" hs_bindgen_66499a8ae9382b9e_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_array@
hs_bindgen_66499a8ae9382b9e :: IO (Ptr (ConstantArray 10 CUInt))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_array@
hs_bindgen_66499a8ae9382b9e = fmap fromFFIType hs_bindgen_66499a8ae9382b9e_base
{-# NOINLINE unsigned_int_array #-}
{-| __C declaration:__ @unsigned_int_array@
__defined at:__ @comprehensive\/c2hsc.h 160:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int_array :: Ptr (ConstantArray 10 CUInt)
{-| __C declaration:__ @unsigned_int_array@
__defined at:__ @comprehensive\/c2hsc.h 160:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int_array = unsafePerformIO hs_bindgen_66499a8ae9382b9e
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_array@
foreign import ccall unsafe "hs_bindgen_896d3ba25d886356" hs_bindgen_896d3ba25d886356_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_array@
hs_bindgen_896d3ba25d886356 :: IO (Ptr (ConstantArray 10 CLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_array@
hs_bindgen_896d3ba25d886356 = fmap fromFFIType hs_bindgen_896d3ba25d886356_base
{-# NOINLINE ordinary_signed_long_array #-}
{-| __C declaration:__ @ordinary_signed_long_array@
__defined at:__ @comprehensive\/c2hsc.h 162:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_array :: Ptr (ConstantArray 10 CLong)
{-| __C declaration:__ @ordinary_signed_long_array@
__defined at:__ @comprehensive\/c2hsc.h 162:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_array = unsafePerformIO hs_bindgen_896d3ba25d886356
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_array@
foreign import ccall unsafe "hs_bindgen_c4ec5e2d6cf5b5ed" hs_bindgen_c4ec5e2d6cf5b5ed_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_array@
hs_bindgen_c4ec5e2d6cf5b5ed :: IO (Ptr (ConstantArray 10 CLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_array@
hs_bindgen_c4ec5e2d6cf5b5ed = fmap fromFFIType hs_bindgen_c4ec5e2d6cf5b5ed_base
{-# NOINLINE explicit_signed_long_array #-}
{-| __C declaration:__ @explicit_signed_long_array@
__defined at:__ @comprehensive\/c2hsc.h 163:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_array :: Ptr (ConstantArray 10 CLong)
{-| __C declaration:__ @explicit_signed_long_array@
__defined at:__ @comprehensive\/c2hsc.h 163:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_array = unsafePerformIO hs_bindgen_c4ec5e2d6cf5b5ed
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_array@
foreign import ccall unsafe "hs_bindgen_e3fb79df55414b09" hs_bindgen_e3fb79df55414b09_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_array@
hs_bindgen_e3fb79df55414b09 :: IO (Ptr (ConstantArray 10 CULong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_array@
hs_bindgen_e3fb79df55414b09 = fmap fromFFIType hs_bindgen_e3fb79df55414b09_base
{-# NOINLINE unsigned_long_array #-}
{-| __C declaration:__ @unsigned_long_array@
__defined at:__ @comprehensive\/c2hsc.h 164:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_array :: Ptr (ConstantArray 10 CULong)
{-| __C declaration:__ @unsigned_long_array@
__defined at:__ @comprehensive\/c2hsc.h 164:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_array = unsafePerformIO hs_bindgen_e3fb79df55414b09
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_array@
foreign import ccall unsafe "hs_bindgen_02c15bdcdfc54945" hs_bindgen_02c15bdcdfc54945_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_array@
hs_bindgen_02c15bdcdfc54945 :: IO (Ptr (ConstantArray 10 CLLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_array@
hs_bindgen_02c15bdcdfc54945 = fmap fromFFIType hs_bindgen_02c15bdcdfc54945_base
{-# NOINLINE ordinary_signed_long_long_array #-}
{-| __C declaration:__ @ordinary_signed_long_long_array@
__defined at:__ @comprehensive\/c2hsc.h 166:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long_array :: Ptr (ConstantArray 10 CLLong)
{-| __C declaration:__ @ordinary_signed_long_long_array@
__defined at:__ @comprehensive\/c2hsc.h 166:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long_array = unsafePerformIO hs_bindgen_02c15bdcdfc54945
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_array@
foreign import ccall unsafe "hs_bindgen_4c934e5832898551" hs_bindgen_4c934e5832898551_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_array@
hs_bindgen_4c934e5832898551 :: IO (Ptr (ConstantArray 10 CLLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_array@
hs_bindgen_4c934e5832898551 = fmap fromFFIType hs_bindgen_4c934e5832898551_base
{-# NOINLINE explicit_signed_long_long_array #-}
{-| __C declaration:__ @explicit_signed_long_long_array@
__defined at:__ @comprehensive\/c2hsc.h 167:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long_array :: Ptr (ConstantArray 10 CLLong)
{-| __C declaration:__ @explicit_signed_long_long_array@
__defined at:__ @comprehensive\/c2hsc.h 167:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long_array = unsafePerformIO hs_bindgen_4c934e5832898551
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_array@
foreign import ccall unsafe "hs_bindgen_af47cf5cc0016405" hs_bindgen_af47cf5cc0016405_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_array@
hs_bindgen_af47cf5cc0016405 :: IO (Ptr (ConstantArray 10 CULLong))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_array@
hs_bindgen_af47cf5cc0016405 = fmap fromFFIType hs_bindgen_af47cf5cc0016405_base
{-# NOINLINE unsigned_long_long_array #-}
{-| __C declaration:__ @unsigned_long_long_array@
__defined at:__ @comprehensive\/c2hsc.h 168:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long_array :: Ptr (ConstantArray 10 CULLong)
{-| __C declaration:__ @unsigned_long_long_array@
__defined at:__ @comprehensive\/c2hsc.h 168:20@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long_array = unsafePerformIO hs_bindgen_af47cf5cc0016405
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_void_pointer_array@
foreign import ccall unsafe "hs_bindgen_b0da135021f97e27" hs_bindgen_b0da135021f97e27_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_void_pointer_array@
hs_bindgen_b0da135021f97e27 :: IO (Ptr (ConstantArray 10
(Ptr Void)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_void_pointer_array@
hs_bindgen_b0da135021f97e27 = fmap fromFFIType hs_bindgen_b0da135021f97e27_base
{-# NOINLINE ordinary_void_pointer_array #-}
{-| Arrays of pointers
__C declaration:__ @ordinary_void_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 174:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_void_pointer_array :: Ptr (ConstantArray 10 (Ptr Void))
{-| Arrays of pointers
__C declaration:__ @ordinary_void_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 174:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_void_pointer_array = unsafePerformIO hs_bindgen_b0da135021f97e27
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_pointer_array@
foreign import ccall unsafe "hs_bindgen_41ce3a49f177f5a8" hs_bindgen_41ce3a49f177f5a8_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_pointer_array@
hs_bindgen_41ce3a49f177f5a8 :: IO (Ptr (ConstantArray 10
(Ptr CFloat)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_float_pointer_array@
hs_bindgen_41ce3a49f177f5a8 = fmap fromFFIType hs_bindgen_41ce3a49f177f5a8_base
{-# NOINLINE ordinary_float_pointer_array #-}
{-| __C declaration:__ @ordinary_float_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 176:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float_pointer_array :: Ptr (ConstantArray 10 (Ptr CFloat))
{-| __C declaration:__ @ordinary_float_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 176:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_float_pointer_array = unsafePerformIO hs_bindgen_41ce3a49f177f5a8
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_pointer_array@
foreign import ccall unsafe "hs_bindgen_cfe3890477df51c8" hs_bindgen_cfe3890477df51c8_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_pointer_array@
hs_bindgen_cfe3890477df51c8 :: IO (Ptr (ConstantArray 10
(Ptr CDouble)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_double_pointer_array@
hs_bindgen_cfe3890477df51c8 = fmap fromFFIType hs_bindgen_cfe3890477df51c8_base
{-# NOINLINE ordinary_double_pointer_array #-}
{-| __C declaration:__ @ordinary_double_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 177:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double_pointer_array :: Ptr (ConstantArray 10
(Ptr CDouble))
{-| __C declaration:__ @ordinary_double_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 177:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_double_pointer_array = unsafePerformIO hs_bindgen_cfe3890477df51c8
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_char_pointer_array@
foreign import ccall unsafe "hs_bindgen_e92be5e29785f22b" hs_bindgen_e92be5e29785f22b_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_char_pointer_array@
hs_bindgen_e92be5e29785f22b :: IO (Ptr (ConstantArray 10
(Ptr CChar)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_char_pointer_array@
hs_bindgen_e92be5e29785f22b = fmap fromFFIType hs_bindgen_e92be5e29785f22b_base
{-# NOINLINE ordinary_signed_char_pointer_array #-}
{-| __C declaration:__ @ordinary_signed_char_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 180:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_char_pointer_array :: Ptr (ConstantArray 10
(Ptr CChar))
{-| __C declaration:__ @ordinary_signed_char_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 180:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_char_pointer_array = unsafePerformIO hs_bindgen_e92be5e29785f22b
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_char_pointer_array@
foreign import ccall unsafe "hs_bindgen_c8caf99249e8ad58" hs_bindgen_c8caf99249e8ad58_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_char_pointer_array@
hs_bindgen_c8caf99249e8ad58 :: IO (Ptr (ConstantArray 10
(Ptr CSChar)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_char_pointer_array@
hs_bindgen_c8caf99249e8ad58 = fmap fromFFIType hs_bindgen_c8caf99249e8ad58_base
{-# NOINLINE explicit_signed_char_pointer_array #-}
{-| __C declaration:__ @explicit_signed_char_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 181:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_char_pointer_array :: Ptr (ConstantArray 10
(Ptr CSChar))
{-| __C declaration:__ @explicit_signed_char_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 181:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_char_pointer_array = unsafePerformIO hs_bindgen_c8caf99249e8ad58
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_pointer_array@
foreign import ccall unsafe "hs_bindgen_7028963176c7a21d" hs_bindgen_7028963176c7a21d_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_pointer_array@
hs_bindgen_7028963176c7a21d :: IO (Ptr (ConstantArray 10
(Ptr CUChar)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_char_pointer_array@
hs_bindgen_7028963176c7a21d = fmap fromFFIType hs_bindgen_7028963176c7a21d_base
{-# NOINLINE unsigned_char_pointer_array #-}
{-| __C declaration:__ @unsigned_char_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 182:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char_pointer_array :: Ptr (ConstantArray 10 (Ptr CUChar))
{-| __C declaration:__ @unsigned_char_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 182:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_char_pointer_array = unsafePerformIO hs_bindgen_7028963176c7a21d
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer_array@
foreign import ccall unsafe "hs_bindgen_1866849231d566a0" hs_bindgen_1866849231d566a0_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer_array@
hs_bindgen_1866849231d566a0 :: IO (Ptr (ConstantArray 10
(Ptr CShort)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_short_pointer_array@
hs_bindgen_1866849231d566a0 = fmap fromFFIType hs_bindgen_1866849231d566a0_base
{-# NOINLINE ordinary_signed_short_pointer_array #-}
{-| __C declaration:__ @ordinary_signed_short_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 184:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short_pointer_array :: Ptr (ConstantArray 10
(Ptr CShort))
{-| __C declaration:__ @ordinary_signed_short_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 184:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_short_pointer_array = unsafePerformIO hs_bindgen_1866849231d566a0
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer_array@
foreign import ccall unsafe "hs_bindgen_68ed6d444e1b6011" hs_bindgen_68ed6d444e1b6011_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer_array@
hs_bindgen_68ed6d444e1b6011 :: IO (Ptr (ConstantArray 10
(Ptr CShort)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_short_pointer_array@
hs_bindgen_68ed6d444e1b6011 = fmap fromFFIType hs_bindgen_68ed6d444e1b6011_base
{-# NOINLINE explicit_signed_short_pointer_array #-}
{-| __C declaration:__ @explicit_signed_short_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 185:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short_pointer_array :: Ptr (ConstantArray 10
(Ptr CShort))
{-| __C declaration:__ @explicit_signed_short_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 185:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_short_pointer_array = unsafePerformIO hs_bindgen_68ed6d444e1b6011
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_pointer_array@
foreign import ccall unsafe "hs_bindgen_7c0ca48c3269649a" hs_bindgen_7c0ca48c3269649a_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_pointer_array@
hs_bindgen_7c0ca48c3269649a :: IO (Ptr (ConstantArray 10
(Ptr CUShort)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_short_pointer_array@
hs_bindgen_7c0ca48c3269649a = fmap fromFFIType hs_bindgen_7c0ca48c3269649a_base
{-# NOINLINE unsigned_short_pointer_array #-}
{-| __C declaration:__ @unsigned_short_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 186:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short_pointer_array :: Ptr (ConstantArray 10
(Ptr CUShort))
{-| __C declaration:__ @unsigned_short_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 186:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_short_pointer_array = unsafePerformIO hs_bindgen_7c0ca48c3269649a
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer_array@
foreign import ccall unsafe "hs_bindgen_58e6503e8ccbeb70" hs_bindgen_58e6503e8ccbeb70_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer_array@
hs_bindgen_58e6503e8ccbeb70 :: IO (Ptr (ConstantArray 10
(Ptr CInt)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_int_pointer_array@
hs_bindgen_58e6503e8ccbeb70 = fmap fromFFIType hs_bindgen_58e6503e8ccbeb70_base
{-# NOINLINE ordinary_signed_int_pointer_array #-}
{-| __C declaration:__ @ordinary_signed_int_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 188:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int_pointer_array :: Ptr (ConstantArray 10
(Ptr CInt))
{-| __C declaration:__ @ordinary_signed_int_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 188:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_int_pointer_array = unsafePerformIO hs_bindgen_58e6503e8ccbeb70
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer_array@
foreign import ccall unsafe "hs_bindgen_21b8395de873bc0a" hs_bindgen_21b8395de873bc0a_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer_array@
hs_bindgen_21b8395de873bc0a :: IO (Ptr (ConstantArray 10
(Ptr CInt)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_int_pointer_array@
hs_bindgen_21b8395de873bc0a = fmap fromFFIType hs_bindgen_21b8395de873bc0a_base
{-# NOINLINE explicit_signed_int_pointer_array #-}
{-| __C declaration:__ @explicit_signed_int_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 189:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int_pointer_array :: Ptr (ConstantArray 10
(Ptr CInt))
{-| __C declaration:__ @explicit_signed_int_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 189:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_int_pointer_array = unsafePerformIO hs_bindgen_21b8395de873bc0a
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_pointer_array@
foreign import ccall unsafe "hs_bindgen_667d31d5b7b5106e" hs_bindgen_667d31d5b7b5106e_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_pointer_array@
hs_bindgen_667d31d5b7b5106e :: IO (Ptr (ConstantArray 10
(Ptr CUInt)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_int_pointer_array@
hs_bindgen_667d31d5b7b5106e = fmap fromFFIType hs_bindgen_667d31d5b7b5106e_base
{-# NOINLINE unsigned_int_pointer_array #-}
{-| __C declaration:__ @unsigned_int_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 190:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int_pointer_array :: Ptr (ConstantArray 10 (Ptr CUInt))
{-| __C declaration:__ @unsigned_int_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 190:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_int_pointer_array = unsafePerformIO hs_bindgen_667d31d5b7b5106e
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer_array@
foreign import ccall unsafe "hs_bindgen_eb34bb7d213dcd3d" hs_bindgen_eb34bb7d213dcd3d_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer_array@
hs_bindgen_eb34bb7d213dcd3d :: IO (Ptr (ConstantArray 10
(Ptr CLong)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_pointer_array@
hs_bindgen_eb34bb7d213dcd3d = fmap fromFFIType hs_bindgen_eb34bb7d213dcd3d_base
{-# NOINLINE ordinary_signed_long_pointer_array #-}
{-| __C declaration:__ @ordinary_signed_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 192:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_pointer_array :: Ptr (ConstantArray 10
(Ptr CLong))
{-| __C declaration:__ @ordinary_signed_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 192:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_pointer_array = unsafePerformIO hs_bindgen_eb34bb7d213dcd3d
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer_array@
foreign import ccall unsafe "hs_bindgen_3386ff9d0e54545d" hs_bindgen_3386ff9d0e54545d_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer_array@
hs_bindgen_3386ff9d0e54545d :: IO (Ptr (ConstantArray 10
(Ptr CLong)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_pointer_array@
hs_bindgen_3386ff9d0e54545d = fmap fromFFIType hs_bindgen_3386ff9d0e54545d_base
{-# NOINLINE explicit_signed_long_pointer_array #-}
{-| __C declaration:__ @explicit_signed_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 193:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_pointer_array :: Ptr (ConstantArray 10
(Ptr CLong))
{-| __C declaration:__ @explicit_signed_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 193:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_pointer_array = unsafePerformIO hs_bindgen_3386ff9d0e54545d
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_pointer_array@
foreign import ccall unsafe "hs_bindgen_510be86496a28c91" hs_bindgen_510be86496a28c91_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_pointer_array@
hs_bindgen_510be86496a28c91 :: IO (Ptr (ConstantArray 10
(Ptr CULong)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_pointer_array@
hs_bindgen_510be86496a28c91 = fmap fromFFIType hs_bindgen_510be86496a28c91_base
{-# NOINLINE unsigned_long_pointer_array #-}
{-| __C declaration:__ @unsigned_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 194:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_pointer_array :: Ptr (ConstantArray 10 (Ptr CULong))
{-| __C declaration:__ @unsigned_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 194:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_pointer_array = unsafePerformIO hs_bindgen_510be86496a28c91
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer_array@
foreign import ccall unsafe "hs_bindgen_25f60aa140d341a7" hs_bindgen_25f60aa140d341a7_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer_array@
hs_bindgen_25f60aa140d341a7 :: IO (Ptr (ConstantArray 10
(Ptr CLLong)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_ordinary_signed_long_long_pointer_array@
hs_bindgen_25f60aa140d341a7 = fmap fromFFIType hs_bindgen_25f60aa140d341a7_base
{-# NOINLINE ordinary_signed_long_long_pointer_array #-}
{-| __C declaration:__ @ordinary_signed_long_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 196:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long_pointer_array :: Ptr (ConstantArray 10
(Ptr CLLong))
{-| __C declaration:__ @ordinary_signed_long_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 196:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
ordinary_signed_long_long_pointer_array = unsafePerformIO hs_bindgen_25f60aa140d341a7
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer_array@
foreign import ccall unsafe "hs_bindgen_aced8afe33f53905" hs_bindgen_aced8afe33f53905_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer_array@
hs_bindgen_aced8afe33f53905 :: IO (Ptr (ConstantArray 10
(Ptr CLLong)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_explicit_signed_long_long_pointer_array@
hs_bindgen_aced8afe33f53905 = fmap fromFFIType hs_bindgen_aced8afe33f53905_base
{-# NOINLINE explicit_signed_long_long_pointer_array #-}
{-| __C declaration:__ @explicit_signed_long_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 197:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long_pointer_array :: Ptr (ConstantArray 10
(Ptr CLLong))
{-| __C declaration:__ @explicit_signed_long_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 197:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
explicit_signed_long_long_pointer_array = unsafePerformIO hs_bindgen_aced8afe33f53905
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer_array@
foreign import ccall unsafe "hs_bindgen_9534a7c84390edc4" hs_bindgen_9534a7c84390edc4_base ::
IO (Ptr Void)
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer_array@
hs_bindgen_9534a7c84390edc4 :: IO (Ptr (ConstantArray 10
(Ptr CULLong)))
-- __unique:__ @test_comprehensivec2hsc_Example_get_unsigned_long_long_pointer_array@
hs_bindgen_9534a7c84390edc4 = fmap fromFFIType hs_bindgen_9534a7c84390edc4_base
{-# NOINLINE unsigned_long_long_pointer_array #-}
{-| __C declaration:__ @unsigned_long_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 198:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long_pointer_array :: Ptr (ConstantArray 10
(Ptr CULLong))
{-| __C declaration:__ @unsigned_long_long_pointer_array@
__defined at:__ @comprehensive\/c2hsc.h 198:21@
__exported by:__ @comprehensive\/c2hsc.h@
-}
unsigned_long_long_pointer_array = unsafePerformIO hs_bindgen_9534a7c84390edc4