3877   int proc_pointer;  in gfc_check_pointer_assign()  local
3884   if (lvalue->ts.type == BT_UNKNOWN && !lhs_attr.proc_pointer)  in gfc_check_pointer_assign()
3892       && !lhs_attr.proc_pointer)  in gfc_check_pointer_assign()
3900   proc_pointer = lvalue->symtree->n.sym->attr.proc_pointer;  in gfc_check_pointer_assign()
3907 	proc_pointer = ref->u.c.component->attr.proc_pointer;  in gfc_check_pointer_assign()
4019   if (proc_pointer)  in gfc_check_pointer_assign()
4028 	    || (rvalue->expr_type == EXPR_FUNCTION && attr.proc_pointer)  in gfc_check_pointer_assign()
4029 	    || (rvalue->expr_type == EXPR_VARIABLE && attr.proc_pointer)  in gfc_check_pointer_assign()
4038       if (rvalue->expr_type == EXPR_VARIABLE && !attr.proc_pointer)  in gfc_check_pointer_assign()
4167       if (s2 && s2->attr.proc_pointer && s2->ts.interface)  in gfc_check_pointer_assign()
4370       if (!target && !proc_pointer)  in gfc_check_pointer_assign()
4445       && !(attr.pointer || attr.proc_pointer))  in gfc_check_pointer_assign()
4528   bool pointer, proc_pointer;  in gfc_check_assign_symbol()  local
4551       proc_pointer = comp->attr.proc_pointer;  in gfc_check_assign_symbol()
4557       proc_pointer = sym->attr.proc_pointer;  in gfc_check_assign_symbol()
4560   if (pointer || proc_pointer)  in gfc_check_assign_symbol()
4581   if (pointer && rvalue->expr_type != EXPR_NULL && !proc_pointer)  in gfc_check_assign_symbol()
4615   if (proc_pointer && rvalue->expr_type != EXPR_NULL)  in gfc_check_assign_symbol()
4619       if (attr.proc_pointer)  in gfc_check_assign_symbol()
4903         if (!c->attr.pointer && !c->attr.proc_pointer  in gfc_has_default_initializer()
5000     || comp->attr.proc_pointer  in comp_pointer()
5164 	      && !comp->attr.pointer && !comp->attr.proc_pointer)  in gfc_generate_initializer()
5490       && ref->u.c.component->attr.proc_pointer)  in gfc_get_proc_ptr_comp()
6210       && !(sym->attr.flavor == FL_PROCEDURE && sym->attr.proc_pointer))  in gfc_check_vardef_context()
6220   is_pointer = (attr.pointer || attr.proc_pointer);  in gfc_check_vardef_context()