Lines Matching defs:share
45 tag_e_share = {"SHARE", " share =", " %e", BT_CHARACTER },
46 tag_v_share = {"SHARE", " share =", " %v", BT_CHARACTER },
1632 if (o->share != NULL)
1637 o->share = gfc_get_character_expr (gfc_default_character_kind,
1645 if (o->share != NULL)
1650 o->share = gfc_get_character_expr (gfc_default_character_kind,
1960 m = match_dec_etag (&tag_e_share, &open->share);
2008 gfc_free_expr (open->share);
2050 RESOLVE_TAG (&tag_e_share, open->share);
2383 if (open->share && open->share->expr_type == EXPR_CONSTANT)
2385 static const char *share[] = { "DENYNONE", "DENYRW", NULL };
2386 if (!compare_to_allowed_values ("SHARE", share, NULL, NULL,
2387 open->share->value.character.string,
2388 "OPEN", warn, &open->share->where))
4511 gfc_free_expr (inquire->share);
4564 RETM m = match_dec_vtag (&tag_v_share, &inquire->share);
4774 INQUIRE_RESOLVE_TAG (&tag_v_share, inquire->share);