Merged revisions 4138 via svnmerge from

http://svn.freepascal.org/svn/fpc/trunk

........
  r4138 | florian | 2006-07-10 20:03:30 +0200 (Mo, 10 Jul 2006) | 2 lines
  
  * amd specific flags are checked against cpu vendor
........

git-svn-id: branches/fixes_2_0@4139 -

rtl/i386/mmx.pp

@@ -109,7 +109,8 @@ unit mmx;
          _edx : longint;
 
       begin
-         if cpuid_support then
+         { are there third party cpus supporting amd 3d instructions? }
+         if cpuid_support and (getdevel=10) then
            begin
               asm
                  movl $0x80000001,%eax
@@ -129,7 +130,8 @@ unit mmx;
          _edx : longint;
 
       begin
-         if cpuid_support then
+         { are there third party cpus supporting amd dsp instructions? }
+         if cpuid_support and (getdevel=10) then
            begin
               asm
                  movl $0x80000001,%eax
@@ -149,7 +151,8 @@ unit mmx;
          _edx : longint;
 
       begin
-         if cpuid_support then
+         { are there third party cpus supporting amd mmx instructions? }
+         if cpuid_support and (getdevel=10) then
            begin
               asm
                  movl $0x80000001,%eax
@@ -212,8 +215,8 @@ unit mmx;
     procedure femms;assembler;
 
       asm
-          .byte 0x0f, 0x0e
-{         femms instruction not supported with older as versions }
+        { femms instruction not supported with older as versions }
+        .byte 0x0f, 0x0e
       end;