TOPS-20 PASCAL Language Manual - Bitsavers

PROCEDURES AND FUNCTIONS
Table 6-1:
Predeclared Procedures
Procedure
Parameter Type
Action
CLOSE (f)
f = file variabJe
Closes file f.
DATE(string)
string = variable of
type PACKED ARRAY
r 1 •• 1 1 1 0 F C HA R 1
Assigns current date
to string.
DISPOSE (p)
p = pointer variable
Dea.lJocates
for p ..... The
variable p
undefined.
storage
po in ter
becomes
DISPOSE(p,
tl, ... ,tn)
FIND (f ,n)
p = pointer variable
tl, ... ,tn tag
field constants
f = file variable n
positive integer
expression
Releases storage
occupied by p .... ; used
when p .... is a record
with variants. Tag
field values are
optional; if
specified, they must
be identical to
those specified when
storage
was
allocated by NEW.
Moves the current
file position to
component n of file
f •
GET (f)
f
file variable
Moves the current
file position to the
next component of f.
Then GET (f) assigns
the value of that
component to f .... , the
file buffer
variable.
HALT
None
Terminates execution
of the program.
LINELIMIT(f,n)
f text
variable n
expression
file
integer
Terminates execution
of the program when
output to file f
exceeds n lines. The
value for n is reset
to its default after
each call to REWRITE
for file f.
MARK (a)
a a variable of
type .... INTEGER
Places a marker for
use when allocating
memory for dynamic
variables.
NEW (p)
p
pointer variable
Allocates storage
for p.... and assigns
its address to p.
~-2