#if !(defined (__MSDOS__) || defined (OS2) || defined (VMS) || defined (WIN32))

  /* Add specs listed in GCC_SPECS.  Note; in the process of separating

   * each spec listed, the string is overwritten at token boundaries

   * (':') with '\0', an effect of strtok_r().

   */

  specs_file = getenv ("GCC_SPECS");

  if (specs_file && (strlen(specs_file) > 0))

    {

      char *spec, *saveptr;

      for (spec=strtok_r(specs_file,":",&saveptr);

           spec!=NULL;

           spec=strtok_r(NULL,":",&saveptr))

        {

          struct user_specs *user = (struct user_specs *)

            xmalloc (sizeof (struct user_specs));

          user->next = (struct user_specs *) 0;

          user->filename = spec;

          if (user_specs_tail)

            user_specs_tail->next = user;

          else

            user_specs_head = user;

          user_specs_tail = user;

        }

    }

#endif

  /* Process any user specified specs in the order given on the command

   *     line.  */

  for (struct user_specs *uptr = user_specs_head; uptr; uptr = uptr->next)

    {

      char *filename = find_a_file (&startfile_prefixes, uptr->filename,

        R_OK, true);

      read_specs (filename ? filename : uptr->filename, false, true);

    }

  /* Process any user self specs.  */

  {

    struct spec_list *sl;

    for (sl = specs; sl; sl = sl->next)

      if (sl->name_len == sizeof "self_spec" - 1

          && !strcmp (sl->name, "self_spec"))

        do_self_spec (*sl->ptr_spec);

  }