Browse Source

+ missing mips targets added

florian 2 weeks ago
parent
commit
4bb876ed98
1 changed files with 23 additions and 6 deletions
  1. 23 6
      compiler/utils/fpc.pp

+ 23 - 6
compiler/utils/fpc.pp

@@ -73,11 +73,14 @@ Const
       'avr': Result := 'avr';
       'avr': Result := 'avr';
       'i386': Result := '386';
       'i386': Result := '386';
       'i8086': Result := '8086';
       'i8086': Result := '8086';
-      'jvm': Result := 'jvm';  
+      'jvm': Result := 'jvm';
       'loongarch64': Result:='loongarch64';
       'loongarch64': Result:='loongarch64';
       'm68k': Result := '68k';
       'm68k': Result := '68k';
       'mips': Result := 'mips';
       'mips': Result := 'mips';
       'mipsel': Result := 'mipsel';
       'mipsel': Result := 'mipsel';
+      'mipseb': Result := 'mipseb';
+      'mips64': Result := 'mips64';
+      'mips64el': Result := 'mips64el';
       'powerpc': Result := 'ppc';
       'powerpc': Result := 'ppc';
       'powerpc64': Result := 'ppc64';
       'powerpc64': Result := 'ppc64';
       'riscv32': Result := 'rv32';
       'riscv32': Result := 'rv32';
@@ -136,9 +139,23 @@ Const
          ppcbin:='ppcmipsel';
          ppcbin:='ppcmipsel';
          processorname:='mipsel';
          processorname:='mipsel';
     {$else : not mipsel}
     {$else : not mipsel}
-      {$ifdef mips}
-         ppcbin:='ppcmips';
-         processorname:='mips';
+      {$ifdef mipseb}
+          ppcbin:='ppcmipseb';
+          processorname:='mipseb';
+      {$else : not mipseb}
+        {$ifdef mips}
+          ppcbin:='ppcmips';
+          processorname:='mips';
+        {$endif mips}
+      {$endif not mipseb}
+    {$endif not mipsel}
+    {$ifdef mips64el}
+         ppcbin:='ppcmips64el';
+         processorname:='mips64el';
+    {$else : not mips64el}
+      {$ifdef mips64}
+         ppcbin:='ppcmips64';
+         processorname:='mips64';
       {$endif mips}
       {$endif mips}
     {$endif not mipsel}
     {$endif not mipsel}
     {$ifdef riscv32}
     {$ifdef riscv32}
@@ -315,7 +332,7 @@ begin
     end;
     end;
   if configpath='' then
   if configpath='' then
     begin
     begin
-    {  
+    {
       We need to search relative to compiler binary, not relative to FPC binary.
       We need to search relative to compiler binary, not relative to FPC binary.
       Beware of symlinks !
       Beware of symlinks !
     }
     }
@@ -325,7 +342,7 @@ begin
       if copy(sl,1,1)<>'/' then
       if copy(sl,1,1)<>'/' then
         hs:=ExpandFileName(ExtractFilePath(hs)+sl)
         hs:=ExpandFileName(ExtractFilePath(hs)+sl)
       else
       else
-        hs:=sl;  
+        hs:=sl;
       end;
       end;
     ExePath:=ExtractFilePath(hs);
     ExePath:=ExtractFilePath(hs);
     configpath:=ExpandFileName(ExePath+'../etc/');
     configpath:=ExpandFileName(ExePath+'../etc/');