Commit ee2623c8 authored by Ian Lynagh's avatar Ian Lynagh

Fix warnings in StgCmmGran

parent 0345a837
......@@ -8,13 +8,6 @@
--
-----------------------------------------------------------------------------
{-# OPTIONS -w #-}
-- The above warning supression flag is a temporary kludge.
-- While working on this module you are encouraged to remove it and fix
-- any warnings in the module. See
-- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings
-- for details
module StgCmmGran (
staticGranHdr,staticParHdr,
granThunk, granYield,
......@@ -26,7 +19,6 @@ module StgCmmGran (
-- I've left the calls, though, in case anyone wants to resurrect it
import StgCmmMonad
import Id
import Cmm
staticGranHdr :: [CmmLit]
......@@ -37,16 +29,13 @@ staticParHdr = []
doGranAllocate :: VirtualHpOffset -> FCode ()
-- Must be lazy in the amount of allocation
doGranAllocate n = return ()
granFetchAndReschedule :: [(Id,GlobalReg)] -> Bool -> FCode ()
granFetchAndReschedule regs node_reqd = return ()
doGranAllocate _ = return ()
granYield :: [LocalReg] -> Bool -> FCode ()
granYield regs node_reqd = return ()
granYield _regs _node_reqd = return ()
granThunk :: Bool -> FCode ()
granThunk node_points = return ()
granThunk _node_points = return ()
-----------------------------------------------------------------
{- ------- Everything below here is commented out -------------
......
Markdown is supported
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