diff --git a/rtl/wasm32/wasm32.inc b/rtl/wasm32/wasm32.inc index 43db1c143f..daefa66f72 100644 --- a/rtl/wasm32/wasm32.inc +++ b/rtl/wasm32/wasm32.inc @@ -150,10 +150,10 @@ function fpc_atomic_cmp_xchg_32 (var Target: longint; NewValue: longint; Compara function fpc_atomic_cmp_xchg_64 (var Target: Int64; NewValue: Int64; Comparand: Int64) : Int64; [public,alias:'FPC_ATOMIC_CMP_XCHG_64']; begin {$ifdef FPC_WASM_THREADS} - Result:=Int64(fpc_wasm32_i64_atomic_rmw_cmpxchg_u(@Target,QWord({$ifdef VER3_2}Comperand{$else}Comparand{$endif}),LongWord(NewValue))); + Result:=Int64(fpc_wasm32_i64_atomic_rmw_cmpxchg_u(@Target,QWord(Comparand}),LongWord(NewValue))); {$else FPC_WASM_THREADS} Result:=Target; - if Target={$ifdef VER3_2}Comperand{$else}Comparand{$endif} then + if Target=Comparand then Target:=NewValue; {$endif FPC_WASM_THREADS} end;