Commit d0e4be14 authored by sof's avatar sof
Browse files

[project @ 1998-08-14 12:56:27 by sof]

Define Int64 and Word64 types
parent e7942525
......@@ -8,8 +8,12 @@
{-# OPTIONS -fno-implicit-prelude #-}
module PrelCCall (
CCallable(..), CReturnable(..),
Word(..)
CCallable(..),
CReturnable(..),
Word(..),
Word64(..),
Int64(..)
) where
import PrelBase
......@@ -48,6 +52,18 @@ instance CCallable Word
instance CCallable Word#
instance CReturnable Word
data Word64 = W64# Word64# --deriving (Eq, Ord) -- Glasgow extension
data Int64 = I64# Int64# --deriving (Eq, Ord) -- Glasgow extension
instance CCallable Word64
instance CCallable Word64#
instance CReturnable Word64
instance CCallable Int64
instance CCallable Int64#
instance CReturnable Int64
instance CReturnable () -- Why, exactly?
\end{code}
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment