gfortran dla manekinów: co dokładnie robi mcmodel = medium?

Mam jakiś kod, który daje mi błędy przy relokacji podczas kompilacji, poniżej jest przykład ilustrujący problem:

  program main
  common/baz/a,b,c
  real a,b,c
  b = 0.0
  call foo()
  print*, b
  end

  subroutine foo()
  common/baz/a,b,c
  real a,b,c

  integer, parameter :: nx = 450
  integer, parameter :: ny = 144
  integer, parameter :: nz = 144
  integer, parameter :: nf = 23*3
  real :: bar(nf,nx*ny*nz)

  !real, allocatable,dimension(:,:) :: bar
  !allocate(bar(nf,nx*ny*nz))

  bar = 1.0
  b = bar(12,32*138*42)

  return
  end

Kompilowanie tego zgfortran -O3 -g -o test test.f, Pojawia się następujący błąd:

relocation truncated to fit: R_X86_64_PC32 against symbol `baz_' defined in COMMON section in /tmp/ccIkj6tt.o

Ale działa, gdy używamgfortran -O3 -mcmodel=medium -g -o test test.f. Zauważ również, że działa, jeśli ustawię tablicę do przydzielenia i przydzielę ją do podprogramu.

Moje pytanie brzmi dokładnie-mcmodel=medium robić? Miałem wrażenie, że dwie wersje kodu (ta zallocatable tablice i ta bez) były mniej więcej równoważne ...

questionAnswers(2)

yourAnswerToTheQuestion