Home
last modified time | relevance | path

Searched refs:MATCH_YES (Results 1 – 25 of 31) sorted by relevance

12

/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dmatch.cc161 if (gfc_match_char ('%') == MATCH_YES) in gfc_match_member_sep()
162 return MATCH_YES; in gfc_match_member_sep()
186 if (gfc_match_char ('.') != MATCH_YES) in gfc_match_member_sep()
193 if (gfc_match_name (name) != MATCH_YES) in gfc_match_member_sep()
201 if (gfc_match_char ('.') != MATCH_YES) in gfc_match_member_sep()
219 if (gfc_match_intrinsic_op (&iop) != MATCH_YES) in gfc_match_member_sep()
243 return MATCH_YES; in gfc_match_member_sep()
303 return MATCH_YES; in gfc_match_parens()
317 m = MATCH_YES; in gfc_match_special_char()
391 return MATCH_YES; in gfc_match_space()
[all …]
H A Dmatchexp.cc51 if (m != MATCH_YES) in gfc_match_defined_op_name()
77 return MATCH_YES; in gfc_match_defined_op_name()
98 if (m != MATCH_YES) in match_defined_operator()
102 return MATCH_YES; in match_defined_operator()
116 if (gfc_match_intrinsic_op (&u) == MATCH_YES && t == u) in next_operator()
162 if (gfc_match_char ('(') != MATCH_YES) in match_primary()
180 if (m != MATCH_YES) in match_primary()
186 return MATCH_YES; in match_primary()
212 if (m != MATCH_YES) in match_level_1()
224 return MATCH_YES; in match_level_1()
[all …]
H A Ddecl.cc241 if (gfc_match_char (',') != MATCH_YES) in var_list()
245 if (m == MATCH_YES) in var_list()
262 if (gfc_match_char (')') != MATCH_YES) in var_list()
264 return MATCH_YES; in var_list()
283 if (gfc_match_char ('(') == MATCH_YES) in var_element()
287 if (m != MATCH_YES) in var_element()
322 return MATCH_YES; in var_element()
356 if (gfc_match_char ('/') == MATCH_YES) in top_var_list()
358 if (gfc_match_char (',') != MATCH_YES) in top_var_list()
362 return MATCH_YES; in top_var_list()
[all …]
H A Dopenmp.cc55 return MATCH_YES; in gfc_match_omp_eos()
65 if (gfc_match_omp_eos() == MATCH_YES) in gfc_match_omp_eos_error()
66 return MATCH_YES; in gfc_match_omp_eos_error()
320 if (m != MATCH_YES) in gfc_match_omp_variable_list()
329 case MATCH_YES: in gfc_match_omp_variable_list()
403 if (end_colon && gfc_match_char (':') == MATCH_YES) in gfc_match_omp_variable_list()
408 if (gfc_match_char (')') == MATCH_YES) in gfc_match_omp_variable_list()
410 if (gfc_match_char (',') != MATCH_YES) in gfc_match_omp_variable_list()
420 return MATCH_YES; in gfc_match_omp_variable_list()
449 if (m != MATCH_YES) in gfc_match_omp_to_link()
[all …]
H A Dprimary.cc53 if (m != MATCH_YES) in match_kind_param()
78 return MATCH_YES; in match_kind_param()
98 if (gfc_match_char ('_') != MATCH_YES) in get_kind()
105 return (m == MATCH_YES) ? kind : -1; in get_kind()
296 return MATCH_YES; in match_integer_constant()
313 if (match_integer_constant (&e, 0) == MATCH_YES in match_hollerith_constant()
314 && gfc_match_char ('h') == MATCH_YES) in match_hollerith_constant()
366 return MATCH_YES; in match_hollerith_constant()
503 return MATCH_YES; in match_boz_constant()
812 return MATCH_YES; in match_real_constant()
[all …]
H A Dio.cc1399 if (gfc_match_eos () != MATCH_YES) in gfc_match_format()
1422 return MATCH_YES; in gfc_match_format()
1435 if (m != MATCH_YES) in match_etag()
1439 if (m != MATCH_YES) in match_etag()
1453 return MATCH_YES; in match_etag()
1466 if (m != MATCH_YES) in match_vtag()
1470 if (m != MATCH_YES) in match_vtag()
1508 return MATCH_YES; in match_vtag()
1520 if (m == MATCH_YES) in match_out_tag()
1546 if (m != MATCH_YES) in match_ltag()
[all …]
H A Darray.cc84 if (gfc_match_char (':') == MATCH_YES) in match_subscript()
88 if (match_star && (m = gfc_match_char ('*')) == MATCH_YES) in match_subscript()
104 if (m != MATCH_YES) in match_subscript()
121 if (match_star && (m = gfc_match_char ('*')) == MATCH_YES) in match_subscript()
145 if (gfc_match_char (':') == MATCH_YES) in match_subscript()
164 if (m != MATCH_YES) in match_subscript()
172 return (saw_boz ? MATCH_ERROR : MATCH_YES); in match_subscript()
196 if (gfc_match_char ('[') == MATCH_YES) in gfc_match_array_ref()
202 if (gfc_match_char ('(') != MATCH_YES) in gfc_match_array_ref()
206 return MATCH_YES; in gfc_match_array_ref()
[all …]
H A Dparse.cc63 if (m != MATCH_YES) in match_word()
69 if (m != MATCH_YES) in match_word()
90 if (m != MATCH_YES) in match_word_omp_simd()
97 if (m != MATCH_YES) in match_word_omp_simd()
133 if (match_word (keyword, subr, &old_locus) == MATCH_YES) \
156 if (gfc_match_eos () == MATCH_YES) in decode_specification_statement()
161 if (match_word ("use", gfc_match_use, &old_locus) == MATCH_YES) in decode_specification_statement()
248 if (gfc_match_private (&st) == MATCH_YES) in decode_specification_statement()
251 if (gfc_match_public (&st) == MATCH_YES) in decode_specification_statement()
311 if (gfc_match_eos () == MATCH_YES) in decode_statement()
[all …]
H A Dinterface.cc146 if (gfc_match (" assignment ( = )") == MATCH_YES) in gfc_match_generic_spec()
150 return MATCH_YES; in gfc_match_generic_spec()
153 if (gfc_match (" operator ( %o )", &i) == MATCH_YES) in gfc_match_generic_spec()
157 return MATCH_YES; in gfc_match_generic_spec()
161 if (gfc_match (" operator ( ") == MATCH_YES) in gfc_match_generic_spec()
166 if (m != MATCH_YES) in gfc_match_generic_spec()
172 if (m != MATCH_YES) in gfc_match_generic_spec()
177 return MATCH_YES; in gfc_match_generic_spec()
180 if (gfc_match (" read ( %n )", buffer) == MATCH_YES) in gfc_match_generic_spec()
194 return MATCH_YES; in gfc_match_generic_spec()
[all …]
H A Dmodule.cc540 if (gfc_match (" , ") == MATCH_YES) in gfc_match_use()
542 if ((m = gfc_match (" %n ::", module_nature)) == MATCH_YES) in gfc_match_use()
578 if (m == MATCH_YES && in gfc_match_use()
582 if (m != MATCH_YES) in gfc_match_use()
585 if (m != MATCH_YES) in gfc_match_use()
596 if (m != MATCH_YES) in gfc_match_use()
604 if (gfc_match_eos () == MATCH_YES) in gfc_match_use()
607 if (gfc_match_char (',') != MATCH_YES) in gfc_match_use()
610 if (gfc_match (" only :") == MATCH_YES) in gfc_match_use()
613 if (gfc_match_eos () == MATCH_YES) in gfc_match_use()
[all …]
H A Dresolve.cc2764 return MATCH_YES; in resolve_generic_f0()
2790 if (m == MATCH_YES) in resolve_generic_f()
2836 if (m == MATCH_YES) in resolve_generic_f()
2875 if (m == MATCH_YES) in resolve_specific_f0()
2876 return MATCH_YES; in resolve_specific_f0()
2904 return MATCH_YES; in resolve_specific_f0()
2919 if (m == MATCH_YES) in resolve_specific_f()
2998 if (gfc_intrinsic_func_interface (expr, 1) == MATCH_YES) in resolve_unknown_f()
3545 return MATCH_YES; in resolve_generic_s0()
3569 if (m == MATCH_YES) in resolve_generic_s()
[all …]
H A Dexpr.cc2705 return MATCH_YES; in check_init_expr_arguments()
2842 return MATCH_YES; in check_inquiry()
3035 if (m == MATCH_YES) in gfc_check_init_expr()
3223 if (m != MATCH_YES) in gfc_match_init_expr()
3247 return MATCH_YES; in gfc_match_init_expr()
3345 if (check_inquiry (e, 0) == MATCH_YES) in restricted_intrinsic()
H A Dintrinsic.cc4943 ? MATCH_ERROR : MATCH_YES; in gfc_intrinsic_func_interface()
5094 return MATCH_YES; in gfc_intrinsic_func_interface()
5177 return MATCH_YES; in gfc_intrinsic_sub_interface()
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dmatch.c161 if (gfc_match_char ('%') == MATCH_YES) in gfc_match_member_sep()
162 return MATCH_YES; in gfc_match_member_sep()
186 if (gfc_match_char ('.') != MATCH_YES) in gfc_match_member_sep()
193 if (gfc_match_name (name) != MATCH_YES) in gfc_match_member_sep()
201 if (gfc_match_char ('.') != MATCH_YES) in gfc_match_member_sep()
219 if (gfc_match_intrinsic_op (&iop) != MATCH_YES) in gfc_match_member_sep()
243 return MATCH_YES; in gfc_match_member_sep()
303 return MATCH_YES; in gfc_match_parens()
317 m = MATCH_YES; in gfc_match_special_char()
391 return MATCH_YES; in gfc_match_space()
[all …]
H A Dmatchexp.c51 if (m != MATCH_YES) in gfc_match_defined_op_name()
77 return MATCH_YES; in gfc_match_defined_op_name()
98 if (m != MATCH_YES) in match_defined_operator()
102 return MATCH_YES; in match_defined_operator()
116 if (gfc_match_intrinsic_op (&u) == MATCH_YES && t == u) in next_operator()
162 if (gfc_match_char ('(') != MATCH_YES) in match_primary()
180 if (m != MATCH_YES) in match_primary()
186 return MATCH_YES; in match_primary()
212 if (m != MATCH_YES) in match_level_1()
224 return MATCH_YES; in match_level_1()
[all …]
H A Ddecl.c241 if (gfc_match_char (',') != MATCH_YES) in var_list()
245 if (m == MATCH_YES) in var_list()
262 if (gfc_match_char (')') != MATCH_YES) in var_list()
264 return MATCH_YES; in var_list()
283 if (gfc_match_char ('(') == MATCH_YES) in var_element()
287 if (m != MATCH_YES) in var_element()
322 return MATCH_YES; in var_element()
356 if (gfc_match_char ('/') == MATCH_YES) in top_var_list()
358 if (gfc_match_char (',') != MATCH_YES) in top_var_list()
362 return MATCH_YES; in top_var_list()
[all …]
H A Dopenmp.c53 return MATCH_YES; in gfc_match_omp_eos()
63 if (gfc_match_omp_eos() == MATCH_YES) in gfc_match_omp_eos_error()
64 return MATCH_YES; in gfc_match_omp_eos_error()
251 if (m != MATCH_YES)
260 case MATCH_YES:
334 if (end_colon && gfc_match_char (':') == MATCH_YES)
339 if (gfc_match_char (')') == MATCH_YES)
341 if (gfc_match_char (',') != MATCH_YES)
351 return MATCH_YES;
380 if (m != MATCH_YES) in gfc_match_omp_to_link()
[all …]
H A Dprimary.c53 if (m != MATCH_YES) in match_kind_param()
78 return MATCH_YES; in match_kind_param()
98 if (gfc_match_char ('_') != MATCH_YES) in get_kind()
105 return (m == MATCH_YES) ? kind : -1; in get_kind()
296 return MATCH_YES; in match_integer_constant()
313 if (match_integer_constant (&e, 0) == MATCH_YES in match_hollerith_constant()
314 && gfc_match_char ('h') == MATCH_YES) in match_hollerith_constant()
366 return MATCH_YES; in match_hollerith_constant()
503 return MATCH_YES; in match_boz_constant()
833 return MATCH_YES; in match_real_constant()
[all …]
H A Dio.c1399 if (gfc_match_eos () != MATCH_YES) in gfc_match_format()
1422 return MATCH_YES; in gfc_match_format()
1435 if (m != MATCH_YES) in match_etag()
1439 if (m != MATCH_YES) in match_etag()
1453 return MATCH_YES; in match_etag()
1466 if (m != MATCH_YES) in match_vtag()
1470 if (m != MATCH_YES) in match_vtag()
1508 return MATCH_YES; in match_vtag()
1520 if (m == MATCH_YES) in match_out_tag()
1546 if (m != MATCH_YES) in match_ltag()
[all …]
H A Darray.c84 if (gfc_match_char (':') == MATCH_YES) in match_subscript()
88 if (match_star && (m = gfc_match_char ('*')) == MATCH_YES) in match_subscript()
104 if (m != MATCH_YES) in match_subscript()
121 if (match_star && (m = gfc_match_char ('*')) == MATCH_YES) in match_subscript()
138 if (gfc_match_char (':') == MATCH_YES) in match_subscript()
157 if (m != MATCH_YES) in match_subscript()
165 return (saw_boz ? MATCH_ERROR : MATCH_YES); in match_subscript()
189 if (gfc_match_char ('[') == MATCH_YES) in gfc_match_array_ref()
195 if (gfc_match_char ('(') != MATCH_YES) in gfc_match_array_ref()
199 return MATCH_YES; in gfc_match_array_ref()
[all …]
H A Dparse.c61 if (m != MATCH_YES) in match_word()
67 if (m != MATCH_YES) in match_word()
88 if (m != MATCH_YES) in match_word_omp_simd()
95 if (m != MATCH_YES) in match_word_omp_simd()
131 if (match_word (keyword, subr, &old_locus) == MATCH_YES) \
154 if (gfc_match_eos () == MATCH_YES) in decode_specification_statement()
159 if (match_word ("use", gfc_match_use, &old_locus) == MATCH_YES) in decode_specification_statement()
246 if (gfc_match_private (&st) == MATCH_YES) in decode_specification_statement()
249 if (gfc_match_public (&st) == MATCH_YES) in decode_specification_statement()
309 if (gfc_match_eos () == MATCH_YES) in decode_statement()
[all …]
H A Dinterface.c146 if (gfc_match (" assignment ( = )") == MATCH_YES) in gfc_match_generic_spec()
150 return MATCH_YES; in gfc_match_generic_spec()
153 if (gfc_match (" operator ( %o )", &i) == MATCH_YES) in gfc_match_generic_spec()
157 return MATCH_YES; in gfc_match_generic_spec()
161 if (gfc_match (" operator ( ") == MATCH_YES) in gfc_match_generic_spec()
166 if (m != MATCH_YES) in gfc_match_generic_spec()
172 if (m != MATCH_YES) in gfc_match_generic_spec()
177 return MATCH_YES; in gfc_match_generic_spec()
180 if (gfc_match (" read ( %n )", buffer) == MATCH_YES) in gfc_match_generic_spec()
194 return MATCH_YES; in gfc_match_generic_spec()
[all …]
H A Dmodule.c535 if (gfc_match (" , ") == MATCH_YES) in gfc_match_use()
537 if ((m = gfc_match (" %n ::", module_nature)) == MATCH_YES) in gfc_match_use()
573 if (m == MATCH_YES && in gfc_match_use()
577 if (m != MATCH_YES) in gfc_match_use()
580 if (m != MATCH_YES) in gfc_match_use()
591 if (m != MATCH_YES) in gfc_match_use()
599 if (gfc_match_eos () == MATCH_YES) in gfc_match_use()
602 if (gfc_match_char (',') != MATCH_YES) in gfc_match_use()
605 if (gfc_match (" only :") == MATCH_YES) in gfc_match_use()
608 if (gfc_match_eos () == MATCH_YES) in gfc_match_use()
[all …]
H A Dresolve.c2705 return MATCH_YES; in resolve_generic_f0()
2731 if (m == MATCH_YES) in resolve_generic_f()
2777 if (m == MATCH_YES) in resolve_generic_f()
2816 if (m == MATCH_YES) in resolve_specific_f0()
2817 return MATCH_YES; in resolve_specific_f0()
2845 return MATCH_YES; in resolve_specific_f0()
2860 if (m == MATCH_YES) in resolve_specific_f()
2939 if (gfc_intrinsic_func_interface (expr, 1) == MATCH_YES) in resolve_unknown_f()
3468 return MATCH_YES; in resolve_generic_s0()
3492 if (m == MATCH_YES) in resolve_generic_s()
[all …]
H A Dexpr.c2679 return MATCH_YES; in check_init_expr_arguments()
2816 return MATCH_YES; in check_inquiry()
3009 if (m == MATCH_YES) in gfc_check_init_expr()
3191 if (m != MATCH_YES) in gfc_match_init_expr()
3215 return MATCH_YES; in gfc_match_init_expr()
3313 if (check_inquiry (e, 0) == MATCH_YES) in restricted_intrinsic()

12