-- addDependentFile examples/golden/program-analysis/selection_bad_size_t.h -- addDependentFile examples/golden/program-analysis/selection_bad.h {-| __C declaration:__ @A@ __defined at:__ @program-analysis\/selection_bad.h 3:9@ __exported by:__ @program-analysis\/selection_bad.h@ -} newtype A = A {unwrapA :: CInt} {- ^ __C declaration:__ @A@ __defined at:__ @program-analysis\/selection_bad.h 3:9@ __exported by:__ @program-analysis\/selection_bad.h@ -} deriving stock (Eq, Ord, Read, Show) deriving newtype (StaticSize, ReadRaw, WriteRaw, Storable, HasFFIType, Prim, Bitfield, Bits, Bounded, Enum, FiniteBits, Integral, Ix, Num, Real) instance TyEq ty (CFieldType A "unwrapA") => HasField "unwrapA" (Ptr A) (Ptr ty) where getField = fromPtr (Proxy @"unwrapA") instance HasCField A "unwrapA" where type CFieldType A "unwrapA" = CInt offset# = \_ -> \_ -> 0