diff --git a/compiler/aarch64/racpugas.pas b/compiler/aarch64/racpugas.pas
index ed2b8d8260..752d43bef1 100644
--- a/compiler/aarch64/racpugas.pas
+++ b/compiler/aarch64/racpugas.pas
@@ -564,6 +564,7 @@ Unit racpugas;
         case actopcode of
           A_CSEL,A_CSINC,A_CSINV,A_CSNEG,A_CSET,A_CSETM,
           A_CINC,A_CINV,A_CNEG,A_CCMN,A_CCMP,
+          A_FCCMP,A_FCCMPE,
           A_B:
             begin
               { search for condition, conditions are always 2 chars }
diff --git a/tests/webtbs/tw39643.pp b/tests/webtbs/tw39643.pp
new file mode 100644
index 0000000000..8dbcf8ac16
--- /dev/null
+++ b/tests/webtbs/tw39643.pp
@@ -0,0 +1,32 @@
+{ %cpu=aarch64 }
+{ %norun }
+
+{$mode delphi}
+program AsmQBug;
+
+type
+  PVector = ^TVector;
+  TVector = record
+    A, B, C, D: Single;
+  end;
+
+function AsmFunc(V: PVector): Single;
+{ Delphi code:
+begin
+  Result := V.A;
+end; }
+asm
+  // This gives error "unknown identifier: NE"
+  fccmp  d0, d0, #0x0, ne
+  fccmpe  d0, d0, #0x0, ne
+end;
+
+var
+  V: TVector;
+begin
+  V.A := 1;
+  V.B := 2;
+  V.C := 3;
+  V.D := 4;
+  WriteLn('Expected=1 Actual=', AsmFunc(@V));
+end.