Allocate foreign pointer objects in GC-scanned memory.
authorLudovic Courtès <ludo@gnu.org>
Thu, 8 Apr 2010 22:14:34 +0000 (00:14 +0200)
committerLudovic Courtès <ludo@gnu.org>
Thu, 8 Apr 2010 22:32:14 +0000 (00:32 +0200)
commit4551e860f02244ffb3858c941319f1613bac40e4
tree9815b96f09ff0096812e8e1deb7f2033d9ab732f
parentb577bc90bbaadfac508acc809e59b983db33b7aa
Allocate foreign pointer objects in GC-scanned memory.

* libguile/foreign.c (scm_take_foreign_pointer): Allocate RET in
  GC-scanned memory.  This fixes a bug where the object pointed to by
  SCM_CIF in the pair returned by `cif_to_procedure ()' would be
  reclaimed (as a consequence of commit
  087aa6aa312a8d0af51fa9b2f7bfc1332ad97338).
libguile/foreign.c