Browse Source

* added some more $ifdef FPCNAMES

peter 27 years ago
parent
commit
8b2c09d032
1 changed files with 7 additions and 4 deletions
  1. 7 4
      rtl/i386/i386.inc

+ 7 - 4
rtl/i386/i386.inc

@@ -215,7 +215,7 @@ asm
 end;
 end;
 
 
 
 
-procedure int_new_class;assembler;[public,alias:'FPC_NEW_CLASS'];
+procedure int_new_class;assembler;[public,alias:{$ifdef FPCNAMES}'FPC_'+{$endif}'NEW_CLASS'];
 asm
 asm
      { create class ? }
      { create class ? }
      movl 8(%ebp),%edi
      movl 8(%ebp),%edi
@@ -238,7 +238,7 @@ asm
 end;
 end;
 
 
 
 
-procedure int_dispose_class;assembler;[public,alias:'FPC_DISPOSE_CLASS'];
+procedure int_dispose_class;assembler;[public,alias:{$ifdef FPCNAMES}'FPC_'+{$endif}'DISPOSE_CLASS'];
 asm
 asm
      { destroy class ? }
      { destroy class ? }
      movl 8(%ebp),%edi
      movl 8(%ebp),%edi
@@ -259,7 +259,7 @@ end;
 
 
 
 
 { checks for a correct vmt pointer }
 { checks for a correct vmt pointer }
-procedure int_check_object;assembler;[public,alias:'FPC_CHECK_OBJECT'];
+procedure int_check_object;assembler;[public,alias:{$ifdef FPCNAMES}'FPC_'+{$endif}'CHECK_OBJECT'];
 asm
 asm
      pushl %edi
      pushl %edi
      movl 8(%esp),%edi
      movl 8(%esp),%edi
@@ -690,7 +690,10 @@ end;
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.24  1998-09-28 10:23:43  florian
+  Revision 1.25  1998-09-28 11:02:34  peter
+    * added some more $ifdef FPCNAMES
+
+  Revision 1.24  1998/09/28 10:23:43  florian
     * FPC_NEW_CLASS optimized: addl $0,%eax => orl %eax,%eax
     * FPC_NEW_CLASS optimized: addl $0,%eax => orl %eax,%eax
 
 
   Revision 1.23  1998/09/28 08:40:47  michael
   Revision 1.23  1998/09/28 08:40:47  michael