Subj : not ignoring you... but...
To   : Bj”rn Felten
From : Scott Little
Date : Sun Jul 11 2004 07:33 am

 [ 10 Jul 04 18:12, Bj”rn Felten wrote to mark lewis ]

 BF> function IsLeapYear;
 BF> begin
 BF>   IsLeapYear := (Source and 3 = 0)
 BF> end;

Urm.. just to be a pedant,

((source and 3 = 0) and not (source mod 100 = 0)) or (source mod 400 = 0)

:)


-- Scott Little  [fidonet#3:712/848 / sysgod@sysgod.org]

--- GoldED+/W32 1.1.5-31012
 * Origin: Cyberia: 100% Grade "A" mansteak baby. (3:712/848)

.