mirror of
https://github.com/tweag/asterius.git
synced 2024-09-11 08:55:32 +03:00
WIP
This commit is contained in:
parent
127d5a7610
commit
ab6b36baee
@ -1,5 +1,7 @@
|
||||
module Asterius.Internals.MagicNumber
|
||||
( invalidAddress,
|
||||
( dataTag,
|
||||
functionTag,
|
||||
invalidAddress,
|
||||
defaultTableBase,
|
||||
defaultMemoryBase,
|
||||
mkStaticDataAddress,
|
||||
@ -7,9 +9,16 @@ module Asterius.Internals.MagicNumber
|
||||
)
|
||||
where
|
||||
|
||||
import Data.Bits
|
||||
import Data.Int
|
||||
import Data.Word
|
||||
|
||||
dataTag :: Int64
|
||||
dataTag = 0
|
||||
|
||||
functionTag :: Int64
|
||||
functionTag = 0
|
||||
|
||||
invalidAddress :: Int64
|
||||
invalidAddress = 0x001fffffffff0000
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user