Commit bd9e0299 authored by ian@well-typed.com's avatar ian@well-typed.com

Remove a use of printf

It looks like it would fail anyway, as it 'show'ed its argument before
passing it on to printf.
parent c2f9b74c
......@@ -21,7 +21,6 @@ import DynFlags
import Control.Monad
import Foreign
import Foreign.C
import Text.Printf
----------------------------------------------------------------------------
......@@ -46,7 +45,7 @@ prepForeignCall dflags cconv arg_types result_type
r <- ffi_prep_cif cif abi (fromIntegral n_args) res_ty arg_arr
if (r /= fFI_OK)
then throwGhcException (InstallationError
(printf "prepForeignCallFailed: %d" (show r)))
("prepForeignCallFailed: " ++ show r))
else return cif
convToABI :: CCallConv -> C_ffi_abi
......
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