[ < ] [ > ]   [ << ] [ Up ] [ >> ]         [Top] [Contents] [Index] [ ? ]

9.137 LongBool

(Under construction.)

Synopsis

 
type
  LongBool = Boolean (BitSizeOf (LongInt));

Description

Conforming to

Example

 
program LongBoolDemo;
var
  a: LongBool;
begin
  LongInt (a) := 1;
  if a then WriteLn ('Ord (True) = 1')
end.

See also



This document was generated by Frank Heckenbach on May, 10 2002 using texi2html