[fpc-devel] Definition of the time-fration in a TDateTime before 30/12/1899

[Michael Van Canneyt]

On Mon, 22 May 2006, Florian Klaempfl wrote:

> Vincent Snijders wrote:
>>  dt := EncodeDateTime(1652, 6, 15, 12, 34, 56, 12);
>>  if '1652-06-15 12:34:56' <> tiUtils.tiDateTimeAsIntlDateDisp(dt)
>>    then halt(5);
>>
>> [....]
>> end.
>
> We use the simple approach with halt because using the fpcunit for basic tests
> would require that OOP works always but it could be easily broken and thus all
> tests would fail. So we designed the test suite in a way which keeps
> prerequisits as low as possible.

That is what I would like to keep :)

Michael.