paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-05 18:00:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* bugfix of set_in_byte, long must be used at start, same is true for

Browse Source 
another routine
This commit is contained in:
carl 1998-06-17 13:59:08 +00:00
parent 90b33c20e2
commit 0acb09468b
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/m68k/set.inc
View File

@ -34,7 +34,7 @@
procedure do_set;assembler;
asm
XDEF SET_SET_BYTE
move.b d0,d6
move.l d0,d6
{ correct long position: }
{ -> (value div 32)*4 = longint }
{ (value shr 5)*shl 2 }
@ -69,7 +69,7 @@
{ (D0) }
asm
XDEF SET_IN_BYTE
move.b d0,d6
move.l d0,d6
{ correct long position: }
{ -> (value div 32)*4 = longint }
{ (value shr 5)*shl 2 }
@ -427,7 +427,11 @@
{
$Log$
Revision 1.3 1998-06-05 12:32:07 carl
Revision 1.4 1998-06-17 13:59:08 carl
* bugfix of set_in_byte, long must be used at start, same is true for
another routine
Revision 1.3 1998/06/05 12:32:07 carl
* calculating sets is COMPLETELY different from the intel in
determining the bit number
* new passing parameters conventions