Fortran alcance de vista

goto

Question

Tengo un código Fortran heredado con muchas afirmaciones como ''goto 50''. Me preguntaba si el objetivo de goto es global o local. Quiero decir, si múltiples funciones tienen un objetivo ''50'', ¿a dónde conduce el goto?

Gracias por responder.

Answer 1

Las etiquetas de las declaraciones (p. Ej., "50") deben definirse dentro de la "unidad de alcance" actual, que básicamente se traduce en este contexto a la subrutina / función en la que se encuentra la llamada goto (o el programa principal, si la llamada está el programa principal).

Entonces, por ejemplo, en el siguiente programa, el programa principal y las dos subrutinas contenidas tienen su propia etiqueta 50, y los gotos van a "su" línea 50.

program testgotos
    implicit none

    goto 50
    call second
 50 call first
    call second

contains

    subroutine first
    integer :: a = 10

    goto 50
    a = 20
 50 print *,''First: a = '', a

    end subroutine first

    subroutine second
    integer :: a = 20

    goto 50
    a = 40
 50 print *,''Second: a = '', a

    end subroutine second

end program testgotos

Answer 2

Local.

Técnicamente del estándar f77 ( http://www.fortran.com/fortran/F77_std/f77_std.html )

"Las etiquetas de declaración tienen el alcance de una unidad de programa".