summaryrefslogtreecommitdiff
path: root/compiler/cmm/OldCmm.hs
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2012-02-23 19:57:57 +0000
committerIan Lynagh <igloo@earth.li>2012-02-23 19:59:20 +0000
commit98acdf083c119b018f25097593668a816dc68068 (patch)
tree3ed98b700e687ed988519d54b574096e949a214e /compiler/cmm/OldCmm.hs
parent7d8b2c18eeb166ea64504fb3a8022edd6b36e870 (diff)
downloadhaskell-98acdf083c119b018f25097593668a816dc68068.tar.gz
Add a Word add-with-carry primop
No special-casing in any NCGs yet
Diffstat (limited to 'compiler/cmm/OldCmm.hs')
-rw-r--r--compiler/cmm/OldCmm.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/compiler/cmm/OldCmm.hs b/compiler/cmm/OldCmm.hs
index 7b5917d3bf..97fdd4aed5 100644
--- a/compiler/cmm/OldCmm.hs
+++ b/compiler/cmm/OldCmm.hs
@@ -293,5 +293,8 @@ data CmmCallTarget
| CmmPrim -- Call a "primitive" (eg. sin, cos)
CallishMachOp -- These might be implemented as inline
-- code by the backend.
- deriving Eq
+ -- If we don't know how to implement the
+ -- mach op, then we can replace it with
+ -- this list of statements:
+ (Maybe ([HintedCmmFormal] -> [HintedCmmActual] -> [CmmStmt]))