Changeset 1120
- Timestamp:
- Jan 30, 2004, 9:51:36 PM (22 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/emx/src/emxomf/emxomf.c
-
Property cvs2svn:cvs-rev
changed from
1.33
to1.34
r1119 r1120 2788 2788 return psz - dst; 2789 2789 } 2790 #endif 2790 #endif 2791 2791 2792 2792 /* Derive the module name and store it in the mod_name variable. 2793 2793 Derive the current director and store it in the base_dir variable. 2794 2794 2795 2795 Search the symbol table for N_SO symbols. There are two kinds, base dir 2796 2796 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 2799 2799 but maybe for a drive letter. 2800 2800 2801 2801 If there is no such symbol, use the output file name. */ 2802 2802 … … 2828 2828 convert_filename (mod_name); 2829 2829 /* 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. 2831 2831 ASSUME: that it's more like that source is right than curdir 2832 2832 bacause of stuff like makeomflibs.cmd and autoconv. */ … … 2857 2857 else if ( (base_dir[0] == '\\' || base_dir[0] == '/') 2858 2858 && base_dir[1] != '\\' && base_dir[1] != '/') /* unc */ 2859 { /* make it absolute using current drive */ 2859 { /* make it absolute using current drive */ 2860 2860 len = strlen(base_dir) + 1; 2861 2861 memmove(base_dir + 2, base_dir, len); … … 2864 2864 } 2865 2865 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'; 2879 2877 } 2880 2878 … … 2980 2978 int i; 2981 2979 char *psz; 2982 2980 2983 2981 /* canonize the filename - slashes and possibly abs path. */ 2984 2982 if (name[0] != '/' && name[0] != '\\' && name[1] != ':') -
Property cvs2svn:cvs-rev
changed from
Note:
See TracChangeset
for help on using the changeset viewer.