TOPS-20 PASCAL Language Manual - Bitsavers

PASCAL DATA TYPES
When you specify the tag field in the first form (tag name tag
type), you should reference on] y the fields in the currently val i(]
variant. The following example shows the use of this form:
TYPE Name ~
D a '.:~ ;;;: (M 0 n ~ T 1..1 (~~ y W p (j ~ T h IJ, F l' i ) ;
~~ t () C k ::" F< E C Cl F< 1:1
F'd r t : 1.. (;9 (J 9 ,
PACKED ARRAY [1 •• 20J OF CHAR,
Stoc~_Quantit~
: INTEGER,
f:>upp J if:" r : Name;
CASE Onorde1' : BOOLEAN OF
T"HUE :(P1'omi~:;pd: Da~:I;
o T' d f.~ T' _. (J u ant i t ~~
Price: REAL);
FALf:;C
END,
: (l..ast .... :~hipmf.·~nt
F