Changeset 1120


Ignore:
Timestamp:
Jan 30, 2004, 9:51:36 PM (22 years ago)
Author:
bird
Message:

Shit, weak_mod_name was for the new weak handling.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/emx/src/emxomf/emxomf.c

    • Property cvs2svn:cvs-rev changed from 1.33 to 1.34
    r1119 r1120  
    27882788  return psz - dst;
    27892789}
    2790 #endif 
     2790#endif
    27912791
    27922792/* Derive the module name and store it in the mod_name variable.
    27932793   Derive the current director and store it in the base_dir variable.
    2794    
     2794
    27952795   Search the symbol table for N_SO symbols. There are two kinds, base dir
    27962796   and main source file name. The base dir one ends with a slash.
    2797    
    2798    We assume that the base dir name comes first, and that is it's prefect 
     2797
     2798   We assume that the base dir name comes first, and that is it's prefect
    27992799   but maybe for a drive letter.
    2800    
     2800
    28012801   If there is no such symbol, use the output file name. */
    28022802
     
    28282828            convert_filename (mod_name);
    28292829            /* The base dir doesn't currently have any drive letter.
    2830                steal that from the source filename if possible. 
     2830               steal that from the source filename if possible.
    28312831               ASSUME: that it's more like that source is right than curdir
    28322832                       bacause of stuff like makeomflibs.cmd and autoconv. */
     
    28572857  else if (   (base_dir[0] == '\\' ||  base_dir[0] == '/')
    28582858           &&  base_dir[1] != '\\' &&  base_dir[1] != '/') /* unc */
    2859     {   /* make it absolute using current drive */ 
     2859    {   /* make it absolute using current drive */
    28602860      len = strlen(base_dir) + 1;
    28612861      memmove(base_dir + 2, base_dir, len);
     
    28642864    }
    28652865
    2866   /* do we need a weak module name? */
    2867   if (weak_list_filename)
    2868     {
    2869       /* Find the base name and length (excluding extension)
    2870          This is used for weak symbol handling. */
    2871       for (p1 = "\\/:", p2 = mod_name; *p1; p1++)
    2872         if ((p3 = strrchr(p2, *p1)) != NULL)
    2873           p2 = p3 + 1;
    2874       for (p3 = weak_mod_name; *p2; p2++)
    2875         if (isalnum(*p2) || *p2 == '$' || *p2 == '_' || *p2 == '@')
    2876             *p3++ = *p2;
    2877       *p3 = '\0';
    2878     }
     2866  /* Find the base name and length (excluding extension)
     2867     This is used for weak symbol handling. */
     2868  for (p1 = "\\/:", p2 = mod_name; *p1; p1++)
     2869    if ((p3 = strrchr(p2, *p1)) != NULL)
     2870      p2 = p3 + 1;
     2871  for (p3 = weak_mod_name; *p2; p2++)
     2872    if (isalnum(*p2) || *p2 == '$' || *p2 == '_' || *p2 == '@')
     2873        *p3++ = *p2;
     2874    else if (*p2 == '.')
     2875        *p3++ = '_';
     2876  *p3 = '\0';
    28792877}
    28802878
     
    29802978  int i;
    29812979  char *psz;
    2982  
     2980
    29832981  /* canonize the filename - slashes and possibly abs path. */
    29842982  if (name[0] != '/' && name[0] != '\\' && name[1] != ':')
Note: See TracChangeset for help on using the changeset viewer.