/haiku-buildtools/gcc/libgomp/testsuite/libgomp.fortran/ |
H A D | pr34020.f90 | 4 subroutine atomic_add(lhs, rhs) 5 real lhs, rhs local in subroutine:atomic_add 7 lhs = rhs + lhs 11 real lhs, rhs variable 13 lhs = 0 15 !$omp parallel do num_threads(8) shared(lhs, rhs) 17 call atomic_add(lhs, rhs) 19 if (lhs .ne. 300000) call abort
|
/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/ |
H A D | allocatable_function_5.f90 | 21 character (:), allocatable :: lhs variable 22 lhs = foo ("foo calling ") 23 if (lhs .ne. "foo") call abort 24 if (len (lhs) .ne. 3) call abort 25 deallocate (lhs) 26 lhs = bar ("bar calling - baaaa!") 27 if (lhs .ne. "bar calling") call abort 28 if (len (lhs) .ne. 12) call abort 29 deallocate (lhs) 30 lhs [all...] |
H A D | redefined_intrinsic_assignment_2.f90 | 15 subroutine valid (lhs,rhs) 16 integer, intent(out) :: lhs local in subroutine:valid 18 lhs = rhs(1) 22 subroutine valid2 (lhs,rhs) 23 integer, intent(out) :: lhs(:) local in subroutine:valid2 25 lhs(:) = rhs(:,1) 35 subroutine invalid (lhs,rhs) ! { dg-error "must not redefine an INTRINSIC type assignment" } 36 integer, intent(out) :: lhs local in subroutine:invalid 38 lhs = rhs 48 subroutine invalid2 (lhs,rh 49 integer, intent(out) :: lhs local in subroutine:invalid2 62 integer, intent(out) :: lhs local in subroutine:invalid3 [all...] |
H A D | interface_31.f90 | 12 FUNCTION add_a(lhs, rhs) RESULT(r) 13 TYPE(ta), INTENT(IN) :: lhs local in function:add_a 17 r%i = lhs%i + rhs%i 33 FUNCTION add_b(lhs, rhs) RESULT(r) 34 TYPE(tb), INTENT(IN) :: lhs local in function:add_b 38 r%j = lhs%j + rhs%j
|
/haiku-buildtools/gcc/gcc/testsuite/g++.old-deja/g++.mike/ |
H A D | debug1.C | 10 foo (const c& lhs) argument 12 c str (lhs);
|
H A D | p9068.C | 14 void foo (ostream& lhs, const C& rhs) argument 16 lhs << rhs.i; // { dg-error "match" } no such i for any opr << ()
|
/haiku-buildtools/gcc/libstdc++-v3/testsuite/experimental/optional/constexpr/relops/ |
H A D | 5.cc | 33 strcmp(const char* lhs, const char* rhs) argument 35 return *lhs == *rhs && (!*lhs || strcmp(lhs + 1, rhs + 1)); 39 strrel(const char* lhs, const char* rhs) argument 41 return (*rhs && (!*lhs || (*lhs < *rhs))) 42 || ((*lhs && *rhs && !(*rhs < *lhs)) && strrel(lhs 46 operator ==(value_type const& lhs, value_type const& rhs) argument 50 operator !=(value_type const& lhs, value_type const& rhs) argument 54 operator <(value_type const& lhs, value_type const& rhs) argument [all...] |
H A D | 1.cc | 33 strcmp(const char* lhs, const char* rhs) argument 35 return *lhs == *rhs && (!*lhs || strcmp(lhs + 1, rhs + 1)); 39 strrel(const char* lhs, const char* rhs) argument 41 return (*rhs && (!*lhs || (*lhs < *rhs))) 42 || ((*lhs && *rhs && !(*rhs < *lhs)) && strrel(lhs 46 operator ==(value_type const& lhs, value_type const& rhs) argument 50 operator !=(value_type const& lhs, value_type const& rhs) argument 54 operator <(value_type const& lhs, value_type const& rhs) argument [all...] |
H A D | 3.cc | 33 strcmp(const char* lhs, const char* rhs) argument 35 return *lhs == *rhs && (!*lhs || strcmp(lhs + 1, rhs + 1)); 39 strrel(const char* lhs, const char* rhs) argument 41 return (*rhs && (!*lhs || (*lhs < *rhs))) 42 || ((*lhs && *rhs && !(*rhs < *lhs)) && strrel(lhs 46 operator ==(value_type const& lhs, value_type const& rhs) argument 50 operator !=(value_type const& lhs, value_type const& rhs) argument 54 operator <(value_type const& lhs, value_type const& rhs) argument [all...] |
H A D | 4.cc | 33 strcmp(const char* lhs, const char* rhs) argument 35 return *lhs == *rhs && (!*lhs || strcmp(lhs + 1, rhs + 1)); 39 strrel(const char* lhs, const char* rhs) argument 41 return (*rhs && (!*lhs || (*lhs < *rhs))) 42 || ((*lhs && *rhs && !(*rhs < *lhs)) && strrel(lhs 46 operator ==(value_type const& lhs, value_type const& rhs) argument 50 operator !=(value_type const& lhs, value_type const& rhs) argument 54 operator <(value_type const& lhs, value_type const& rhs) argument [all...] |
H A D | 6.cc | 33 strcmp(const char* lhs, const char* rhs) argument 35 return *lhs == *rhs && (!*lhs || strcmp(lhs + 1, rhs + 1)); 39 strrel(const char* lhs, const char* rhs) argument 41 return (*rhs && (!*lhs || (*lhs < *rhs))) 42 || ((*lhs && *rhs && !(*rhs < *lhs)) && strrel(lhs 46 operator ==(value_type const& lhs, value_type const& rhs) argument 50 operator !=(value_type const& lhs, value_type const& rhs) argument 54 operator <(value_type const& lhs, value_type const& rhs) argument [all...] |
H A D | 2.cc | 33 strcmp(const char* lhs, const char* rhs) argument 35 return *lhs == *rhs && (!*lhs || strcmp(lhs + 1, rhs + 1)); 39 strrel(const char* lhs, const char* rhs) argument 41 return (*rhs && (!*lhs || (*lhs < *rhs))) 42 || ((*lhs && *rhs && !(*rhs < *lhs)) && strrel(lhs 46 operator ==(value_type const& lhs, value_type const& rhs) argument 50 operator !=(value_type const& lhs, value_type const& rhs) argument 54 operator <(value_type const& lhs, value_type const& rhs) argument [all...] |
/haiku-buildtools/gcc/gcc/ |
H A D | gimple-builder.c | 71 build_assign (enum tree_code code, tree op1, int val, tree lhs) argument 74 if (lhs == NULL_TREE) 75 lhs = make_ssa_name (get_expr_type (code, op1)); 76 return gimple_build_assign (lhs, code, op1, op2); 80 build_assign (enum tree_code code, gimple g, int val, tree lhs ) 82 return build_assign (code, gimple_assign_lhs (g), val, lhs); 95 build_assign (enum tree_code code, tree op1, tree op2, tree lhs) argument 97 if (lhs == NULL_TREE) 98 lhs = make_ssa_name (get_expr_type (code, op1)); 99 return gimple_build_assign (lhs, cod 103 build_assign(enum tree_code code, gimple op1, tree op2, tree lhs) argument 109 build_assign(enum tree_code code, tree op1, gimple op2, tree lhs) argument 115 build_assign(enum tree_code code, gimple op1, gimple op2, tree lhs) argument 126 build_type_cast(tree to_type, tree op, tree lhs) argument 134 build_type_cast(tree to_type, gimple op, tree lhs) argument [all...] |
H A D | gimple-builder.h | 24 gassign *build_assign (enum tree_code, tree, int, tree lhs = NULL_TREE); 25 gassign *build_assign (enum tree_code, gimple, int, tree lhs = NULL_TREE); 26 gassign *build_assign (enum tree_code, tree, tree, tree lhs = NULL_TREE); 27 gassign *build_assign (enum tree_code, gimple, tree, tree lhs = NULL_TREE); 28 gassign *build_assign (enum tree_code, tree, gimple, tree lhs = NULL_TREE); 29 gassign *build_assign (enum tree_code, gimple, gimple, tree lhs = NULL_TREE); 30 gassign *build_type_cast (tree, tree, tree lhs = NULL_TREE); 31 gassign *build_type_cast (tree, gimple, tree lhs = NULL_TREE);
|
/haiku-buildtools/gcc/gcc/testsuite/gcc.dg/ |
H A D | 20020607-1.c | 2 gcc 3.0.4 mistakenly set lhs.low to 0 at the beginning of the num_eq 17 num_equality_op (lhs, rhs) 18 cpp_num lhs, rhs; 20 lhs.low = num_eq (lhs, rhs); 21 lhs.high = 0; 22 lhs.overflow = 0; 23 return lhs;
|
/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/coarray/ |
H A D | alloc_comp_3.f90 | 20 subroutine assign_local_field(lhs) 21 type(global_field) lhs local in subroutine:assign_local_field
|
/haiku-buildtools/gcc/libstdc++-v3/testsuite/27_io/basic_ostream/inserters_arithmetic/char/ |
H A D | 23871.cc | 33 inline unsigned char operator|| (const int& lhs, const mytest& rhs) argument 36 return (mytest)lhs || rhs;
|
/haiku-buildtools/gcc/gcc/testsuite/g++.old-deja/g++.martin/ |
H A D | sts_vectini.C | 21 XTVec& operator+=(XTVec& lhs, XTVec& rhs){ argument 22 lhs[0]+=rhs[0]; 23 lhs[1]+=rhs[1]; 24 lhs[2]+=rhs[2]; 25 return lhs; 29 XTVec operator+(XTVec& lhs, XTVec& rhs){ argument 30 XTVec result(lhs);
|
/haiku-buildtools/gcc/gcc/testsuite/gfortran.fortran-torture/execute/ |
H A D | userop.f90 | 16 function myfoo (lhs, rhs) 19 integer, intent(in) :: lhs, rhs local in function:myfoo 21 myfoo = lhs + rhs 25 function boolmul (lhs, rhs) 28 logical, intent(IN) :: lhs, rhs local in function:boolmul 30 boolmul = lhs .and. .not. rhs 33 subroutine int2bool (lhs, rhs) 35 logical, intent(out) :: lhs local in subroutine:int2bool 38 lhs = rhs .ne. 0
|
/haiku-buildtools/gcc/gcc/testsuite/g++.dg/compat/decimal/ |
H A D | decimal-dummy.h | 31 inline decimal32 operator+ (decimal32 lhs, decimal32 rhs) argument 34 tmp.__val = lhs.__val + rhs.__val; 38 inline decimal64 operator+ (decimal64 lhs, decimal64 rhs) argument 41 tmp.__val = lhs.__val + rhs.__val; 45 inline decimal128 operator+ (decimal128 lhs, decimal128 rhs) argument 48 tmp.__val = lhs.__val + rhs.__val; 52 inline bool operator!= (decimal32 lhs, decimal32 rhs) argument 54 return lhs.__val != rhs.__val; 57 inline bool operator!= (decimal64 lhs, decimal64 rhs) argument 59 return lhs 62 operator !=(decimal128 lhs, decimal128 rhs) argument [all...] |
/haiku-buildtools/gcc/gcc/testsuite/g++.dg/opt/ |
H A D | inline7.C | 6 basic_string operator+(const basic_string& lhs, char);
|
/haiku-buildtools/gcc/gmp/demos/ |
H A D | pexpr.c | 105 struct {struct expr *lhs, *rhs;} ops; member in struct:expr::__anon1847::__anon1848 862 RHS and left hand side lhs. Put the result in R. */ 864 makeexp (expr_t *r, enum op_t op, expr_t lhs, expr_t rhs) argument 869 res -> operands.ops.lhs = lhs; 881 free_expr (e->operands.ops.lhs); 895 mpz_t lhs, rhs; local 903 mpz_init (lhs); mpz_init (rhs); 904 mpz_eval_expr (lhs, e->operands.ops.lhs); 1311 mpz_t lhs, rhs; local [all...] |
/haiku-buildtools/gcc/gcc/testsuite/g++.dg/init/ |
H A D | ctor6.C | 13 Obj lhs, rhs; local 14 return lhs == rhs;
|
/haiku-buildtools/gcc/gcc/testsuite/g++.dg/torture/ |
H A D | pr45709-2.C | 7 static inline Region subtract(int lhs) argument 12 if (lhs > 0)
|
H A D | pr45709.C | 7 static inline Region subtract(int lhs) argument 11 if (lhs > 0)
|