racket - Racket 和花栗鼠的 FFI 问题

Question

我正在尝试使用它提供的 FFI 在 Racket 中使用 Chipmunk 物理库。但是，我目前在实际获取 FFI 以查找 Chipmunk 库中的函数时遇到问题，即使它似乎正确加载了库。

我使用的是基于 Windows 8 和 Visual Studio 2008 的最新版本的 Chipmunk (6.1.1)。我设置了“CHIPMUNK_FFI”标志，以便加载chipmunk_ffi.h 文件。我正在使用“多线程 DLL”和“构建为 dll”选项在 Release DLL 配置下构建代码。我使用的 Racket 代码如下:

#lang scheme

(require ffi/unsafe
         ffi/unsafe/define)

(define chipmunk (ffi-lib "./chipmunk"))
(define-ffi-definer define-chipmunk chipmunk)

(define _cpFloat _double)
(define cpFloat? real?)
(define _cpDataPointer _pointer)
(define _size_t _ulong)
(define _cpHashValue _size_t)

(define-cstruct _cpVect
                ([x _cpFloat]
                 [y _cpFloat]))

(define cpv
  (get-ffi-obj "cpvadd" chipmunk (_fun _cpVect _cpVect -> _cpVect)))

我收到错误:

ffi-obj: couldn't get "cpvadd" from "chipmunk.dll" (The specified procedure could not be found.; errno=127)

 === context ===
C:\Program Files (x86)\Racket\collects\ffi\unsafe.rkt:180:2: get-ffi-obj*
C:\Users\me.000\AppData\Roaming\Racket\planet\300\5.2.1\cache\jaymccarthy\chipmunk.plt\1\0\chipmunk-ffi-new.ss: [running body]
C:\Users\me.000\AppData\Roaming\Racket\planet\300\5.2.1\cache\jaymccarthy\chipmunk.plt\1\0\chipmunk-new.rkt: [traversing imports]
C:\Users\me.000\AppData\Roaming\Racket\planet\300\5.2.1\cache\jaymccarthy\chipmunk.plt\1\0\main.rkt: [traversing imports]
C:\Users\me.000\Dropbox\Code\workspace-racket\learning\main.rkt: [traversing imports]

如果您需要任何进一步的信息，请告诉我。我真的很感激这方面的一些帮助。

Answer 1

一些函数(例如 cpvadd 导出为 _cpvadd )。

见 http://code.google.com/p/chipmunk-physics/source/browse/trunk/include/chipmunk/chipmunk_ffi.h