@@ -17,8 +17,7 @@ main = defaultMainWithHooks hk
18 hk = simpleUserHooks { buildHook = \pd lbi uh bf -> do
18 hk = simpleUserHooks { buildHook = \pd lbi uh bf -> do
19 -- let ccProg = Program "gcc" undefined undefined undefined
19 -- let ccProg = Program "gcc" undefined undefined undefined
20− let hcProg = Program "ghc" undefined undefined undefined
21− mConf = lookupProgram hcProg (withPrograms lbi)
20+ let mConf = lookupProgram ghcProgram (withPrograms lbi)
22 err = error "Could not determine C compiler"
21 err = error "Could not determine C compiler"
23 cc = locationPath . programLocation . maybe err id $ mConf
22 cc = locationPath . programLocation . maybe err id $ mConf
24 b <- canUseRDRAND cc
23 b <- canUseRDRAND cc