La compilation et la correction des erreurs

Le compilateur de Format s'appelle f77 (c'est général sous UNIX). Compilation d'un programme contenu dans truc.f :

Le fichier exécutable se nomme alors a.out. Si vous préférez appeler votre exécutable chose, utilisez l'option -o :

est indispensable si vous voulez par la suite débugger votre programme. L'omission de l'option -g rendra impossible l'utilisation du debugger. Utilisez-la systématiquement lorsque vous mettez au point votre programme.

optimise votre programme, qui tournera plus vite. L'option -O est incompatible avec l'option -g.

Il est possible de couper un programme FORTRAN en plusieurs fichiers sources : il suffit que l'un des fichiers sources contienne le programme principal et on peut ensuite répartir l'ensemble des subroutines et fonctions dans des fichiers différents.

Pour compiler tous ces fichiers en même temps, on indique leurs noms à la queue leu leu après f77. Indiquez le fichier contenant le programme principal en tête de liste !

Si vous examinez votre répertoire après avoir compilé un ou plusieurs fichiers FORTRAN, vous y trouverez des fichiers finissant par .o. Il s'agit de fichiers dits objets.

Le fichier truc.o contiendra le code machine correspondant au fichier source truc.f, mais les appels aux subroutines extérieures à truc.o sont laissées en suspens.

Un éditeur de liens appelé ld fait alors le lien entre tous les fichiers .o pour engendrer l'exécutable correspondant. Dans la ligne de compilation précédente, les deux phases sont effectuées successivement de manière transparente pour l'utilisateur :

On peut imposer cette décomposition soi-même en utilisant l'option -c pour chaque fichier source :

Ceci peut être intéressant lorsque l'on compile de gros programmes (plusieurs dizaines de fichiers sources) pour ne pas avoir à recompiler les fichiers sources qui n'ont pas été modifiés. Un utilitaire très puissant appelé « make » permet de gérer simplement ce procédé.

Utilisation de librairies

Une librairie est une collection de fichiers objets .o archivés dans un même fichier dont le nom commence généralement par lib et finit toujours par .a. La librairie NAG est par exemple archivée dans libnag.a.

Les librairies sont placées à des endroits de l'arborescence de fichiers que vous n'êtes pas obligés de connaître et auxquels vous avez accès si votre compte est configuré pour cela. Pour lier la librairie libxxx.a à votre programme :

La figure 12.1 présente un extrait (traduit en français) des « manual pages » UNIX de la commande f77. Il existe beaucoup plus d'options que celles présentées ici. Le lecteur intéressé pourra se reporter à la documentation FORTRAN SUN §1.3 ou bien consulter les pages manuelles complètes par la commande :

NAME
      f77 - Sun FORTRAN compiler



SYNOPSIS
      f77  [-C] [-c] [-g] [-lx] [-o output] [-u] sourcefile ...



OPTIONS
 -c   Compilation sans édition de lien; Permet de créer les
      différents fichiers objets (.o) des fichiers .f qui
      figurent en argument.



ex: f77 -c test.f     ou       f77 -c *.f 



-C   Permet lors de la compilation de tester si l'on dépasse de
      manière explicite la dimension d'un vecteur ou d'un tableau. 



-g   Génère les fichiers objets et exécutables associés à une
      table de symboles  permettant d'utiliser le débugger dbx.



ex: f77 -g *.f
          dbx a.out 



-lx  Permet l'édition de liens avec les fichiers objets d'une
      bibliothèque de sous-programmes (libx.a).



ex: f77 -c *.f
          f77 *.o -lnag  (pour la bibliothèque NAG) 



-o output
      
      Permet de donner un autre nom (ici output) au fichier
      exécutable.



ex: f77 *.f -o exec

-u Génère une erreur avec un message pour toute les variables non déclarées (équivalent à placer l'instruction "IMPLICIT NONE" en tête de tous les programmes)

Quelques erreurs de compilation

Problème de parenthèses. Attention le problème peut provenir d'une ligne en amont de la ligne indiquée.

Un common n'a pas la même taille dans les différents sous-programme où il est utilisé. Bien que ce problème n'empêche pas la compilation (Warning), il entraînera généralement une erreur d'exécution.

Une instruction de déclaration est placée au milieu de la partie exécutable du programme.

Il manque une quote (') pour fermer une chaine de caractères. Cela arrive souvent lorsqu'une instruction est écrite à partir de la 6^ème colonne ou bien lorsque vous dépassez la 72^ème colonne. Cette erreur peut aussi arriver lorsqu'on oublie le caractère de déclaration de commentaire en première colonne.

Lorsque l'un des symboles « undefined » est _MAIN_, c'est qu'il n'y a pas de programme principal. Cela se produit si vous compilez un fichier ne contenant que des subroutines sans l'option -c.

Quelques erreurs d'exécution

NaN signifie « Not a Number ». Se produit lorsque les arguments d'une fonction ne sont pas dans son domaine de définition (exemple racine d'un nombre négatif) Remarque: Il est possible que l'exécution continue en affichant la valeur NaN là où l'on attendait voir s'afficher des résultats par l'intermédiaire d'une instruction WRITE.

Même principe que ci-dessus. Inf signifie « Infinity ». Se produit lorsqu'une opération donne un nombre trop grand pour être codé dans un type donné.

Survient lorsqu'on oublie de déclarer EXTERNAL une fonction ou une subroutine passée en argument à une fonction ou subroutine.

Le type de la donnée lue au clavier ou sur un fichier est incompatible avec le format de lecture spécifié dans l'instruction READ.

Erreur de format; la valeur à écrire ne peut l'être avec le formattage spécifié dans l'instruction write.

Ces deux listes d'erreurs ne sont pas exhaustives. Il est vraisemblable que vous rencontriez beaucoup d'autres erreurs. Dans ce cas, et afin d'affiner ces listes , prévenez-nous ou envoyez-nous le programme pour que nous les complétions.

La compilation et la correction des erreurs

Le compilateur FORTRAN SUN

Utilisation de librairies

Quelques erreurs de compilation

Quelques erreurs d'exécution