From 0a1b7cb85fac3988ae625ba8bb491de81c39bfdc Mon Sep 17 00:00:00 2001
From: Ian Lynagh <ian@well-typed.com>
Date: Wed, 30 Jan 2013 14:06:53 +0000
Subject: Change a few throwGhcException uses to throwGhcExceptionIO

---
 compiler/main/GhcMake.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'compiler/main/GhcMake.hs')

diff --git a/compiler/main/GhcMake.hs b/compiler/main/GhcMake.hs
index 80227cd3f3..81f338eb8c 100644
--- a/compiler/main/GhcMake.hs
+++ b/compiler/main/GhcMake.hs
@@ -1425,7 +1425,7 @@ preprocessFile hsc_env src_fn mb_phase (Just (buf, _time))
                 | otherwise                     = False
 
         when needs_preprocessing $
-           throwGhcException (ProgramError "buffer needs preprocesing; interactive check disabled")
+           throwGhcExceptionIO (ProgramError "buffer needs preprocesing; interactive check disabled")
 
         return (dflags', src_fn, buf)
 
-- 
cgit v1.2.1