[racket] mysterx-mzlib<->ffi/com
Hello friends,
the problem that I describe still occurs. I thing/assume this is a problem with racket, because in racket 5.3 the given codesequence with misterx gives the same error and in racket 5.2.1 with MisterX there is no problem with this Codesequence:
Racket 5.2.1/Misterx:->OK
(require mysterx)
(require mzlib/class)
(define SRV (cci/progid "WMOBrws.ServerBrowser"))
(define CurServer (com-invoke SRV "TakeCurrentServer"))
(define SESSION (cci/progid "Session.Test" CurServer))
===========================================================
Racket 5.3/Misterx:->ERROR
ptr-set!: given value does not fit primitive C type
C type: _string/utf-16
given value: #<cpointer>
---
(require mysterx)
(require mzlib/class)
(define SRV (cci/progid "WMOBrws.ServerBrowser"))
(define CurServer (com-invoke SRV "TakeCurrentServer"))
(define SESSION (cci/progid "Session.Test" CurServer))
===========================================================
Racket 5.3/ffi/com:->ERROR, same as above
(require ffi/com)
(define SRV (com-create-instance "WMOBrws.ServerBrowser"))
(define CurServer (com-invoke SRV "TakeCurrentServer"))
(define SESSION (com-create-instance "Session.Test" CurServer))
Yours,