hs-bindgen-1.0.0.0: test-artefacts/fixtures/arrays/const_qualifier/Example/Unsafe.hs

{-# LANGUAGE DataKinds #-}
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_HADDOCK prune #-}

module Example.Unsafe
    ( Example.Unsafe.foo
    , Example.Unsafe.fooA
    , Example.Unsafe.fooB
    , Example.Unsafe.fooC
    , Example.Unsafe.bar
    , Example.Unsafe.barA
    , Example.Unsafe.barB
    , Example.Unsafe.barC
    , Example.Unsafe.baz
    , Example.Unsafe.bazA
    , Example.Unsafe.bazB
    , Example.Unsafe.bazC
    )
  where

import qualified HsBindgen.Runtime.ConstantArray as CA
import qualified HsBindgen.Runtime.IncompleteArray as IA
import qualified HsBindgen.Runtime.IsArray as IsA
import qualified HsBindgen.Runtime.PtrConst as PtrConst
import qualified HsBindgen.Runtime.Support as BG
import qualified HsBindgen.Runtime.Support.CAPI
import Example
import Prelude (IO)

$(HsBindgen.Runtime.Support.CAPI.addCSource (HsBindgen.Runtime.Support.CAPI.unlines
  [ "#include <arrays/const_qualifier.h>"
  , "void hs_bindgen_7eb8358d30ebb28b ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (foo)(arg1);"
  , "}"
  , "void hs_bindgen_2fc1970fe11a3461 ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (fooA)(arg1);"
  , "}"
  , "void hs_bindgen_58689a7e4b1d44f6 ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (fooB)(arg1);"
  , "}"
  , "void hs_bindgen_f88b417ee6e28c0c ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (fooC)(arg1);"
  , "}"
  , "void hs_bindgen_78493aa01e9cc5da ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (bar)(arg1);"
  , "}"
  , "void hs_bindgen_bee2c20f290d25d6 ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (barA)(arg1);"
  , "}"
  , "void hs_bindgen_71f805899a96d9f1 ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (barB)(arg1);"
  , "}"
  , "void hs_bindgen_89af56a24c359834 ("
  , "  signed int const *arg1"
  , ")"
  , "{"
  , "  (barC)(arg1);"
  , "}"
  , "void hs_bindgen_71d7d347923cf6e5 ("
  , "  signed int const (*arg1)[3]"
  , ")"
  , "{"
  , "  (baz)(arg1);"
  , "}"
  , "void hs_bindgen_25cc50be574bcc6c ("
  , "  W *arg1"
  , ")"
  , "{"
  , "  (bazA)(arg1);"
  , "}"
  , "void hs_bindgen_3fd3913cc13f61be ("
  , "  W const *arg1"
  , ")"
  , "{"
  , "  (bazB)(arg1);"
  , "}"
  , "void hs_bindgen_a91ac27216749da9 ("
  , "  X const *arg1"
  , ")"
  , "{"
  , "  (bazC)(arg1);"
  , "}"
  ]))

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_foo@
foreign import ccall unsafe "hs_bindgen_7eb8358d30ebb28b" hs_bindgen_7eb8358d30ebb28b_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_foo@
hs_bindgen_7eb8358d30ebb28b ::
     PtrConst.PtrConst (IsA.Elem (IA.IncompleteArray BG.CInt))
  -> IO ()
hs_bindgen_7eb8358d30ebb28b =
  \x0 ->
    hs_bindgen_7eb8358d30ebb28b_base (BG.toFFIType x0)

{-| __C declaration:__ @foo@

    __defined at:__ @arrays\/const_qualifier.h 5:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
foo ::
     PtrConst.PtrConst (IsA.Elem (IA.IncompleteArray BG.CInt))
     -- ^ __C declaration:__ @x@
  -> IO ()
foo = hs_bindgen_7eb8358d30ebb28b

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_fooA@
foreign import ccall unsafe "hs_bindgen_2fc1970fe11a3461" hs_bindgen_2fc1970fe11a3461_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_fooA@
hs_bindgen_2fc1970fe11a3461 ::
     PtrConst.PtrConst (IsA.Elem S)
  -> IO ()
hs_bindgen_2fc1970fe11a3461 =
  \x0 ->
    hs_bindgen_2fc1970fe11a3461_base (BG.toFFIType x0)

{-| __C declaration:__ @fooA@

    __defined at:__ @arrays\/const_qualifier.h 10:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
fooA ::
     PtrConst.PtrConst (IsA.Elem S)
     -- ^ __C declaration:__ @x@
  -> IO ()
fooA = hs_bindgen_2fc1970fe11a3461

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_fooB@
foreign import ccall unsafe "hs_bindgen_58689a7e4b1d44f6" hs_bindgen_58689a7e4b1d44f6_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_fooB@
hs_bindgen_58689a7e4b1d44f6 ::
     PtrConst.PtrConst (IsA.Elem S)
  -> IO ()
hs_bindgen_58689a7e4b1d44f6 =
  \x0 ->
    hs_bindgen_58689a7e4b1d44f6_base (BG.toFFIType x0)

{-| __C declaration:__ @fooB@

    __defined at:__ @arrays\/const_qualifier.h 11:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
fooB ::
     PtrConst.PtrConst (IsA.Elem S)
     -- ^ __C declaration:__ @x@
  -> IO ()
fooB = hs_bindgen_58689a7e4b1d44f6

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_fooC@
foreign import ccall unsafe "hs_bindgen_f88b417ee6e28c0c" hs_bindgen_f88b417ee6e28c0c_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_fooC@
hs_bindgen_f88b417ee6e28c0c ::
     PtrConst.PtrConst (IsA.Elem T)
  -> IO ()
hs_bindgen_f88b417ee6e28c0c =
  \x0 ->
    hs_bindgen_f88b417ee6e28c0c_base (BG.toFFIType x0)

{-| __C declaration:__ @fooC@

    __defined at:__ @arrays\/const_qualifier.h 12:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
fooC ::
     PtrConst.PtrConst (IsA.Elem T)
     -- ^ __C declaration:__ @x@
  -> IO ()
fooC = hs_bindgen_f88b417ee6e28c0c

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bar@
foreign import ccall unsafe "hs_bindgen_78493aa01e9cc5da" hs_bindgen_78493aa01e9cc5da_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bar@
hs_bindgen_78493aa01e9cc5da ::
     PtrConst.PtrConst (IsA.Elem (CA.ConstantArray 3 BG.CInt))
  -> IO ()
hs_bindgen_78493aa01e9cc5da =
  \x0 ->
    hs_bindgen_78493aa01e9cc5da_base (BG.toFFIType x0)

{-| __C declaration:__ @bar@

    __defined at:__ @arrays\/const_qualifier.h 16:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
bar ::
     PtrConst.PtrConst (IsA.Elem (CA.ConstantArray 3 BG.CInt))
     -- ^ __C declaration:__ @x@
  -> IO ()
bar = hs_bindgen_78493aa01e9cc5da

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_barA@
foreign import ccall unsafe "hs_bindgen_bee2c20f290d25d6" hs_bindgen_bee2c20f290d25d6_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_barA@
hs_bindgen_bee2c20f290d25d6 ::
     PtrConst.PtrConst (IsA.Elem U)
  -> IO ()
hs_bindgen_bee2c20f290d25d6 =
  \x0 ->
    hs_bindgen_bee2c20f290d25d6_base (BG.toFFIType x0)

{-| __C declaration:__ @barA@

    __defined at:__ @arrays\/const_qualifier.h 21:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
barA ::
     PtrConst.PtrConst (IsA.Elem U)
     -- ^ __C declaration:__ @x@
  -> IO ()
barA = hs_bindgen_bee2c20f290d25d6

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_barB@
foreign import ccall unsafe "hs_bindgen_71f805899a96d9f1" hs_bindgen_71f805899a96d9f1_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_barB@
hs_bindgen_71f805899a96d9f1 ::
     PtrConst.PtrConst (IsA.Elem U)
  -> IO ()
hs_bindgen_71f805899a96d9f1 =
  \x0 ->
    hs_bindgen_71f805899a96d9f1_base (BG.toFFIType x0)

{-| __C declaration:__ @barB@

    __defined at:__ @arrays\/const_qualifier.h 22:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
barB ::
     PtrConst.PtrConst (IsA.Elem U)
     -- ^ __C declaration:__ @x@
  -> IO ()
barB = hs_bindgen_71f805899a96d9f1

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_barC@
foreign import ccall unsafe "hs_bindgen_89af56a24c359834" hs_bindgen_89af56a24c359834_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_barC@
hs_bindgen_89af56a24c359834 ::
     PtrConst.PtrConst (IsA.Elem V)
  -> IO ()
hs_bindgen_89af56a24c359834 =
  \x0 ->
    hs_bindgen_89af56a24c359834_base (BG.toFFIType x0)

{-| __C declaration:__ @barC@

    __defined at:__ @arrays\/const_qualifier.h 23:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
barC ::
     PtrConst.PtrConst (IsA.Elem V)
     -- ^ __C declaration:__ @x@
  -> IO ()
barC = hs_bindgen_89af56a24c359834

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_baz@
foreign import ccall unsafe "hs_bindgen_71d7d347923cf6e5" hs_bindgen_71d7d347923cf6e5_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_baz@
hs_bindgen_71d7d347923cf6e5 ::
     PtrConst.PtrConst (CA.ConstantArray 3 BG.CInt)
  -> IO ()
hs_bindgen_71d7d347923cf6e5 =
  \x0 ->
    hs_bindgen_71d7d347923cf6e5_base (BG.toFFIType x0)

{-| __C declaration:__ @baz@

    __defined at:__ @arrays\/const_qualifier.h 27:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
baz ::
     PtrConst.PtrConst (CA.ConstantArray 3 BG.CInt)
     -- ^ __C declaration:__ @x@
  -> IO ()
baz = hs_bindgen_71d7d347923cf6e5

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bazA@
foreign import ccall unsafe "hs_bindgen_25cc50be574bcc6c" hs_bindgen_25cc50be574bcc6c_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bazA@
hs_bindgen_25cc50be574bcc6c ::
     PtrConst.PtrConst W
  -> IO ()
hs_bindgen_25cc50be574bcc6c =
  \x0 ->
    hs_bindgen_25cc50be574bcc6c_base (BG.toFFIType x0)

{-| __C declaration:__ @bazA@

    __defined at:__ @arrays\/const_qualifier.h 32:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
bazA ::
     PtrConst.PtrConst W
     -- ^ __C declaration:__ @x@
  -> IO ()
bazA = hs_bindgen_25cc50be574bcc6c

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bazB@
foreign import ccall unsafe "hs_bindgen_3fd3913cc13f61be" hs_bindgen_3fd3913cc13f61be_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bazB@
hs_bindgen_3fd3913cc13f61be ::
     PtrConst.PtrConst W
  -> IO ()
hs_bindgen_3fd3913cc13f61be =
  \x0 ->
    hs_bindgen_3fd3913cc13f61be_base (BG.toFFIType x0)

{-| __C declaration:__ @bazB@

    __defined at:__ @arrays\/const_qualifier.h 33:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
bazB ::
     PtrConst.PtrConst W
     -- ^ __C declaration:__ @x@
  -> IO ()
bazB = hs_bindgen_3fd3913cc13f61be

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bazC@
foreign import ccall unsafe "hs_bindgen_a91ac27216749da9" hs_bindgen_a91ac27216749da9_base ::
     BG.Ptr BG.Void
  -> IO ()

-- __unique:__ @test_arraysconst_qualifier_Example_Unsafe_bazC@
hs_bindgen_a91ac27216749da9 ::
     PtrConst.PtrConst X
  -> IO ()
hs_bindgen_a91ac27216749da9 =
  \x0 ->
    hs_bindgen_a91ac27216749da9_base (BG.toFFIType x0)

{-| __C declaration:__ @bazC@

    __defined at:__ @arrays\/const_qualifier.h 34:6@

    __exported by:__ @arrays\/const_qualifier.h@
-}
bazC ::
     PtrConst.PtrConst X
     -- ^ __C declaration:__ @x@
  -> IO ()
bazC = hs_bindgen_a91ac27216749da9