mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 08:09:33 +02:00
+ assembler mode forced to ATT style for x86 cpu
This commit is contained in:
parent
ba59054e84
commit
e828773c4e
@ -15,7 +15,6 @@
|
||||
|
||||
{ Include syscall itself }
|
||||
{i syscallo.inc}
|
||||
|
||||
Function Sys_mmap(adr,len,prot,flags,fdes,off:longint):longint; // moved from sysunix.inc, used in sbrk
|
||||
|
||||
begin
|
||||
@ -33,6 +32,7 @@ begin
|
||||
if (pointer(func)=nil) or (sp=nil) then
|
||||
exit(-1); // give an error result
|
||||
{$ifdef cpui386}
|
||||
{$ASMMODE ATT}
|
||||
asm
|
||||
{ Insert the argument onto the new stack. }
|
||||
movl sp,%ecx
|
||||
@ -122,7 +122,10 @@ end;
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.1 2003-10-30 16:42:25 marco
|
||||
Revision 1.2 2003-10-31 08:55:11 mazen
|
||||
+ assembler mode forced to ATT style for x86 cpu
|
||||
|
||||
Revision 1.1 2003/10/30 16:42:25 marco
|
||||
* Killing off old syscall convention anywhere except for oldlinux
|
||||
|
||||
Revision 1.19 2003/10/17 20:56:24 olle
|
||||
|
@ -22,7 +22,7 @@ Procedure WritePortW (Port : Longint; Var Buf; Count: longint);
|
||||
Procedure WritePortl (Port : Longint; Var Buf; Count: longint);
|
||||
|
||||
implementation
|
||||
|
||||
{$ASMMODE ATT}
|
||||
|
||||
Procedure WritePort (Port : Longint; Value : Byte);
|
||||
{
|
||||
@ -286,4 +286,4 @@ begin
|
||||
end ['ECX','EDI','EDX'];
|
||||
end;
|
||||
|
||||
end.
|
||||
end.
|
||||
|
Loading…
Reference in New Issue
Block a user