Revision b1f4c7a9f230d031987e0e9178f1d10c66c19fbc authored by Bill Joy on 21 April 1979, 11:46:59 UTC, committed by Bill Joy on 21 April 1979, 11:46:59 UTC
Work on file upgrade/libretro/getpwent.c.16u Synthesized-from: 2bsd
1 parent cabad19
expr.p
program x(output);
var
a: set of char;
b: Boolean;
c: (red, green, blue);
p: ^ integer;
A: alfa;
B: packed array [1..5] of char;
begin
b := true;
c := red;
new(p);
a := [];
A := 'Hello, yellow';
b := a and b;
a := a * 3;
if input < 2 then writeln('boo');
if p <= 2 then writeln('sure nuff');
if A = B then writeln('same');
if c = true then writeln('hue''s and color''s')
end.
Computing file changes ...
