Lines Matching refs:orig_decl
101 tree orig_decl = decl;
142 orig_decl, null_pointer_node);
1514 tree orig_decl = decl;
1522 && (GFC_DECL_GET_SCALAR_POINTER (orig_decl)
1523 || GFC_DECL_GET_SCALAR_ALLOCATABLE (orig_decl)))
1545 if (TREE_CODE (TREE_TYPE (orig_decl)) == REFERENCE_TYPE
1546 && (GFC_DECL_GET_SCALAR_POINTER (orig_decl)
1547 || GFC_DECL_GET_SCALAR_ALLOCATABLE (orig_decl)))
3117 tree orig_decl = decl;
3148 if ((TREE_CODE (TREE_TYPE (orig_decl)) == REFERENCE_TYPE
3149 || gfc_omp_is_optional_argument (orig_decl))
3150 && (GFC_DECL_GET_SCALAR_POINTER (orig_decl)
3151 || GFC_DECL_GET_SCALAR_ALLOCATABLE (orig_decl)))