Memory leak in constructTSShape

I've looked at the code a couple of times and I'm a little tired (lack of sleep... coding like a maniac ever since I got TSE :P ) but I think this is a memory leak.

in tsShape.cpp, right around line 1800 (around there, I've modified this code quite a bit so I don't know the original line number)

ResourceInstance *constructTSShape(Stream &stream)
{
   TSShape * ret = new TSShape;
   if (ret->readDTS(&stream))
      return ret;
   else
      return NULL;
}

In TSShape::readDTS() everywhere it returns false it should delete itself, or, cleaner, change constructTSShape(Stream &stream) to this:

ResourceInstance *constructTSShape(Stream &stream)
{
   TSShape * ret = new TSShape;
   if (ret->readDTS(&stream))
      return ret;
   else
   {
      delete ret;
      return NULL;
   }
}

But, since I'm an advocate of cleaner return points where possible:

ResourceInstance *constructTSShape(Stream &stream)
{
   TSShape * ret = new TSShape;
   if (!ret->readDTS(&stream))
   {
      delete ret;
      ret = NULL;
   }

   return ret;
}

The function right below it, constructMDLShape looks right, though.

Correct, or am I too tired?