charptr_type = new_type_pointer(IDENT("__charptr"), character_type, mode_P_data);
align_n = get_type_size_bytes(charptr_type);
set_type_alignment_bytes(charptr_type, align_n);
loc_name = new_entity(loc_type, IDENT("name"), charptr_type);
size = (size + align_n - 1) & -align_n;
charptr_type = new_type_pointer(IDENT("__charptr"), character_type, mode_P_data);
align_n = get_type_size_bytes(charptr_type);
set_type_alignment_bytes(charptr_type, align_n);
loc_name = new_entity(loc_type, IDENT("name"), charptr_type);
size = (size + align_n - 1) & -align_n;