Inicio Explorar Axuda
Iniciar sesión
pascal
/
freepascal.compiler
réplica de https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Ficheiros Incidencias 0 Wiki
Explorar o código

* ensure that the new mm related procs are only used for 3.3.1 and newer as 3.2 and older don't support the corresponding SSE types

git-svn-id: trunk@43967 -
svenbarth %!s(int64=5) %!d(string=hai) anos
pai
b3c579f49c
achega
8184815780
Modificáronse 2 ficheiros con 5 adicións e 1 borrados
Dividir vista Mostrar estatísticas de Diff
  1. 3 1
      rtl/i386/cpuh.inc
  2. 2 0
      rtl/x86_64/cpuh.inc

+ 3 - 1
rtl/i386/cpuh.inc
Ver ficheiro 

@@ -42,4 +42,6 @@ function fpc_x86_get_fs:longint;[internproc:fpc_in_x86_get_fs];
 
 function fpc_x86_get_gs:longint;[internproc:fpc_in_x86_get_gs];
 
 
 { include automatically generated procs }
 
-{$i cpummprocs.inc}  
+{$if not defined(VER3_0) and not defined(VER3_2)}
 
+{$i cpummprocs.inc}
 
+{$endif not VER3_0 and not VER3_2}

+ 2 - 0
rtl/x86_64/cpuh.inc
Ver ficheiro 

@@ -33,4 +33,6 @@ function fpc_x86_get_fs:longint;[internproc:fpc_in_x86_get_fs];
 
 function fpc_x86_get_gs:longint;[internproc:fpc_in_x86_get_gs];
 
 
 { include automatically generated procs }
 
+{$if not defined(VER3_0) and not defined(VER3_2)}
 
 {$i cpummprocs.inc}
 
+{$endif not VER3_0 and not VER3_2}