luciano/coffi
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix ill-defined test

Browse source
This commit is contained in:
Kristin Rutenkolk 2024-06-26 15:13:41 +02:00
parent 85d52f64b7
commit ef1dcfb6d0
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
test/clj/coffi/ffi_test.clj
View file

@ -29,12 +29,12 @@
(t/deftest can-make-upcall (t/deftest can-make-upcall
(t/is (= ((ffi/cfn "upcall_test" [[::ffi/fn [] ::mem/c-string]] ::mem/c-string) (t/is (= ((ffi/cfn "upcall_test" [[::ffi/fn [] ::mem/c-string]] ::mem/c-string)
(fn [] "hello")) (fn [] "hello from clojure from c from clojure"))
"hello"))) "hello from clojure from c from clojure")))
(t/deftest can-make-upcall2 (t/deftest can-make-upcall2
(t/is (= ((ffi/cfn "upcall_test2" [[::ffi/fn [] ::mem/int]] ::mem/int) (t/is (= ((ffi/cfn "upcall_test2" [[::ffi/fn [] ::mem/int]] ::mem/int)
(fn [] 6)) (fn [] 5))
5))) 5)))
(t/deftest can-make-upcall-int-fn-string-ret (t/deftest can-make-upcall-int-fn-string-ret