2016 Update
This commit is contained in:
parent
948b86eafa
commit
dcf5d15da3
7965 changed files with 139854 additions and 31002 deletions
16
Task/Variable-size-Set/Haskell/variable-size-set.hs
Normal file
16
Task/Variable-size-Set/Haskell/variable-size-set.hs
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
import Data.Int
|
||||
import Foreign.Storable
|
||||
|
||||
task name value = putStrLn $ name ++ ": " ++ show (sizeOf value) ++ " byte(s)"
|
||||
|
||||
main = do
|
||||
let i8 = 0::Int8
|
||||
let i16 = 0::Int16
|
||||
let i32 = 0::Int32
|
||||
let i64 = 0::Int64
|
||||
let int = 0::Int
|
||||
task "Int8" i8
|
||||
task "Int16" i16
|
||||
task "Int32" i32
|
||||
task "Int64" i64
|
||||
task "Int" int
|
||||
Loading…
Add table
Add a link
Reference in a new issue