Node:and then, Next:and_then, Previous:and, Up:Reference
{ `and then' is built in. A user-defined operator cannot consist of
two words. }
operator and then (operand1, operand2: Boolean) = Result: Boolean;
and then is an alias for the short-circuit logical operator
and_then.
While and_then is defined in ISO 10206 Extended Pascal,
and then is a GNU Pascal extension.
program AndThenDemo;
var
p: ^Integer;
begin
New (p);
ReadLn (p^);
if (p <> nil) and then (p^ < 42) then { This is safe. }
WriteLn (p^, ' is less than 42')
end.