InterlockedExchange64 function

function InterlockedExchange64(var Target: Int64; Source: Int64): Int64

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.