mirror of
https://github.com/FirebirdSQL/firebird.git
synced 2025-01-23 05:23:03 +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
|
||||
*/
|
||||
/*
|
||||
$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
|
||||
#ifdef DARWIN
|
||||
@ -2929,11 +2929,11 @@ void MET_remove_procedure( TDBB tdbb, int id, PRC procedure)
|
||||
SET_TDBB(tdbb);
|
||||
dbb = tdbb->tdbb_database;
|
||||
|
||||
if (!(vector = dbb->dbb_procedures))
|
||||
return;
|
||||
|
||||
if (!procedure) {
|
||||
/** If we are in here then dfw.e/modify_procedure() called us **/
|
||||
if (!(vector = dbb->dbb_procedures))
|
||||
return;
|
||||
|
||||
if (!(procedure = (PRC) (*vector)[id]))
|
||||
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
|
||||
// data is freed after this call and procedure block is no longer valid
|
||||
|
||||
if (!(procedure->prc_flags & PRC_being_altered))
|
||||
(*vector)[id] = (BLK) NULL_PTR;
|
||||
if (!(procedure->prc_flags & PRC_being_altered))
|
||||
(*vector)[id] = (BLK) NULL_PTR;
|
||||
|
||||
/* deallocate all structure which were allocated. The procedure
|
||||
* blr is originally read into a new pool from which all request
|
||||
|
Loading…
Reference in New Issue
Block a user