[GB.DB]
* 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:
parent
572a7ba1b1
commit
0ce3cc69fb
1 changed files with 4 additions and 0 deletions
|
@ -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)
|
||||
|
|
Loading…
Reference in a new issue