Searched refs:kind_value (Results 1 – 2 of 2) sorted by relevance
3705 int kind_value, i; in gfc_get_pdt_instance() local3850 gfc_extract_int (kind_expr, &kind_value); in gfc_get_pdt_instance()3851 sprintf (name + strlen (name), "_%d", kind_value); in gfc_get_pdt_instance()
3803 int kind_value, i; in gfc_get_pdt_instance() local3955 gfc_extract_int (kind_expr, &kind_value); in gfc_get_pdt_instance()3956 sprintf (name + strlen (name), "_%d", kind_value); in gfc_get_pdt_instance()