}
[(set_attr "type" "viwmuladd")
(set_attr "mode" "<V_DOUBLE_TRUNC>")])
+
+;; -------------------------------------------------------------------------
+;; ---- [INT] Binary narrow shifts.
+;; -------------------------------------------------------------------------
+;; Includes:
+;; - vnsrl.wv/vnsrl.wx/vnsrl.wi
+;; - vnsra.wv/vnsra.wx/vnsra.wi
+;; -------------------------------------------------------------------------
+
+(define_insn_and_split "*v<any_shiftrt:optab><any_extend:optab>trunc<mode>"
+ [(set (match_operand:<V_DOUBLE_TRUNC> 0 "register_operand" "=vr,vr")
+ (truncate:<V_DOUBLE_TRUNC>
+ (any_shiftrt:VWEXTI
+ (match_operand:VWEXTI 1 "register_operand" " vr,vr")
+ (any_extend:VWEXTI
+ (match_operand:<V_DOUBLE_TRUNC> 2 "vector_shift_operand" " vr,vk")))))]
+ "TARGET_VECTOR"
+ "#"
+ "&& can_create_pseudo_p ()"
+ [(const_int 0)]
+{
+ insn_code icode = code_for_pred_narrow (<any_shiftrt:CODE>, <MODE>mode);
+ riscv_vector::emit_vlmax_insn (icode, riscv_vector::RVV_BINOP, operands);
+ DONE;
+}
+ [(set_attr "type" "vnshift")
+ (set_attr "mode" "<V_DOUBLE_TRUNC>")])
+
+(define_insn_and_split "*<any_shiftrt:optab>trunc<mode>"
+ [(set (match_operand:<V_DOUBLE_TRUNC> 0 "register_operand" "=vr")
+ (truncate:<V_DOUBLE_TRUNC>
+ (any_shiftrt:VWEXTI
+ (match_operand:VWEXTI 1 "register_operand" " vr")
+ (match_operand:<VEL> 2 "csr_operand" " rK"))))]
+ "TARGET_VECTOR"
+ "#"
+ "&& can_create_pseudo_p ()"
+ [(const_int 0)]
+{
+ operands[2] = gen_lowpart (Pmode, operands[2]);
+ insn_code icode = code_for_pred_narrow_scalar (<any_shiftrt:CODE>, <MODE>mode);
+ riscv_vector::emit_vlmax_insn (icode, riscv_vector::RVV_BINOP, operands);
+ DONE;
+}
+ [(set_attr "type" "vnshift")
+ (set_attr "mode" "<V_DOUBLE_TRUNC>")])
;; - vsll.vi/vsra.vi/vsrl.vi
;; -------------------------------------------------------------------------
-(define_expand "<optab><mode>3"
- [(set (match_operand:VI 0 "register_operand")
+(define_insn_and_split "<optab><mode>3"
+ [(set (match_operand:VI 0 "register_operand" "=vr")
(any_shift:VI
- (match_operand:VI 1 "register_operand")
- (match_operand:<VEL> 2 "csr_operand")))]
+ (match_operand:VI 1 "register_operand" " vr")
+ (match_operand:<VEL> 2 "csr_operand" " rK")))]
"TARGET_VECTOR"
+ "#"
+ "&& can_create_pseudo_p ()"
+ [(const_int 0)]
{
operands[2] = gen_lowpart (Pmode, operands[2]);
riscv_vector::emit_vlmax_insn (code_for_pred_scalar (<CODE>, <MODE>mode),
riscv_vector::RVV_BINOP, operands);
DONE;
-})
+}
+ [(set_attr "type" "vshift")
+ (set_attr "mode" "<MODE>")])
;; -------------------------------------------------------------------------
;; ---- [INT] Binary shifts by scalar.
;; - vsll.vv/vsra.vv/vsrl.vv
;; -------------------------------------------------------------------------
-(define_expand "v<optab><mode>3"
- [(set (match_operand:VI 0 "register_operand")
+(define_insn_and_split "v<optab><mode>3"
+ [(set (match_operand:VI 0 "register_operand" "=vr,vr")
(any_shift:VI
- (match_operand:VI 1 "register_operand")
- (match_operand:VI 2 "vector_shift_operand")))]
+ (match_operand:VI 1 "register_operand" " vr,vr")
+ (match_operand:VI 2 "vector_shift_operand" " vr,vk")))]
"TARGET_VECTOR"
+ "#"
+ "&& can_create_pseudo_p ()"
+ [(const_int 0)]
{
riscv_vector::emit_vlmax_insn (code_for_pred (<CODE>, <MODE>mode),
riscv_vector::RVV_BINOP, operands);
DONE;
-})
+}
+ [(set_attr "type" "vshift")
+ (set_attr "mode" "<MODE>")])
;; -------------------------------------------------------------------------
;; ---- [BOOL] Binary logical operations
;; -------------------------------------------------------------------------
;; - vncvt.x.x.w
;; -------------------------------------------------------------------------
-(define_expand "trunc<mode><v_double_trunc>2"
- [(set (match_operand:<V_DOUBLE_TRUNC> 0 "register_operand")
+(define_insn_and_split "trunc<mode><v_double_trunc>2"
+ [(set (match_operand:<V_DOUBLE_TRUNC> 0 "register_operand" "=vr")
(truncate:<V_DOUBLE_TRUNC>
- (match_operand:VWEXTI 1 "register_operand")))]
+ (match_operand:VWEXTI 1 "register_operand" " vr")))]
"TARGET_VECTOR"
+ "#"
+ "&& can_create_pseudo_p ()"
+ [(const_int 0)]
{
insn_code icode = code_for_pred_trunc (<MODE>mode);
riscv_vector::emit_vlmax_insn (icode, riscv_vector::RVV_UNOP, operands);
DONE;
-})
+}
+ [(set_attr "type" "vshift")
+ (set_attr "mode" "<MODE>")])
;; -------------------------------------------------------------------------
;; Truncation to a mode whose inner mode size is a quarter of mode's.
--- /dev/null
+/* { dg-do compile } */
+/* { dg-additional-options "-march=rv32gcv -mabi=ilp32d --param=riscv-autovec-preference=scalable" } */
+
+#include <stdint-gcc.h>
+
+#define TEST_TYPE(TYPE1, TYPE2) \
+ __attribute__ ((noipa)) void vnshift_##TYPE1##_##TYPE2 ( \
+ TYPE2 *__restrict dst, TYPE1 *__restrict a, TYPE2 *__restrict b, int n) \
+ { \
+ for (int i = 0; i < n; i++) \
+ dst[i] = a[i] >> b[i]; \
+ }
+
+#define TEST_ALL() \
+ TEST_TYPE (int16_t, int8_t) \
+ TEST_TYPE (int16_t, uint8_t) \
+ TEST_TYPE (uint16_t, int8_t) \
+ TEST_TYPE (uint16_t, uint8_t) \
+ TEST_TYPE (int32_t, int16_t) \
+ TEST_TYPE (int32_t, uint16_t) \
+ TEST_TYPE (uint32_t, int16_t) \
+ TEST_TYPE (uint32_t, uint16_t) \
+ TEST_TYPE (int64_t, int32_t) \
+ TEST_TYPE (int64_t, uint32_t) \
+ TEST_TYPE (uint64_t, int32_t) \
+ TEST_TYPE (uint64_t, uint32_t)
+
+TEST_ALL ()
+
+/* { dg-final { scan-assembler-times {\tvnsra\.wv} 6 } } */
+/* { dg-final { scan-assembler-times {\tvnsrl\.wv} 5 } } */
--- /dev/null
+/* { dg-do compile } */
+/* { dg-additional-options "-march=rv32gcv -mabi=ilp32d --param=riscv-autovec-preference=scalable" } */
+
+#include <stdint-gcc.h>
+
+#define TEST_TYPE(TYPE1, TYPE2) \
+ __attribute__ (( \
+ noipa)) void vnshift_##TYPE1##_##TYPE2 (TYPE2 *__restrict dst, \
+ TYPE1 *__restrict a, int n) \
+ { \
+ for (int i = 0; i < n; i++) \
+ dst[i] = a[i] >> 7; \
+ }
+
+#define TEST_ALL() \
+ TEST_TYPE (int16_t, int8_t) \
+ TEST_TYPE (int16_t, uint8_t) \
+ TEST_TYPE (uint16_t, int8_t) \
+ TEST_TYPE (uint16_t, uint8_t) \
+ TEST_TYPE (int32_t, int16_t) \
+ TEST_TYPE (int32_t, uint16_t) \
+ TEST_TYPE (uint32_t, int16_t) \
+ TEST_TYPE (uint32_t, uint16_t) \
+ TEST_TYPE (int64_t, int32_t) \
+ TEST_TYPE (int64_t, uint32_t) \
+ TEST_TYPE (uint64_t, int32_t) \
+ TEST_TYPE (uint64_t, uint32_t)
+
+TEST_ALL ()
+
+/* { dg-final { scan-assembler-times {\tvnsra\.wi} 6 } } */
+/* { dg-final { scan-assembler-times {\tvnsrl\.wi} 6 } } */
--- /dev/null
+/* { dg-do compile } */
+/* { dg-additional-options "-march=rv64gcv -mabi=lp64d --param=riscv-autovec-preference=scalable" } */
+
+#include <stdint-gcc.h>
+
+#define TEST_TYPE(TYPE1, TYPE2) \
+ __attribute__ ((noipa)) void vnshift_##TYPE1##_##TYPE2 ( \
+ TYPE2 *__restrict dst, TYPE1 *__restrict a, TYPE2 b, int n) \
+ { \
+ for (int i = 0; i < n; i++) \
+ dst[i] = a[i] >> b; \
+ }
+
+#define TEST_ALL() \
+ TEST_TYPE (int16_t, int8_t) \
+ TEST_TYPE (int16_t, uint8_t) \
+ TEST_TYPE (uint16_t, int8_t) \
+ TEST_TYPE (uint16_t, uint8_t) \
+ TEST_TYPE (int32_t, int16_t) \
+ TEST_TYPE (int32_t, uint16_t) \
+ TEST_TYPE (uint32_t, int16_t) \
+ TEST_TYPE (uint32_t, uint16_t) \
+ TEST_TYPE (int64_t, int32_t) \
+ TEST_TYPE (int64_t, uint32_t) \
+ TEST_TYPE (uint64_t, int32_t) \
+ TEST_TYPE (uint64_t, uint32_t)
+
+TEST_ALL ()
+
+/* { dg-final { scan-assembler-times {\tvnsra\.wx} 4 } } */
+/* { dg-final { scan-assembler-times {\tvnsrl\.wx} 4 } } */
--- /dev/null
+/* { dg-do run { target { riscv_vector } } } */
+/* { dg-additional-options "--param=riscv-autovec-preference=scalable" } */
+
+#include <assert.h>
+#include "narrow-1.c"
+
+#define RUN(TYPE1, TYPE2, SZ) \
+ TYPE1 a##TYPE1##_##TYPE2##_##SZ[SZ]; \
+ TYPE2 b##TYPE1##_##TYPE2##_##SZ[SZ]; \
+ TYPE2 dst##TYPE1##_##TYPE2##_##SZ[SZ]; \
+ for (int i = 0; i < SZ; i++) \
+ { \
+ a##TYPE1##_##TYPE2##_##SZ[i] = i % 8723; \
+ b##TYPE1##_##TYPE2##_##SZ[i] = i % (sizeof (TYPE2) * 3); \
+ } \
+ vnshift_##TYPE1##_##TYPE2 (dst##TYPE1##_##TYPE2##_##SZ, \
+ a##TYPE1##_##TYPE2##_##SZ, \
+ b##TYPE1##_##TYPE2##_##SZ, SZ); \
+ for (int i = 0; i < SZ; i++) \
+ { \
+ assert (dst##TYPE1##_##TYPE2##_##SZ[i] \
+ == (TYPE2) (a##TYPE1##_##TYPE2##_##SZ[i] \
+ >> b##TYPE1##_##TYPE2##_##SZ[i])); \
+ }
+
+#define RUN_ALL(SZ) \
+ RUN (int16_t, int8_t, SZ) \
+ RUN (int16_t, uint8_t, SZ) \
+ RUN (uint16_t, int8_t, SZ) \
+ RUN (uint16_t, uint8_t, SZ) \
+ RUN (int32_t, int16_t, SZ) \
+ RUN (int32_t, uint16_t, SZ) \
+ RUN (uint32_t, int16_t, SZ) \
+ RUN (uint32_t, uint16_t, SZ) \
+ RUN (int64_t, int32_t, SZ) \
+ RUN (int64_t, uint32_t, SZ) \
+ RUN (uint64_t, int32_t, SZ) \
+ RUN (uint64_t, uint32_t, SZ)
+
+int
+main ()
+{
+ RUN_ALL (15)
+ RUN_ALL (16)
+ RUN_ALL (17)
+ RUN_ALL (127)
+ RUN_ALL (128)
+ RUN_ALL (129)
+ RUN_ALL (512)
+}
--- /dev/null
+/* { dg-do run { target { riscv_vector } } } */
+/* { dg-additional-options "--param=riscv-autovec-preference=scalable" } */
+
+#include <assert.h>
+#include "narrow-2.c"
+
+#define RUN(TYPE1, TYPE2, SZ) \
+ TYPE1 a##TYPE1##_##TYPE2##_##SZ[SZ]; \
+ TYPE2 dst##TYPE1##_##TYPE2##_##SZ[SZ]; \
+ for (int i = 0; i < SZ; i++) \
+ { \
+ a##TYPE1##_##TYPE2##_##SZ[i] = i % 8723; \
+ } \
+ vnshift_##TYPE1##_##TYPE2 (dst##TYPE1##_##TYPE2##_##SZ, \
+ a##TYPE1##_##TYPE2##_##SZ, SZ); \
+ for (int i = 0; i < SZ; i++) \
+ { \
+ assert (dst##TYPE1##_##TYPE2##_##SZ[i] \
+ == (TYPE2) (a##TYPE1##_##TYPE2##_##SZ[i] >> 7)); \
+ }
+
+#define RUN_ALL(SZ) \
+ RUN (int16_t, int8_t, SZ) \
+ RUN (int16_t, uint8_t, SZ) \
+ RUN (uint16_t, int8_t, SZ) \
+ RUN (uint16_t, uint8_t, SZ) \
+ RUN (int32_t, int16_t, SZ) \
+ RUN (int32_t, uint16_t, SZ) \
+ RUN (uint32_t, int16_t, SZ) \
+ RUN (uint32_t, uint16_t, SZ) \
+ RUN (int64_t, int32_t, SZ) \
+ RUN (int64_t, uint32_t, SZ) \
+ RUN (uint64_t, int32_t, SZ) \
+ RUN (uint64_t, uint32_t, SZ)
+
+int
+main ()
+{
+ RUN_ALL (15)
+ RUN_ALL (16)
+ RUN_ALL (17)
+ RUN_ALL (127)
+ RUN_ALL (128)
+ RUN_ALL (129)
+ RUN_ALL (512)
+}
--- /dev/null
+/* { dg-do run { target { riscv_vector } } } */
+/* { dg-additional-options "--param=riscv-autovec-preference=scalable" } */
+
+#include <assert.h>
+#include "narrow-3.c"
+
+#define RUN(TYPE1, TYPE2, SZ) \
+ TYPE1 a##TYPE1##_##TYPE2##_##SZ[SZ]; \
+ TYPE2 dst##TYPE1##_##TYPE2##_##SZ[SZ]; \
+ for (int i = 0; i < SZ; i++) \
+ { \
+ a##TYPE1##_##TYPE2##_##SZ[i] = i % 8723; \
+ } \
+ vnshift_##TYPE1##_##TYPE2 (dst##TYPE1##_##TYPE2##_##SZ, \
+ a##TYPE1##_##TYPE2##_##SZ, 9, SZ); \
+ for (int i = 0; i < SZ; i++) \
+ { \
+ assert (dst##TYPE1##_##TYPE2##_##SZ[i] \
+ == (TYPE2) (a##TYPE1##_##TYPE2##_##SZ[i] >> 9)); \
+ }
+
+#define RUN_ALL(SZ) \
+ RUN (int16_t, int8_t, SZ) \
+ RUN (int16_t, uint8_t, SZ) \
+ RUN (uint16_t, int8_t, SZ) \
+ RUN (uint16_t, uint8_t, SZ) \
+ RUN (int32_t, int16_t, SZ) \
+ RUN (int32_t, uint16_t, SZ) \
+ RUN (uint32_t, int16_t, SZ) \
+ RUN (uint32_t, uint16_t, SZ) \
+ RUN (int64_t, int32_t, SZ) \
+ RUN (int64_t, uint32_t, SZ) \
+ RUN (uint64_t, int32_t, SZ) \
+ RUN (uint64_t, uint32_t, SZ)
+
+int
+main ()
+{
+ RUN_ALL (15)
+ RUN_ALL (16)
+ RUN_ALL (17)
+ RUN_ALL (127)
+ RUN_ALL (128)
+ RUN_ALL (129)
+ RUN_ALL (512)
+}