HP SunSoft Pascal 4.0 Manuel d'utilisateur Page 223

  • Télécharger
  • Ajouter à mon manuel
  • Imprimer
  • Page
    / 333
  • Table des matières
  • MARQUE LIVRES
  • Noté. / 5. Basé sur avis des utilisateurs
Vue de la page 222
The FORTRAN–Pascal Interface 199
8
The Pascal main program,
SimValmain.p
program SimVal(output);
var
t: boolean := true;
f: boolean := false;
c: char := 'z';
i: integer := 9;
r: real := 9.9;
s: integer16 := 9;
args: integer;
procedure simval(t, f: boolean; c: char; i: integer;
r: real; s: integer16; var reply: integer);
external fortran;
begin
simval(t, f, c, i, r, s, args);
writeln('args=', args: 6 oct, ' (If nth digit=1, arg n OK.)')
end. { SimVal }
The commands to compile and
execute SimVal.f and
SimValmain.p
hostname% f77 -c SimVal.f
SimVal.f:
simval:
hostname% pc SimVal.o SimValmain.p -lpfc -lF77
hostname% a.out
args=111111 (If nth digit=1, arg n OK.)
Vue de la page 222
1 2 ... 218 219 220 221 222 223 224 225 226 227 228 ... 332 333

Commentaires sur ces manuels

Pas de commentaire