17-test.log

17-test.log (text/plain), 6.25 KB, created by Agostino Sarubbo on 2024-02-18 07:30:59 UTC

Testing ffitest ===============================================================
<raw call>---------------------------------------------------------------------
test open dlo, expects #t ==> ok
test get dlptr, expects #t ==> ok
test call f_o, expects (#<undef> "it works") ==> ok
<simple, register passing call (integral)>-------------------------------------
test call _f_o, expects it_works ==> ok
test call _f_i, expects 42 ==> ok
test call _f_s, expects "it works" ==> ok
test call _fo_o, expects (wow . huh) ==> ok
test call _fi_o, expects (7 . huh) ==> ok
test call _fi_o, expects (-9 . huh) ==> ok
test call _fs_o, expects 5 ==> ok
test call _fo_i, expects 3 ==> ok
test call _fi_i, expects 121 ==> ok
test call _fs_i, expects 6 ==> ok
test call _fo_s, expects "(a b c)" ==> ok
test call _foo_o, expects (a . b) ==> ok
test call _foi_o, expects (a . 1) ==> ok
test call _fis_i, expects 99 ==> ok
test call _fois_o, expects ("foo" 100 (cent)) ==> ok
test call _foiso_o, expects (3.0+2.0i "foo" 100 (cent)) ==> ok
test call _foisoi_o, expects (-56789 3.0+2.0i "foo" 100 (cent)) ==> ok
test call _foisois_o, expects ("" -56789 3.0+2.0i "foo" 100 (cent)) ==> ok
<register passing (flonum)>----------------------------------------------------
test call _fd_o, expects 101.0 ==> ok
test call _fid_o, expects 99.0 ==> ok
test call _fdi_o, expects 99.0 ==> ok
test call _fiiiiii_d, expects 10.5 ==> ok
<calling back to Scheme>-------------------------------------------------------
test call _fo_o_cb, expects (z . z) ==> ok
test call _foo_o_cb, expects (d c b a) ==> ok
test call _foo_o_cb, expects #<<error> "list required, but got zzz"> ==> ok
<spill-to-stack case>----------------------------------------------------------
test call _fooooooo_o, expects ((a b c d e) (f g)) ==> ok
test call _foooooooo_o, expects ((a b c d e) (f g h)) ==> ok
test call _fooooooooi_o, expects ((a b c d e) (f g h 5)) ==> ok
test call _fdddddddddd_d, expects 51.0 ==> ok
test call _fiiiiiiddddddddidid_d, expects 522.0 ==> ok
test call _fooooooooooo_o_cb, expects (A B C D E F G H I . J) ==> ok
test call _fio_var_o, expects (A A B B C C) ==> ok
test call _fio_var_o, expects (A A B B C C D D E E F F G G H H) ==> ok
test call _fido_var_o, expects (A A B B C C D D 1.0) ==> ok
<ensure error frees codepad memory>--------------------------------------------
test error and codepad memory management, expects #t ==> ok
<FFI API>----------------------------------------------------------------------
testing bindings in #<module gauche.ffi> ... ok
test load-foreign, expects (#t (f_i () i) (f_i_i (i) i)) ==> ERROR: GOT #<<error> ": no matching clause for (.struct _IO_cookie_io_functions_t () ((read (.pointer () (.type cookie_read_function_t () (.function () (.type __ssize_t () (long ())) ((__cookie (.pointer () (void ()))) (__buf (.pointer () (char ()))) (__nbytes (.type size_t () (u-long ())))))))) (write (.pointer () (.type cookie_write_function_t () (.function () (.type __ssize_t () (long ())) ((__cookie (.pointer () (void ()))) (__buf (.pointer () (char (const)))) (__nbytes (.type size_t () (u-long ())))))))) (seek (.pointer () (.type cookie_seek_function_t () (.function () (int ()) ((__cookie (.pointer () (void ()))) (__pos (.pointer () (.type __off64_t () (long ())))) (__w (int ()))))))) (close (.pointer () (.type cookie_close_function_t () (.function () (int ()) ((__cookie (.pointer () (void ()))))))))))">
test call-foreign f_c, expects 9 ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_i, expects 42 ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_f, expects 1.25 ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_d, expects 3.14 ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_v, expects #<undef> ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_i_i, expects 99 ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_f_f, expects 0.125 ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_d_d, expects 1.0 ==> ERROR: GOT #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
failed.
9 discrepancies found:
test load-foreign: expects (#t (f_i () i) (f_i_i (i) i)) => got #<<error> ": no matching clause for (.struct _IO_cookie_io_functions_t () ((read (.pointer () (.type cookie_read_function_t () (.function () (.type __ssize_t () (long ())) ((__cookie (.pointer () (void ()))) (__buf (.pointer () (char ()))) (__nbytes (.type size_t () (u-long ())))))))) (write (.pointer () (.type cookie_write_function_t () (.function () (.type __ssize_t () (long ())) ((__cookie (.pointer () (void ()))) (__buf (.pointer () (char (const)))) (__nbytes (.type size_t () (u-long ())))))))) (seek (.pointer () (.type cookie_seek_function_t () (.function () (int ()) ((__cookie (.pointer () (void ()))) (__pos (.pointer () (.type __off64_t () (long ())))) (__w (int ()))))))) (close (.pointer () (.type cookie_close_function_t () (.function () (int ()) ((__cookie (.pointer () (void ()))))))))))">
test call-foreign f_c: expects 9 => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_i: expects 42 => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_f: expects 1.25 => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_d: expects 3.14 => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_v: expects #<undef> => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_i_i: expects 99 => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_f_f: expects 0.125 => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">
test call-foreign f_d_d: expects 1.0 => got #<<error> "flib is supposed to be of type #<class <foreign-library>>, but got #f">