~ chicken-core (chicken-5) c765281f46fae8481a7f75e598cf9772b9e5d859
commit c765281f46fae8481a7f75e598cf9772b9e5d859 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Tue Aug 9 13:31:12 2011 +0200 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Tue Aug 9 13:31:12 2011 +0200 fixed incorrect result type in types.db entry for pointer-vector-set\! diff --git a/types.db b/types.db index e5154d6e..86acb838 100644 --- a/types.db +++ b/types.db @@ -1220,7 +1220,7 @@ ((pointer-vector) (##sys#slot #(1) '1))) (pointer-vector-ref (procedure! pointer-vector-ref (pointer-vector fixnum) pointer)) -(pointer-vector-set! (procedure! pointer-vector-set! (pointer-vector fixnum pointer) pointer)) +(pointer-vector-set! (procedure! pointer-vector-set! (pointer-vector fixnum pointer) undefined)) (pointer-s16-ref (procedure! pointer-s16-ref (pointer) fixnum)) (pointer-s16-set! (procedure! pointer-s16-set! (pointer fixnum) undefined)) (pointer-s32-ref (procedure! pointer-s32-ref (pointer) number))Trap