storable-tuple-0.0.3: unit/instance/Foreign/Storable/Unit.hs

module Foreign.Storable.Unit where

import Foreign.Storable (Storable (..), )


instance Storable () where
   sizeOf    _ = 0
   alignment _ = 1
   peek      _ = return ()
   poke    _ _ = return ()