Lines Matching refs:token
104 free (TOKEN (caf_static_list->token)[caf_this_image-1]);
105 free (TOKEN (caf_static_list->token));
133 _gfortran_caf_register (size_t size, caf_register_t type, caf_token_t *token,
149 *token = malloc (sizeof (mpi_token_t) * caf_num_images);
151 if (unlikely (local == NULL || *token == NULL))
154 /* token[img-1] is the address of the token in image "img". */
155 err = MPI_Allgather (&local, sizeof (void*), MPI_BYTE, TOKEN (*token),
161 free (*token);
169 tmp->token = *token;
208 _gfortran_caf_deregister (caf_token_t *token, int *stat, char *errmsg, size_t errmsg_len)
236 free (TOKEN (*token)[caf_this_image-1]);
237 free (*token);