* use div instead of / in constant

This commit is contained in:
peter 2001-04-04 22:50:59 +00:00
parent b193bf7df3
commit e3b5f763b7

View File

@ -73,19 +73,19 @@ Const
const const
SI_PAD_SIZE = ((128/sizeof(longint)) - 3); SI_PAD_SIZE = ((128 div sizeof(longint)) - 3);
type type
tfpreg = record tfpreg = record
significand: array[0..3] of word; significand: array[0..3] of word;
exponent: word; exponent: word;
end; end;
pfpstate = ^tfpstate; pfpstate = ^tfpstate;
tfpstate = record tfpstate = record
cw, sw, tag, ipoff, cssel, dataoff, datasel: cardinal; cw, sw, tag, ipoff, cssel, dataoff, datasel: cardinal;
st: array[0..7] of tfpreg; st: array[0..7] of tfpreg;
status: cardinal; status: cardinal;
end; end;
{$Ifdef i386} {$Ifdef i386}
@ -185,7 +185,10 @@ type
{ {
$Log$ $Log$
Revision 1.2 2000-09-11 14:05:31 marco Revision 1.3 2001-04-04 22:50:59 peter
* use div instead of / in constant
Revision 1.2 2000/09/11 14:05:31 marco
* FreeBSD support and removed old signalhandling * FreeBSD support and removed old signalhandling
Revision 1.1.2.1 2000/09/10 16:17:25 marco Revision 1.1.2.1 2000/09/10 16:17:25 marco