Skip to content

{$push}{$pop} - do not restore AsmMode

FPC[main]

program test;
{$mode objfpc}

//{$define INTEL}

{$IFDEF INTEL}
  {$asmmode intel}
  {$push}{$asmmode att}{$pop}
  procedure proc2; assembler;
  asm
    mov rax, 0 // err
  end;
{$ELSE}
  {$asmmode att}
  {$push}{$asmmode intel}{$pop}
  procedure proc2; assembler;
  asm
    movq $0, %rax // err
  end;
{$ENDIF}

begin
end.
To upload designs, you'll need to enable LFS and have an admin enable hashed storage. More information