Beispiel #1
0
static void
unallocSourceFile(SourceFile sf)
{ freeList(&sf->procedures);
  freeList(&sf->modules);
  if ( sf->mutex )
    freeSimpleMutex(sf->mutex);
  freeHeap(sf, sizeof(*sf));
}
Beispiel #2
0
static void
unallocSourceFile(SourceFile sf)
{ if ( sf->magic == SF_MAGIC_DESTROYING )
  { sf->magic = 0;
    freeList(&sf->procedures);
    freeList(&sf->modules);
#ifdef O_PLMT
    if ( sf->mutex )
      freeSimpleMutex(sf->mutex);
#endif
    freeHeap(sf, sizeof(*sf));
  }
}