Bug fix to the pascal version of XorMemPrim