Mtrace для программы fortran

Я пытаюсь использовать mtrace для обнаружения утечек памяти в программе fortran. Я использую компилятор gfortran. См. Запись в википедии для (рабочего) примера mtrace на C: http://en.wikipedia.org/wiki/Mtrace

Я попробовал оба способа, то есть обернул mtrace () и muntrace () и вызвал их из программы fortran, а также создал программу C, которая напрямую вызывает mtrace () и muntrace (), помимо утечки кода fortran между ними. Оба подхода не позволяют обнаружить утечку памяти, но здесь я представляю только последнее.

example.c

#include <stdlib.h>
#include <mcheck.h>

extern void leaky_();  // this might be different on your system
    // if it doesn't work, try to run:
    // 1) gfortran leaky.f90 -c
    // 2) nm leaky.o
    // and then change this declaration and its use below

void main() { 
    mtrace();
    leaky_();
    muntrace();
}

утечка.f90

subroutine leaky()
  real, allocatable, dimension(:) :: tmp
  integer :: error
  allocate (tmp(10), stat=error)
  if (error /= 0) then
    print*, "subroutine leaky could not allocate space for array tmp"
  endif
  tmp = 1
  !of course the actual code makes more...
  print*, ' subroutine leaky run '
  return
end subroutine leaky

Я компилирую:

gfortran -g example.c leaky.f90

Затем я бегу с:

export MALLOC_TRACE=`pwd`/raw.txt; ./a.out

Затем я анализирую вывод raw.txtmtrace с помощью:

mtrace a.out raw.txt

и получить:

Никаких утечек памяти.

Что я делаю неправильно, или что-то я могу сделать, чтобы mtrace нашел утечку в распределении памяти fortran? Я предполагаю, что gfortran использует другой вызов malloc, который mtrace не отслеживает ... Фактически, как я уже писал выше, я получаю тот же результат, если напишу fortran main, который будет вызывать (завернутые) mtrace() и muntrace().

EDITED: я рассмотрел другие варианты (в том числе некоторые, еще не упомянутые здесь), но фактический отлаживаемый код работает на P6 / AIX, поэтому Valgrind будет "просто" неудобно (он должен работать на другой машине), тогда как Forcheck будет неудобно (нужно запускать на другой машине) и дорого (~ 3k $). На данный момент лучшим решением была бы mtrace, если бы она работала.

ИЗМЕНИТЬ снова: Моя догадка

I guess gfortran is using a different malloc call, which mtrace does not trace...

было правильно. Заглянув в исполняемый файл (либо с nm, либо с readelf), нет никакого вызова malloc(), но есть вызовы _gfortran_allocate_array - которые, возможно, вызовут malloc). Есть другие идеи?

ИЗМЕНИТЬ снова: Я опубликовал ответ, но не могу его принять (перейдите к http://stackoverflow.uservoice.com/pages/general/suggestions/39426 и запросите функцию, она действительно нужна - никакого повышения репутации не требуется)