Il Linguaggio Fortran 90/95

5.4 Variabili locali 227
• Il loro valore non è conservato tra due chiamate consecutive della procedura.
• ”Non esistono” (ossia non è riservata loro memoria) tra due chiamate consecutive di
procedura.
5.4.1 Attributo e istruzione SAVE
Secondo le specifiche standard del linguaggio, i valori di tutti gli array e delle variabili locali di
una procedura diventano indefiniti all’atto dell’uscita dalla procedura. La volta successiva che
detta procedura viene chiamata, i valori degli array e delle variabili locali potrebbero non essere
stati conservati, ciò dipendendo esclusivamente dal particolare compilatore. Il Fortran 90/95
dispone, tuttavia, di uno strumento che permette di mantenere inalterati i valori degli array e
delle variabili locali fra due chiamate consecutive di procedura. Questo strumento è l’attributo
SAVE che, come qualsiasi altro attributo, deve essere specificato all’interno di una istruzione
di dichiarazione di tipo: qualsiasi variabile locale dichiarata con l’attributo SAVE sarà salvata
fra due chiamate di procedura. La sintassi di una istruzione di definizione di variabile con
l’attributo SAVE è la seguente:
tipo, SAVE :: lista_di_variabili
mentre un esempio valido è il seguente:
COMPLEX, SAVE :: x, y, z
Le variabili locali definite con l’attributo SAVE, pertanto, si comportano esattamente come
variabili static del C.
Si noti che qualsiasi variabile locale che venga inizializzata in un’istruzione di dichiarazione di
tipo viene automaticamente salvata, indipendentemente dal fatto che venga specificato o meno
l’attributo SAVE. Ad esempio, le seguenti variabili saranno salvate entrambe fra due chiamate
consecutive delle procedure che le contengono:
REAL, SAVE :: x1=0.
REAL :: x2=0.
Il Fortran 90/95 dispone, inoltre, dell’istruzione SAVE. Si tratta di un’istruzione non eseguibile
che va inclusa nella sezione dichiarativa della procedura con le istruzioni di dichiarazione di
tipo. Tutte le variabili locali elencate nell’istruzione SAVE restano inalterate fra due chiamate
consecutive della procedura. Se nessuna variabile viene specificata nell’istruzione SAVE saranno
salvate tutte le variabili locali. Il formato dell’istruzione SAVE è il seguente:
SAVE :: lista_di_variabili
o semplicemente:
SAVE
A conclusione dell’argomento si sottolinea l’ovvia inutilità dell’uso dell’attributo o dell’istruzione
SAVE relativamente ai dati dichiarati con l’attributo PARAMETER. E’ altresì evidente che
l’attributo e l’istruzione SAVE non hanno alcun significato in un programma principale poiché
l’uscita dal main costituisce la fine dell’esecuzione del programma.