Changeset 1170


Ignore:
Timestamp:
Aug 13, 2003, 12:06:48 AM (17 years ago)
Author:
orlov
Message:
  • Delete auxiliary objects before returning $fail.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/library/StdIO/open_file.cc

    r1162 r1170  
    4141          mode[len] = 0;
    4242          mode[0] = tolower(mode[0]);
    43           if (!ch->open(fname, mode)) {
    44             retfail;
    45           }
     43          bool res = ch->open(fname, mode);
    4644          delete mode;
    4745          delete fname;
     46          if (!res) retfail;
    4847          return true;
    4948        }
Note: See TracChangeset for help on using the changeset viewer.