1 DEFINITION MODULE DosTracer;
3 FROM SYSTEM IMPORT ADDRESS;
4 FROM MathTracer IMPORT SCALAIRE;
5 FROM Dos IMPORT Open, Close, Write, FileHandlePtr, newFile, oldFile;
8 FICHIER= FileHandlePtr;
10 PROCEDURE OuvreFichierSortie(Nom: ADDRESS): FICHIER;
11 PROCEDURE OuvreFichierEntree(Nom: ADDRESS): FICHIER;
12 PROCEDURE FermeFichier(Handle: FICHIER);
13 PROCEDURE SauveEntier(Fichier: FICHIER; n: INTEGER);
14 PROCEDURE SauveScalaire(Fichier: FICHIER; x: SCALAIRE);
15 PROCEDURE RecupereEntier(Fichier: FICHIER): INTEGER;
16 PROCEDURE RecupereScalaire(Fichier: FICHIER): SCALAIRE;