projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Whitespace only in nativeGen/RegAlloc/Linear/Main.hs
[ghc-hetmet.git]
/
compiler
/
ghci
/
LibFFI.hsc
diff --git
a/compiler/ghci/LibFFI.hsc
b/compiler/ghci/LibFFI.hsc
index
9dd2a24
..
86714ef
100644
(file)
--- a/
compiler/ghci/LibFFI.hsc
+++ b/
compiler/ghci/LibFFI.hsc
@@
-53,7
+53,8
@@
convToABI CCallConv = fFI_DEFAULT_ABI
#ifdef mingw32_HOST_OS
convToABI StdCallConv = fFI_STDCALL
#endif
#ifdef mingw32_HOST_OS
convToABI StdCallConv = fFI_STDCALL
#endif
-convToABI _ = panic "convToABI: convention not supported"
+-- unknown conventions are mapped to the default, (#3336)
+convToABI _ = fFI_DEFAULT_ABI
-- c.f. DsForeign.primTyDescChar
primRepToFFIType :: PrimRep -> Ptr C_ffi_type
-- c.f. DsForeign.primTyDescChar
primRepToFFIType :: PrimRep -> Ptr C_ffi_type