Browse Source

* force att reading

peter 27 years ago
parent
commit
a9e0837f1e
2 changed files with 15 additions and 4 deletions
  1. 9 3
      rtl/i386/i386.inc
  2. 6 1
      rtl/i386/strings.pp

+ 9 - 3
rtl/i386/i386.inc

@@ -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

+ 6 - 1
rtl/i386/strings.pp

@@ -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
 
 }