* BUG: Don't crash anymore when releasing database objects.


git-svn-id: svn://localhost/gambas/trunk@5987 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2013-12-07 12:49:11 +00:00
parent 572a7ba1b1
commit 0ce3cc69fb

View file

@ -73,11 +73,15 @@ static CSUBCOLLECTION *_current = NULL;
static void clear_one(void *data)
{
CSUBCOLLECTION *save = _current;
if (_current->desc->release)
(*_current->desc->release)(_current->container, data);
//fprintf(stderr, "clear: %p\n", data);
GB.Unref(&data);
_current = save;
}
static void clear_subcollection(CSUBCOLLECTION *_object)