mirror of
https://github.com/FirebirdSQL/firebird.git
synced 2025-01-23 15:23:02 +01:00
Fixed one more DDL coredump
This commit is contained in:
parent
4a33021611
commit
c5d0cb8984
@ -35,7 +35,7 @@
|
|||||||
* 2002-09-16 Nickolay Samofatov - Deferred trigger compilation changes
|
* 2002-09-16 Nickolay Samofatov - Deferred trigger compilation changes
|
||||||
*/
|
*/
|
||||||
/*
|
/*
|
||||||
$Id: met.epp,v 1.20 2002-09-27 22:59:24 skidder Exp $
|
$Id: met.epp,v 1.21 2002-09-28 20:58:39 skidder Exp $
|
||||||
*/
|
*/
|
||||||
// This MUST be at the top of the file
|
// This MUST be at the top of the file
|
||||||
#ifdef DARWIN
|
#ifdef DARWIN
|
||||||
@ -2929,11 +2929,11 @@ void MET_remove_procedure( TDBB tdbb, int id, PRC procedure)
|
|||||||
SET_TDBB(tdbb);
|
SET_TDBB(tdbb);
|
||||||
dbb = tdbb->tdbb_database;
|
dbb = tdbb->tdbb_database;
|
||||||
|
|
||||||
|
if (!(vector = dbb->dbb_procedures))
|
||||||
|
return;
|
||||||
|
|
||||||
if (!procedure) {
|
if (!procedure) {
|
||||||
/** If we are in here then dfw.e/modify_procedure() called us **/
|
/** If we are in here then dfw.e/modify_procedure() called us **/
|
||||||
if (!(vector = dbb->dbb_procedures))
|
|
||||||
return;
|
|
||||||
|
|
||||||
if (!(procedure = (PRC) (*vector)[id]))
|
if (!(procedure = (PRC) (*vector)[id]))
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
@ -2945,8 +2945,8 @@ void MET_remove_procedure( TDBB tdbb, int id, PRC procedure)
|
|||||||
// Its absence caused coredumps in some cases because its request and other
|
// Its absence caused coredumps in some cases because its request and other
|
||||||
// data is freed after this call and procedure block is no longer valid
|
// data is freed after this call and procedure block is no longer valid
|
||||||
|
|
||||||
if (!(procedure->prc_flags & PRC_being_altered))
|
if (!(procedure->prc_flags & PRC_being_altered))
|
||||||
(*vector)[id] = (BLK) NULL_PTR;
|
(*vector)[id] = (BLK) NULL_PTR;
|
||||||
|
|
||||||
/* deallocate all structure which were allocated. The procedure
|
/* deallocate all structure which were allocated. The procedure
|
||||||
* blr is originally read into a new pool from which all request
|
* blr is originally read into a new pool from which all request
|
||||||
|
Loading…
Reference in New Issue
Block a user