HP SunSoft Pascal 4.0 Manual do Utilizador descarregar pdf (Página 106)

100

101

82 Pascal 4.0 User’s Guide

Using the define Variable Attribute

This example makes global public using the deﬁne attribute of the variable

declaration.

The program unit,

defvar_prog.p

program defvar_prog;

var

global: extern integer;

procedure proc;

external;

begin

global := 1;

writeln('From MAIN, before PROC: ', global);

proc;

writeln('From MAIN, after PROC: ', global);

end. { defvar_prog }

The module unit, defvar_mod.p,

which makes global public using

the define attribute

module defvar_mod;

var

global : define integer;

procedure proc;

begin

writeln('From PROC : ',global);

global := global + 1;

end; { proc }

1 2 ... 101 102 103 104 105 106 107 108 109 110 111 ... 332 333

Comentários a estes Manuais

Sem comentários

HP SunSoft Pascal 4.0 Manual do Utilizador Página 106

Comentários a estes Manuais

Manuais e produtos relacionados com Software HP SunSoft Pascal 4.0