Il Linguaggio Fortran 90/95

5.7 Interfacce esplicite ed implicite 239
... ! N.B. nessuna ’’host association’’
END FUNCTION second
Le procedure esterne non possono in alcun caso condividere dati tramite una host association.
Il trasferimento dei dati attraverso gli argomenti è il modo più comune di condividere dati con
una procedura esterna. Le procedure esterne possono essere invocate da tutti gli altri tipi di
procedura.
5.7 Interfacce esplicite ed implicite
Una interfaccia ha luogo ogni qualvolta una unità di programma invoca un’altra unità di
programma. Affinché il programma funzioni correttamente è necessario che gli argomenti attuali
dell’unità di programma chiamante siano ”consistenti” con i corrispondenti parametri formali
della procedura chiamata: questa condizione è verificata dal compilatore attraverso un test
sull’interfaccia.
Un problema serio può nascere quando una variabile occupa in una lista di argomenti attuali
il posto che competerebbe ad un array. La procedura invocata non è, generalmente, in grado
di comprendere la differenza tra una variabile scalare ed un array per cui essa tratterà quella
variabile e quelle che seguono in termini di locazioni di memoria come se fossero parte di un
unico array. In questo caso la procedura può modificare perfino il valore di una variabile che
non le è stata passata per riferimento solo perché la sua locazione di memoria segue quella di
un parametro attuale. Problemi come questo sono estremamente difficili da trovare e correggere
quando si lavora con procedure esterne, a meno di non rendere esplicita l’interfaccia, come sarà
chiaro tra breve.
Quando una procedura è compilata all’interno di un modulo e questo modulo è utilizzato
dal programma chiamante, tutti i dettagli dell’interfaccia vengono messi a disposizione del
compilatore. Quando il programma chiamante viene compilato, il compilatore può controllare
automaticamente il numero degli argomenti coinvolti nella chiamata della procedura, il tipo di
ogni argomento, lo scopo (INTENT) di ogni argomento e se gli argomenti sono array. In sintesi, il
compilatore può rilevare molti degli errori tipici che si possono commettere quando si usano delle
procedure. Pertanto, nel caso di procedura compilata all’interno di un modulo e utilizzata con
l’istruzione USE si parla di interfaccia esplicita, in quanto il compilatore conosce esplicitamente
tutti i dettagli su ogni argomento della procedura; tutte le volte che questa procedura viene
utilizzata, il compilatore controlla l’interfaccia per verificare che ogni componente sia utilizzato
in modo appropriato. Anche nel caso di procedure interne tutte queste informazioni sono note
al compilatore per cui, ancora, si parla di interfaccia esplicita: da questo punto di vista questa
situazione non è dissimile dalla chiamata di una procedura intrinseca. Al contrario, nel caso di
procedure esterne non incluse in un modulo si parla di interfaccia implicita: il compilatore non
ha informazioni su queste procedure quando compila l’unità di programma chiamante, quindi
suppone che il programmatore abbia specificato correttamente il numero, il tipo, lo scopo e le
altre caratteristiche degli argomenti delle procedure: in caso di errore il programma si arresta
in modo imprevedibile.