+ CPU type corei

git-svn-id: trunk@26790 -

compiler/i386/cpuinfo.pas

@@ -47,6 +47,7 @@ Type
        cpu_Pentium3,
        cpu_Pentium4,
        cpu_PentiumM,
+       cpu_core_i,
        cpu_core_avx,
        cpu_core_avx2
       );
@@ -88,6 +89,7 @@ Const
      'PENTIUM3',
      'PENTIUM4',
      'PENTIUMM',
+     'COREI',
      'COREAVX',
      'COREAVX2'
    );
@@ -147,6 +149,7 @@ type
      { cpu_Pentium3  } [CPUX86_HAS_SSEUNIT],
      { cpu_Pentium4  } [CPUX86_HAS_SSEUNIT],
      { cpu_PentiumM  } [CPUX86_HAS_SSEUNIT],
+     { cpu_core_i    } [CPUX86_HAS_SSEUNIT,CPUX86_HAS_POPCNT],
      { cpu_core_avx  } [CPUX86_HAS_SSEUNIT,CPUX86_HAS_POPCNT,CPUX86_HAS_AVXUNIT],
      { cpu_core_avx2 } [CPUX86_HAS_SSEUNIT,CPUX86_HAS_POPCNT,CPUX86_HAS_AVXUNIT,CPUX86_HAS_BMI1,CPUX86_HAS_BMI2,CPUX86_HAS_LZCNT,CPUX86_HAS_MOVBE]
    );

compiler/x86_64/cpuinfo.pas

@@ -41,6 +41,7 @@ Type
    tcputype =
       (cpu_none,
        cpu_athlon64,
+       cpu_core_i,
        cpu_core_avx,
        cpu_core_avx2
       );
@@ -80,6 +81,7 @@ Const
 
    cputypestr : array[tcputype] of string[10] = ('',
      'ATHLON64',
+     'COREI',
      'COREAVX',
      'COREAVX2'
    );
@@ -130,6 +132,7 @@ type
    cpu_capabilities : array[tcputype] of set of tcpuflags = (
      { cpu_none      } [],
      { Athlon64      } [CPUX86_HAS_SSEUNIT],
+     { cpu_core_i    } [CPUX86_HAS_SSEUNIT,CPUX86_HAS_POPCNT],
      { cpu_core_avx  } [CPUX86_HAS_SSEUNIT,CPUX86_HAS_POPCNT,CPUX86_HAS_AVXUNIT],
      { cpu_core_avx2 } [CPUX86_HAS_SSEUNIT,CPUX86_HAS_POPCNT,CPUX86_HAS_AVXUNIT,CPUX86_HAS_BMI1,CPUX86_HAS_BMI2,CPUX86_HAS_LZCNT,CPUX86_HAS_MOVBE]
    );