James Mitchell wrote:

I'm writing an interface to Berkeley DB, and, while I
can link to my wrapper library fine from C, I can't
seem to do it successfully from GHC.


I think you are trying to link agains an Microsoft Visual C++ library.
You need to convert it first to a mingw compatible library and you can
do that using a special utitility called. "reimp.exe". You can get it by
downloading the wxHaskell sources -- it is in the "bin" directory.

when you do "reimp foo.lib", it will create "libfoo.a" and "foo.def"
that can be linked with ghc stuff.

I hope this helps,
-- Daan Leijen

My first attempt was:
D:\src\dm>ghc -fffi test.hs db.lib libdb43.lib
compilation IS NOT required
Warning: .drectve `/DEFAULTLIB:"libcp"
/DEFAULTLIB:"LIBC" /DEFAULTLIB:"OLDNAMES"
/EXPORT:_db_info_status_pos,DATA /EXPOR
T:_db_info_struct_size,DATA /EXPORT:[EMAIL PROTECTED]
/EXPORT:[EMAIL PROTECTED] /EXPORT:[EMAIL PROTECTED]
/EXPORT:[EMAIL PROTECTED] /EXPORT:_db_re
[EMAIL PROTECTED] /EXPORT:_db_info_mode_pos,DATA
/EXPORT:_db_info_out_data_pos,DATA
/EXPORT:_db_info_in_data_length_pos,DATA /EXPOR
T:_db_info_pathname_pos,DATA
/EXPORT:_db_info_error_pos,DATA
/EXPORT:_db_info_in_data_pos,DATA
/EXPORT:_db_info_key_leng
th_pos,DATA /EXPORT:_db_info_key_pos,DATA
/EXPORT:_db_info_out_data_length_pos,DATA
/EXPORT:_db_info_db_name_pos,DATA '
unrecognized
db.lib(Release/berk_db.obj)(.text+0xd):berk_db.cpp:
undefined reference to [EMAIL PROTECTED]@Z'
db.lib(Release/berk_db.obj)(.text+0xc):berk_db.cpp:
undefined reference to `_except_list'
db.lib(Release/berk_db.obj)(.text+0x14):berk_db.cpp:
undefined reference to `_except_list'
db.lib(Release/berk_db.obj)(.text+0x5d):berk_db.cpp:
undefined reference to [EMAIL PROTECTED]@Z'
db.lib(Release/berk_db.obj)(.text+0x7e):berk_db.cpp:
undefined reference to `_except_list'
db.lib(Release/berk_db.obj)(.text+0x6c):berk_db.cpp:
undefined reference to [EMAIL PROTECTED]@Z'
db.lib(Release/berk_db.obj)(.text+0x78):berk_db.cpp:
undefined reference to [EMAIL PROTECTED]@Z'

... where db.lib is my wrapper library.  Taking a hint
from the compiler defaultlib directives, I then did
the following:

D:\src\dm>ghc -fffi test.hs db.lib libdb43.lib
libc.lib libcp.lib oldnames.lib
compilation IS NOT required
libc.lib(build/intel/st_obj/crt0.obj)(.text+0x0): In
function `mainCRTStartup':
f:\vs70builds\9466: multiple definition of
`mainCRTStartup'
D:/GHC/GHC-6.2.2/gcc-lib/crt2.o(.text+0x240):crt1.c:
first defined here
Warning: .drectve `/DEFAULTLIB:"libcp"
/DEFAULTLIB:"LIBC" /DEFAULTLIB:"OLDNAMES"
/EXPORT:_db_info_status_pos,DATA /EXPOR
T:_db_info_struct_size,DATA /EXPORT:[EMAIL PROTECTED]
/EXPORT:[EMAIL PROTECTED] /EXPORT:[EMAIL PROTECTED]
/EXPORT:[EMAIL PROTECTED] /EXPORT:_db_re
[EMAIL PROTECTED] /EXPORT:_db_info_mode_pos,DATA
/EXPORT:_db_info_out_data_pos,DATA
/EXPORT:_db_info_in_data_length_pos,DATA /EXPOR
T:_db_info_pathname_pos,DATA
/EXPORT:_db_info_error_pos,DATA
/EXPORT:_db_info_in_data_pos,DATA
/EXPORT:_db_info_key_leng
th_pos,DATA /EXPORT:_db_info_key_pos,DATA
/EXPORT:_db_info_out_data_length_pos,DATA
/EXPORT:_db_info_db_name_pos,DATA '
unrecognized
Warning: .drectve `/merge:.CRT=.data
/defaultlib:kernel32.lib /disallowlib:libcd.lib
/disallowlib:libcmt.lib /disallowli
b:libcmtd.lib /disallowlib:msvcrt.lib
/disallowlib:msvcrtd.lib ' unrecognized
Warning: .drectve `/MERGE:.rtc=.rdata ' unrecognized

I assume that the warnings are no problem, but I can't
figure out how to get rid of the duplicate
"mainCRTStartup" symbol.

This's really vexing me, as there are a number of
things such as gdb support that would go a long way
towards making Haskell more useable for general
purpose applications (instead of the "hard"
calculations at which it excels), but I just can't
seem to make it work.

thanks in advance,

James



|-----------------------------------------------|
|   James Mitchell     | http://www.jimdesu.us  |
|-----------------------------------------------|
|When the shoe fits, the foot is forgotten; when|
|the belt fits, the belly is forgotten; when the|
|heart is right, "for" and "against" are        |
|forgotten. -- Chuang Tzu                       |
|-----------------------------------------------|



__________________________________ Do you Yahoo!? Yahoo! Small Business - Try our new resources site!
http://smallbusiness.yahoo.com/resources/ _______________________________________________
FFI mailing list
FFI@haskell.org
http://www.haskell.org/mailman/listinfo/ffi



_______________________________________________ FFI mailing list FFI@haskell.org http://www.haskell.org/mailman/listinfo/ffi

Reply via email to