TOPS-20 PASCAL Language Manual - Bitsavers

PASCAL DATA TYPES
2.3.2.2 Assigning Values to Records - To assign values to a record
variable, use an assignment statement to specify a value for each
field of the record. The following example shows the declaration of a
record and the assignment of values to two of the fields.
TYPE ROSTER - RECORD
Name: PACKED ARRAY[1 •• 30J OF CHAR;
Number: INTEGER;
Grade:: I:::EAL..;
END;
VAR Student ROSTER;
Testl,Test2,Test3
BEGIN
INTEGER;
WRITEL..N ('Enter your name.');
READLN (Student.Name);
Stu(·.lf~'nt • G J'i:H:.h:~ : =:: (T es t 1 + T E~S t2 + T €.'S t3) / :3;
If you are initializing a record with a variant clause, you must
always specify a value for the tag field, even if it has no tag name.
Specifying a value for the tag field, ensures that PASCAL initializes
the correct variant, for example:
TYPE Sex = (Male, Female);
Pe rson ::;; RECORD
Birthdate: RECORD
Month:
Day:
Year:
END;
Ase: INTEGER;
CASE s~~~< of
Male:
Female:
1 •• 12;
1 •• 31 ;
INTEGER;
(Bearded:BOOLEAN);
(N_Children:INTEGER);
END;
VAR Dad: Person := «5, 15, 1921), 62, Male, TRUE);
2.3.2.3 Record Type Compatibility - Two records are compatible if
their types are identical or equivalent, for example:
TYPE Life = RECORD
:Born
:Died
lEND;
Plantlife = Life;
INTEGER;
INTEGER
VAR
Mom, Dad : Life;
Coleus : Plantlife;
The record variables Mom, Dad, and Coleus are all compatible. Mom and
Dad are both of type Life, which is equivalent to type Plantlife.
2-19