gcc/config/lm32/predicates.md

   1 ;; Predicate definitions for Lattice Mico32 architecture.
   2 ;; Contributed by Jon Beniston <jon@beniston.com>
   3 ;;
   4 ;; Copyright (C) 2009-2016 Free Software Foundation, Inc.
   5 ;;
   6 ;; This file is part of GCC.
   7 ;;
   8 ;; GCC is free software; you can redistribute it and/or modify it
   9 ;; under the terms of the GNU General Public License as published
  10 ;; by the Free Software Foundation; either version 3, or (at your
  11 ;; option) any later version.
  12 ;;
  13 ;; GCC is distributed in the hope that it will be useful, but WITHOUT
  14 ;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  15 ;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
  16 ;; License for more details.
  17 ;;
  18 ;; You should have received a copy of the GNU General Public License
  19 ;; along with GCC; see the file COPYING3.  If not see
  20 ;;  <http://www.gnu.org/licenses/>.
  21
  22 (define_predicate "const0_operand"
  23   (and (match_code "const_int,const_double,const_vector")
  24        (match_test "op == CONST0_RTX (GET_MODE (op))")))
  25
  26 (define_predicate "constant_K_operand"
  27   (and (match_code "const_int")
  28        (match_test "satisfies_constraint_K (op)")))
  29
  30 (define_predicate "constant_L_operand"
  31   (and (match_code "const_int")
  32        (match_test "satisfies_constraint_L (op)")))
  33
  34 (define_predicate "constant_M_operand"
  35   (and (match_code "const_int")
  36        (match_test "satisfies_constraint_M (op)")))
  37
  38 (define_predicate "register_or_zero_operand"
  39   (ior (match_operand 0 "register_operand")
  40        (match_operand 0 "const0_operand")))
  41
  42 (define_predicate "register_or_K_operand"
  43   (ior (match_operand 0 "register_operand")
  44        (match_operand 0 "constant_K_operand")))
  45
  46 (define_predicate "register_or_L_operand"
  47   (ior (match_operand 0 "register_operand")
  48        (match_operand 0 "constant_L_operand")))
  49
  50 (define_predicate "register_or_int_operand"
  51   (ior (match_operand 0 "register_operand")
  52        (match_code "const_int")))
  53
  54 (define_predicate "reloc_operand"
  55   (ior (ior (match_code "label_ref")
  56             (match_code "symbol_ref"))
  57        (match_code "const")))
  58
  59 (define_predicate "symbolic_operand"
  60   (ior (match_code "label_ref")
  61        (match_code "symbol_ref")))
  62
  63 (define_predicate "no_pic_small_symbol"
  64   (match_code "symbol_ref")
  65 {
  66   return !flag_pic && SYMBOL_REF_SMALL_P (op);
  67 })
  68
  69 (define_predicate "call_operand"
  70   (ior (match_code "symbol_ref")
  71        (match_operand 0 "register_operand")))
  72