Browse Source

* Fix typos, missing sparc

Michaël Van Canneyt 1 year ago
parent
commit
d587f48892
2 changed files with 2 additions and 2 deletions
  1. 1 1
      rtl/objpas/sysutils/sysutilh.inc
  2. 1 1
      rtl/objpas/sysutils/sysutils.inc

+ 1 - 1
rtl/objpas/sysutils/sysutilh.inc

@@ -396,7 +396,7 @@ Type
   TOSVersion = record
   public type
     TArchitecture = (arIntelX86, arIntelX64, arARM32, arARM64, arIntelX16, arXTensa, arAVR, arM68k, arPowerPC, arPower64,
-                     arMips, arMipsel, arMips64, arMips64el, arJVM, arWasm32, arSparc64, arRiscV32, arRiscV64, arZ80,
+                     arMips, arMipsel, arMips64, arMips64el, arJVM, arWasm32, arSparc, arSparc64, arRiscV32, arRiscV64, arZ80,
                      arLoongArch64, arOther);
 
     TPlatform = (pfWindows, pfMacOS, pfiOS, pfAndroid, pfWinRT, pfLinux,

+ 1 - 1
rtl/objpas/sysutils/sysutils.inc

@@ -989,7 +989,7 @@ begin
   {$endif riscv64}
 
   {$ifdef xtensa}
-  Result:=arExtensa;
+  Result:=arXtensa;
   {$endif xtensa}
 
   {$ifdef wasm32}