add note to a broken test
The test doesn't go wrong so often that its crucial to fix now, but it should be fixd in the near future.
This commit is contained in:
parent
84827d04aa
commit
dce39cf24b
|
@ -278,6 +278,10 @@
|
|||
((ffi 'hoho (_fun _int (_fun _int -> (_fun _int -> _int)) -> _int))
|
||||
3 (lambda (x) (lambda (y) (+ y (* x x))))))
|
||||
;; ---
|
||||
;; FIXME: this test is broken, because the array allocated by `(_list io _int len)`
|
||||
;; has no reason to stay in place; a GC during the callback may move it.
|
||||
;; The solution is probably to extend `_list` so that an allocation mode like
|
||||
;; 'atomic-interior can be supplied.
|
||||
(let ([qsort (get-ffi-obj 'qsort #f
|
||||
(_fun (l : (_list io _int len))
|
||||
(len : _int = (length l))
|
||||
|
|
Loading…
Reference in New Issue
Block a user