old-autovect-branch/gcc/config/mn10300/predicates.md

   1 ;; Predicate definitions for Matsushita MN10300.
   2 ;; Copyright (C) 2005 Free Software Foundation, Inc.
   3 ;;
   4 ;; This file is part of GCC.
   5 ;;
   6 ;; GCC is free software; you can redistribute it and/or modify
   7 ;; it under the terms of the GNU General Public License as published by
   8 ;; the Free Software Foundation; either version 2, or (at your option)
   9 ;; any later version.
  10 ;;
  11 ;; GCC is distributed in the hope that it will be useful,
  12 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 ;; GNU General Public License for more details.
  15 ;;
  16 ;; You should have received a copy of the GNU General Public License
  17 ;; along with GCC; see the file COPYING.  If not, write to
  18 ;; the Free Software Foundation, 51 Franklin Street, Fifth Floor,
  19 ;; Boston, MA 02110-1301, USA.
  20
  21 ;; Return true if the operand is the 1.0f constant.
  22
  23 (define_predicate "const_1f_operand"
  24   (match_code "const_int,const_double")
  25 {
  26   return (op == CONST1_RTX (SFmode));
  27 })
  28
  29 ;; Return 1 if X is a CONST_INT that is only 8 bits wide.  This is
  30 ;; used for the btst insn which may examine memory or a register (the
  31 ;; memory variant only allows an unsigned 8 bit integer).
  32
  33 (define_predicate "const_8bit_operand"
  34   (match_code "const_int")
  35 {
  36   return (GET_CODE (op) == CONST_INT
  37           && INTVAL (op) >= 0
  38           && INTVAL (op) < 256);
  39 })
  40
  41 ;; Return true if OP is a valid call operand.
  42
  43 (define_predicate "call_address_operand"
  44   (match_code "symbol_ref,reg,unspec")
  45 {
  46   if (flag_pic)
  47     return (EXTRA_CONSTRAINT (op, 'S') || GET_CODE (op) == REG);
  48
  49   return (GET_CODE (op) == SYMBOL_REF || GET_CODE (op) == REG);
  50 })