Slide 20
Slide 20 text
ߏମ
Data Section = Section
{ sectionId :: Word32
, sectionOffset :: Word32
} deriving (Show,Eq)
instance Storable Section where
sizeof _ = 8
alignment _ = 4
peek ptr = do
a1 <- peek (ptr `plusPtr` 0) :: IO Word32
a2 <- peek (ptr `plusPtr` 4) :: IO Word32
return $ Section a1 a2
struct {
uint32_t id;
uint32_t offset;
} Section;
$ݴޠଆ
)BTLFMMଆ