paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 15:47:53 +02:00
Code Issues Packages Projects Releases Wiki Activity

* force att reading

Browse Source
This commit is contained in:
peter 1998-05-30 14:30:21 +00:00
parent 1d389f6211
commit a9e0837f1e
2 changed files with 15 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
rtl/i386/i386.inc
View File

@ -15,6 +15,8 @@
**********************************************************************}
{$ASMMODE ATT}
{****************************************************************************
Move / Fill
****************************************************************************}
@ -147,7 +149,7 @@ end;
Object Helpers
****************************************************************************}
{$I386_DIRECT}
{$ASMMODE DIRECT}
procedure int_help_constructor;assembler; [public,alias:'HELP_CONSTRUCTOR'];
asm
@ -309,6 +311,8 @@ asm
addl $4,%esp
end;
{$ASMMODE ATT}
{****************************************************************************
String
@ -704,7 +708,6 @@ begin
end;
{$I386_ATT}
Function Random(L: LongInt): LongInt;assembler;
asm
@ -720,7 +723,10 @@ end;
{
$Log$
Revision 1.10 1998-05-25 10:40:49 peter
Revision 1.11 1998-05-30 14:30:21 peter
* force att reading
Revision 1.10 1998/05/25 10:40:49 peter
* remake3 works again on tflily
Revision 1.5 1998/04/29 13:28:19 peter

7
rtl/i386/strings.pp
View File

@ -92,6 +92,8 @@ interface
implementation
{$ASMMODE ATT}
function strcopy(dest,source : pchar) : pchar;
begin
@ -585,7 +587,10 @@ end.
{
$Log$
Revision 1.2 1998-05-23 01:14:06 peter
Revision 1.3 1998-05-30 14:30:22 peter
* force att reading
Revision 1.2 1998/05/23 01:14:06 peter
+ I386_ATT switch
}