hppa: Add memcopy.h

GCC's combine pass cannot merge (x >> c | y << (32 - c)) into a
double-word shift unless (1) the subtract is in the same basic block
and (2) the result of the subtract is used exactly once.  Neither
condition is true for any use of MERGE.

By forcing the use of a double-word shift, we not only reduce
contention on SAR, but also allow the setting of SAR to be hoisted
outside of a loop.

Checked on hppa-linux-gnu.

Reviewed-by: Adhemerval Zanella  <adhemerval.zanella@linaro.org>
This commit is contained in:
Richard Henderson 2023-01-10 18:01:01 -03:00 committed by Adhemerval Zanella
parent 167f6230af
commit be836d9153

42
sysdeps/hppa/memcopy.h Normal file
View File

@ -0,0 +1,42 @@
/* Definitions for memory copy functions, PA-RISC version.
Copyright (C) 2023 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library. If not, see
<http://www.gnu.org/licenses/>. */
#include <sysdeps/generic/memcopy.h>
/* Use a single double-word shift instead of two shifts and an ior.
If the uses of MERGE were close to the computation of shl/shr,
the compiler might have been able to create this itself.
But instead that computation is well separated.
Using an inline function instead of a macro is the easiest way
to ensure that the types are correct. */
#undef MERGE
static __always_inline op_t
MERGE (op_t w0, int shl, op_t w1, int shr)
{
_Static_assert (OPSIZ == 4 || OPSIZ == 8, "Invalid OPSIZE");
op_t res;
if (OPSIZ == 4)
asm ("shrpw %1,%2,%%sar,%0" : "=r"(res) : "r"(w0), "r"(w1), "q"(shr));
else if (OPSIZ == 8)
asm ("shrpd %1,%2,%%sar,%0" : "=r"(res) : "r"(w0), "r"(w1), "q"(shr));
return res;
}