gcc/config/spu/predicates.md

   1 ;; Predicate definitions for CELL SPU
   2 ;; Copyright (C) 2006 Free Software Foundation, Inc.
   3 ;;
   4 ;; This file is free software; you can redistribute it and/or modify it under
   5 ;; the terms of the GNU General Public License as published by the Free
   6 ;; Software Foundation; either version 2 of the License, or (at your option)
   7 ;; any later version.
   8
   9 ;; This file is distributed in the hope that it will be useful, but WITHOUT
  10 ;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11 ;; FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12 ;; for more details.
  13
  14 ;; You should have received a copy of the GNU General Public License
  15 ;; along with this file; see the file COPYING.  If not, write to the Free
  16 ;; Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
  17 ;; 02110-1301, USA.
  18
  19 (define_predicate "spu_reg_operand"
  20   (and (match_operand 0 "register_operand")
  21        (ior (not (match_code "subreg"))
  22             (match_test "valid_subreg (op)"))))
  23
  24 (define_predicate "spu_nonimm_operand"
  25   (and (match_operand 0 "nonimmediate_operand")
  26        (ior (not (match_code "subreg"))
  27             (match_test "valid_subreg (op)"))))
  28
  29 (define_predicate "spu_nonmem_operand"
  30   (and (match_operand 0 "nonmemory_operand")
  31        (ior (not (match_code "subreg"))
  32             (match_test "valid_subreg (op)"))))
  33
  34 (define_predicate "spu_mem_operand"
  35   (and (match_operand 0 "memory_operand")
  36        (match_test "reload_in_progress || reload_completed || aligned_mem_p (op)")))
  37
  38 (define_predicate "spu_mov_operand"
  39   (ior (match_operand 0 "spu_mem_operand")
  40        (match_operand 0 "spu_nonmem_operand")))
  41
  42 (define_predicate "call_operand"
  43   (and (match_code "mem")
  44        (match_test "(!TARGET_LARGE_MEM && satisfies_constraint_S (op))
  45                     || (satisfies_constraint_R (op)
  46                         && REGNO (XEXP (op, 0)) != FRAME_POINTER_REGNUM
  47                         && REGNO (XEXP (op, 0)) != ARG_POINTER_REGNUM
  48                         && (REGNO (XEXP (op, 0)) < FIRST_PSEUDO_REGISTER
  49                             || REGNO (XEXP (op, 0)) > LAST_VIRTUAL_REGISTER))")))
  50
  51 (define_predicate "vec_imm_operand"
  52   (and (match_code "const_int,const_double,const_vector")
  53        (match_test "spu_legitimate_constant_p (op)")))
  54
  55 (define_predicate "spu_arith_operand"
  56   (match_code "reg,subreg,const_int,const_vector")
  57   {
  58     if (spu_reg_operand (op, mode))
  59       return 1;
  60     if (GET_CODE (op) == CONST_INT || GET_CODE (op) == CONST_VECTOR)
  61       return arith_immediate_p (op, mode, -0x200, 0x1ff);
  62     return 0;
  63   })
  64
  65 (define_predicate "spu_logical_operand"
  66   (match_code "reg,subreg,const_int,const_double,const_vector")
  67   {
  68     if (spu_reg_operand (op, mode))
  69       return 1;
  70     if (GET_CODE (op) == CONST_INT || GET_CODE (op) == CONST_DOUBLE
  71         || GET_CODE (op) == CONST_VECTOR)
  72       return logical_immediate_p (op, mode);
  73     return 0;
  74   })
  75
  76 (define_predicate "spu_ior_operand"
  77   (match_code "reg,subreg,const_int,const_double,const_vector")
  78   {
  79     if (spu_reg_operand (op, mode))
  80       return 1;
  81     if (GET_CODE (op) == CONST_INT || GET_CODE (op) == CONST_DOUBLE
  82         || GET_CODE (op) == CONST_VECTOR)
  83       return logical_immediate_p (op, mode)
  84              || iohl_immediate_p (op, mode);
  85     return 0;
  86   })
  87
  88 (define_predicate "spu_shift_operand"
  89   (match_code "reg,subreg,const_int,const_vector")
  90   {
  91     if (spu_reg_operand (op, mode))
  92       return 1;
  93     if (GET_CODE (op) == CONST_INT || GET_CODE (op) == CONST_VECTOR)
  94       return arith_immediate_p (op, mode, -0x40, 0x3f);
  95     return 0;
  96   })
  97
  98 ;; Return 1 if OP is a comparison operation that is valid for a branch insn.
  99 ;; We only check the opcode against the mode of the register value here.
 100 (define_predicate "branch_comparison_operator"
 101   (and (match_code "eq,ne")
 102        (ior (match_test "GET_MODE (XEXP (op, 0)) == HImode")
 103             (match_test "GET_MODE (XEXP (op, 0)) == SImode"))))
 104