1183 static char *atom_string, atom_name[MAX_ATOM_SIZE];  variable
1282   atom_string = XNEWVEC (char, cursz);  in parse_string()
1301 	  atom_string = XRESIZEVEC (char, atom_string, cursz);  in parse_string()
1303       atom_string[len] = c;  in parse_string()
1307   atom_string = XRESIZEVEC (char, atom_string, len + 1);  in parse_string()
1308   atom_string[len] = '\0'; 	/* C-style string for debug purposes.  */  in parse_string()
1637   p = atom_string;  in read_string()
1638   atom_string = NULL;  in read_string()
1860       return atom_string;  in mio_allocated_string()
1982       unquoted = unquote_string (atom_string);  in mio_allocated_wide_string()
1983       free (atom_string);  in mio_allocated_wide_string()
2008       *stringp = (atom_string[0] == '\0'  in mio_pool_string()
2009 		  ? NULL : gfc_get_string ("%s", atom_string));  in mio_pool_string()
2010       free (atom_string);  in mio_pool_string()
2026       strcpy (string, atom_string);  in mio_internal_string()
2027       free (atom_string);  in mio_internal_string()
3331       if (mpz_set_str (*integer, atom_string, 10))  in mio_gmp_integer()
3334       free (atom_string);  in mio_gmp_integer()
3357       mpfr_set_str (*real, atom_string, 16, GFC_RND_MODE);  in mio_gmp_real()
3358       free (atom_string);  in mio_gmp_real()
3371       atom_string = XCNEWVEC (char, strlen (p) + 20);  in mio_gmp_real()
3373       sprintf (atom_string, "0.%s@%ld", p, exponent);  in mio_gmp_real()
3376       if (atom_string[2] == '-')  in mio_gmp_real()
3378 	  atom_string[0] = '-';  in mio_gmp_real()
3379 	  atom_string[1] = '0';  in mio_gmp_real()
3380 	  atom_string[2] = '.';  in mio_gmp_real()
3383       write_atom (ATOM_STRING, atom_string);  in mio_gmp_real()
3385       free (atom_string);  in mio_gmp_real()
3698 	  if (atom_string[0] == '\0')  in mio_expr()
3701 	    e->value.function.name = gfc_get_string ("%s", atom_string);  in mio_expr()
3702 	  free (atom_string);  in mio_expr()
3717 	      e->value.function.isym = gfc_find_function (atom_string);  in mio_expr()
3718 	      free (atom_string);  in mio_expr()
4001 	      g->specific_st = gfc_get_tbp_symtree (sym_root, atom_string);  in mio_typebound_proc()
4002 	      free (atom_string);  in mio_typebound_proc()
4052 	  st = gfc_get_tbp_symtree (root, atom_string);  in mio_full_typebound_tree()
4053 	  free (atom_string);  in mio_full_typebound_tree()
4388 	      ns->code->resolved_isym = gfc_find_subroutine (atom_string);  in mio_omp_udr_expr()
4389 	      free (atom_string);  in mio_omp_udr_expr()
4557 	  free (atom_string);
7186 	      || strcmp (atom_string, MOD_VERSION))  in gfc_use_module()
7191 	  free (atom_string);  in gfc_use_module()