| /src/external/gpl3/gcc/dist/gcc/fortran/ |
| interface.cc | 943 i1 = fsym->attr.intent;
950 i2 = fsym->attr.intent;
1020 "INTENT(OUT) or INTENT(INOUT)", &sym->declared_at);
1027 "INTENT(IN)", &sym->declared_at);
1036 "INTENT(IN)", &sym->declared_at);
1043 "INTENT(IN)", &sym->declared_at);
1272 return a1 && p2 && (s2->attr.intent != INTENT_IN);
1399 /* Check INTENT. */
1400 if (s1->attr.intent != s2->attr.intent && !s1->attr.artificia
5370 sym_intent intent; local
[all...] |
| intrinsic.cc | 370 sym_intent intent of argument
388 sym_intent intent; local
442 intent = (sym_intent) va_arg (argp, int);
462 next_arg->intent = intent;
541 1 arguments, specifying the intent of the argument. */
567 1 arguments, specifying the intent of the argument. */
668 2 arguments; same as add_sym_2 - but allows to specify the intent. */
696 2 arguments, specifying the intent of the arguments. */
853 3 arguments, specifying the intent of the arguments. *
[all...] |
| symbol.cc | 61 minit ("UNKNOWN-INTENT", INTENT_UNKNOWN),
445 *target = "TARGET", *external = "EXTERNAL", *intent = "INTENT", local
446 *intent_in = "INTENT(IN)", *intrinsic = "INTRINSIC",
447 *intent_out = "INTENT(OUT)", *intent_inout = "INTENT(INOUT)",
479 if (attr->pointer && attr->intent != INTENT_UNKNOWN)
480 conf_std (pointer, intent, GFC_STD_F2003);
502 if (attr->intent != INTENT_UNKNOWN)
503 a1 = intent;
[all...] |
| decl.cc | 1036 /* Match an intent specification. Since this can only happen after an
1037 INTENT word, a legal intent-spec must follow. */
1050 gfc_error ("Bad INTENT specification at %C");
5363 /* Matched "intent". */
5572 attr = "INTENT (IN)";
5575 attr = "INTENT (OUT)";
5578 attr = "INTENT (IN OUT)";
9084 sym_intent intent; local
9089 gfc_error ("INTENT is not allowed inside of BLOCK at %C")
[all...] |
| trans-expr.cc | 135 if ((attr.pointer || attr.allocatable) && attr.intent != INTENT_IN)
1717 /* Special case for initializing a polymorphic dummy with INTENT(OUT).
1748 /* Check def_init for initializers. If this is an INTENT(OUT) dummy with all
1756 && sym->attr.intent == INTENT_OUT)
5008 sym_intent intent, bool formal_ptr,
5130 if (intent != INTENT_OUT)
5254 if ((intent != INTENT_IN) && !readonly)
5692 gfc_conv_subref_array_arg (&se, e, false, fsym->attr.intent,
5808 /* The cfi-base_addr assignment could be skipped for 'pointer, intent(out)'.
5833 if (fsym->attr.pointer && fsym->attr.intent == INTENT_OUT
7221 sym_intent intent; local
[all...] |
| gfortran.h | 351 /* Intent types. Note that these values are also used in another enum in
965 ENUM_BITFIELD (sym_intent) intent:2; member in struct:__anon13616
2405 ENUM_BITFIELD (sym_intent) intent:2; member in struct:gfc_intrinsic_arg
|
| /src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| interface.cc | 906 i1 = fsym->attr.intent;
913 i2 = fsym->attr.intent;
983 "INTENT(OUT) or INTENT(INOUT)", &sym->declared_at);
990 "INTENT(IN)", &sym->declared_at);
999 "INTENT(IN)", &sym->declared_at);
1006 "INTENT(IN)", &sym->declared_at);
1235 return a1 && p2 && (s2->attr.intent != INTENT_IN);
1356 /* Check INTENT. */
1357 if (s1->attr.intent != s2->attr.intent && !s1->attr.artificia
5217 sym_intent intent; local
[all...] |
| intrinsic.cc | 369 sym_intent intent of argument
387 sym_intent intent; local
441 intent = (sym_intent) va_arg (argp, int);
461 next_arg->intent = intent;
540 1 arguments, specifying the intent of the argument. */
566 1 arguments, specifying the intent of the argument. */
667 2 arguments; same as add_sym_2 - but allows to specify the intent. */
695 2 arguments, specifying the intent of the arguments. */
852 3 arguments, specifying the intent of the arguments. *
[all...] |
| symbol.cc | 61 minit ("UNKNOWN-INTENT", INTENT_UNKNOWN),
414 *target = "TARGET", *external = "EXTERNAL", *intent = "INTENT", local
415 *intent_in = "INTENT(IN)", *intrinsic = "INTRINSIC",
416 *intent_out = "INTENT(OUT)", *intent_inout = "INTENT(INOUT)",
449 if (attr->pointer && attr->intent != INTENT_UNKNOWN)
452 a2 = intent;
482 if (attr->intent != INTENT_UNKNOWN)
483 a1 = intent;
[all...] |
| decl.cc | 1035 /* Match an intent specification. Since this can only happen after an
1036 INTENT word, a legal intent-spec must follow. */
1049 gfc_error ("Bad INTENT specification at %C");
5307 /* Matched "intent". */
5516 attr = "INTENT (IN)";
5519 attr = "INTENT (OUT)";
5522 attr = "INTENT (IN OUT)";
9013 sym_intent intent; local
9018 gfc_error ("INTENT is not allowed inside of BLOCK at %C")
[all...] |
| trans-expr.cc | 135 if ((attr.pointer || attr.allocatable) && attr.intent != INTENT_IN)
1684 /* Special case for initializing a polymorphic dummy with INTENT(OUT).
4906 sym_intent intent, bool formal_ptr,
5027 if (intent != INTENT_OUT)
5145 if (intent != INTENT_IN)
5583 gfc_conv_subref_array_arg (&se, e, false, fsym->attr.intent,
5721 /* When allocatable + intent out, free the cfi descriptor. */
5722 if (fsym->attr.allocatable && fsym->attr.intent == INTENT_OUT)
5905 || fsym->attr.intent == INTENT_IN)
6326 fsym->attr.intent != INTENT_I
6805 sym_intent intent; local
[all...] |
| gfortran.h | 346 /* Intent types. Note that these values are also used in another enum in
957 ENUM_BITFIELD (sym_intent) intent:2; member in struct:__anon16051
2315 ENUM_BITFIELD (sym_intent) intent:2; member in struct:gfc_intrinsic_arg
|
| /src/sys/dev/acpi/ |
| qcompas.c | 1066 struct qcpas_glink_intent_pair intent; local
1079 /* Respond with default intent now that channel is open */
1091 intent.size = it->it_size;
1092 intent.iid = it->it_id;
1096 qcpas_glink_tx(sc, (char *)&intent, sizeof(intent));
1117 device_printf(sc->sc_dev, "unknown channel %u for INTENT\n",
1166 device_printf(sc->sc_dev, "unknown intent %u for TX_DATA\n",
1210 device_printf(sc->sc_dev, "unknown intent %u for RX_DONE\n",
|
