13.3.0 Assign

Assign

Declaration:: Procedure Assign (Var F; Name : String);
Description:: Assign assigns a name to F, which can be any file type. This call doesn’t open the file, it just assigns a name to a file variable, and marks the file as closed.
Errors:: None.
See also:: Reset (558), Rewrite (559), Append (452)

Listing: refex/ex5.pp

Program Example5;

{ Program to demonstrate the Assign function. }

Var F : text;

begin
  Assign (F,'');
  Rewrite (f);
  { The following can be put in any file by redirecting it
    from the command line.}
  Writeln (f,'This goes to standard output !');
  Close (f);
  Assign (F,'Test.txt');
  rewrite (f);
  writeln (f,'This doesn''t go to standard output !');
  close (f);
end.

[next] [prev] [prev-tail] [front] [up]