Searched refs:gcvlen (Results 1 – 6 of 6) sorted by relevance
574 int gcvlen; /* global character type size */ member
3745 sem.gcvlen = 0; in semant3()3747 sem.gcvlen = 0; in semant3()3749 sem.gcvlen = string_expr_length(alloc_source); in semant3()3779 if (alloc_source && !sem.gcvlen && in semant3()4406 sem.gcvlen = 0; in semant3()5194 sem.gcvlen = size_ast_of(itemp->ast, A_DTYPEG(itemp->ast)); in semant3()5213 sem.gcvlen = size_ast_of(itemp->ast, A_DTYPEG(itemp->ast)); in semant3()
1183 int gcvlen; /* global character type size */ member
4755 sem.gcvlen = SST_ASTG(RHS(2)); in semant1()4757 sem.gcvlen = astb.i1; in semant1()4759 sem.gcvlen = mk_cval(SST_SYMG(RHS(2)), DT_INT4); in semant1()4762 sem.gcvlen = SST_ASTG(RHS(2)); in semant1()4774 sem.gcvlen = SST_ASTG(RHS(3)); in semant1()4776 sem.gcvlen = astb.i1; in semant1()4778 sem.gcvlen = mk_cval(SST_SYMG(RHS(3)), DT_INT4); in semant1()4781 sem.gcvlen = SST_ASTG(RHS(3)); in semant1()
1499 if (sem.gcvlen && is_deferlenchar_dtype(acs.eltype)) { in chk_constructor()7711 if (sem.gcvlen && is_deferlenchar_dtype(dtype)) { in get_ch_temp()11532 if (sem.gcvlen) { in gen_alloc_dealloc()11534 mk_assn_stmt(get_len_of_deferchar_ast(object), sem.gcvlen, DT_INT); in gen_alloc_dealloc()11538 assert(sem.gcvlen != 0, "gen_alloc_dealloc: character size missing", 3, in gen_alloc_dealloc()
2596 if (sem.gcvlen && is_deferlenchar_dtype(dtype)) { in lower_put_datatype()