Re: [Firebird-devel] build 221 - win32 error 32

[Oleg L. <lo...@ma...>]

May be this small fix solve the problem ?

void PIO_force_write (
    FIL  file,
    USHORT flag)
{
/**************************************
 *
 * P I O _ f o r c e _ w r i t e
 *
 **************************************
 *
 * Functional description
 * Set (or clear) force write, if possible, for the database.
 *
 **************************************/
HANDLE desc;

if (flag)
    {
    if (!(file->fil_flags & FIL_force_write_init))
 {

/******** FIX ** FIX ** FIX ****************************************/

 CloseHandle ((HANDLE) file->fil_desc);
 file->fil_desc = (SLONG) INVALID_HANDLE_VALUE;

/******** FIX ** FIX ** FIX ****************************************/

 desc = CreateFile (file->fil_string,
     GENERIC_READ | GENERIC_WRITE, .....