1;; Predicate definitions for Lattice Mico32 architecture.
2;; Contributed by Jon Beniston <jon@beniston.com>
3;;
4;; Copyright (C) 2009 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
73(define_predicate "movsi_rhs_operand"
74  (ior (match_operand 0 "nonimmediate_operand")
75       (ior (match_code "const_int")
76            (ior (match_test "satisfies_constraint_S (op)")
77                 (match_test "satisfies_constraint_Y (op)")))))
78