saloyun 写得非常好，那么，arm64的异常是不是在路上了？？[em_71]

bestbird 只懂Win:)

saloyun windows的arm64也出来很多年了呀，大佬写文分析一下吧[em_1]

找不到arm64的机器，因为我只有一台电脑。不过你可以试试附件里面的win64目录下的TEST。因为我看了一下Delphi的system.pas，里面有编译定义：

  {$IFDEF CPUX86}
        {$DEFINE ARITH_PUREPASCAL_EXT80}
  {$ENDIF CPUX86}
  {$IFDEF CPUX64}
    {$IFDEF MSWINDOWS}
        {$DEFINE ARITH_PUREPASCAL_EXT64}
    {$ENDIF MSWINDOWS}
    {$IFDEF LINUX}
        {$DEFINE ARITH_USE_LIBM}
    {$ENDIF LINUX}
  {$ENDIF CPUX64}
  {$IFDEF CPUARM}
        {$DEFINE ARITH_USE_LIBM}
  {$ENDIF CPUARM}

还有一个是初始化的函数：

procedure _InitializeControlWord;
begin
{$IF defined(IOS) and defined(CPUX86)} // iOS Simulator
  TestSSE := $3; // All Intel Mac supports SSE2.
  FPUExceptionMaskBits := (Default8087CW and $003F) or ((DefaultMXCSR and $1F80) shr 7) or $8000;
{$ELSEIF defined(CPUX86) and defined(ASSEMBLER)} // Win32 or OSX32
  TestSSE := GetBriefSSEType;
  DefaultMXCSR := GetMXCSR and $FFC0;  // Remove flag bits;
{$ELSEIF defined(CPUX64) and defined(MSWINDOWS)} // Win64
  TestSSE := $3; // SSE & SSE2 are available on X64
  Default8087CW := Get8087CW and $1F3F; // Remove reserved bits.
{$ELSEIF defined(CPUX64) and defined(ARITH_USE_LIBM)} // Linux64
  TestSSE := $3; // SSE & SSE2 are available on X64
  FPExceptionMaskBits := DefaultFPEnv;
{$ENDIF}
end;

而异常处理函数里面，只是分为32位和64位的，其中32位是纯汇编的。所以你可以试试附件，唯一有可能不一样的地方是里面使用了一条指令：

LDMXCSR DefaultMXCSR。Delphi本身支持一套代码编译出Win、linux、Andriod、IOS，但对于Win，只有Win32和Win64可以选择，没有ARM64的选项，所以要么它本身就支撑（包括异常），要么连编译的64 bit EXE都跑不起来。不过我隐约记得，64位的异常表结构，好像是分CPU的。