diff options
author | H.J. Lu <hjl.tools@gmail.com> | 2001-09-19 05:33:36 +0000 |
---|---|---|
committer | H.J. Lu <hjl.tools@gmail.com> | 2001-09-19 05:33:36 +0000 |
commit | 3882b010780ca1aa1ed5d7b38e936cd2d6d5486b (patch) | |
tree | c806a73a13afd3265ba6b538ba73cae065c591f5 /gas/config/obj-vms.c | |
parent | 6b819c92c4512ccfba90f0caa204ab687fae8254 (diff) | |
download | gdb-3882b010780ca1aa1ed5d7b38e936cd2d6d5486b.zip gdb-3882b010780ca1aa1ed5d7b38e936cd2d6d5486b.tar.gz gdb-3882b010780ca1aa1ed5d7b38e936cd2d6d5486b.tar.bz2 |
Locale changes from Bruno Haible <haible@clisp.cons.org>.
Diffstat (limited to 'gas/config/obj-vms.c')
-rw-r--r-- | gas/config/obj-vms.c | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/gas/config/obj-vms.c b/gas/config/obj-vms.c index 969b96e..cd36a38 100644 --- a/gas/config/obj-vms.c +++ b/gas/config/obj-vms.c @@ -28,6 +28,7 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA #include "as.h" #include "config.h" +#include "safe-ctype.h" #include "subsegs.h" #include "obstack.h" @@ -3071,7 +3072,7 @@ Write_VMS_MHD_Records () cp++; continue; } - *cp1++ = islower (*cp) ? toupper (*cp++) : *cp++; + *cp1++ = TOUPPER (*cp++); } *cp1 = '\0'; @@ -3254,20 +3255,20 @@ VMS_Case_Hack_Symbol (In, Out) switch (vms_name_mapping) { case 0: - if (isupper (*In)) { + if (ISUPPER (*In)) { *Out++ = *In++; Case_Hack_Bits |= 1; } else { - *Out++ = islower (*In) ? toupper (*In++) : *In++; + *Out++ = TOUPPER (*In++); } break; case 3: *Out++ = *In++; break; case 2: - if (islower (*In)) { + if (ISLOWER (*In)) { *Out++ = *In++; } else { - *Out++ = isupper (*In) ? tolower (*In++) : *In++; + *Out++ = TOLOWER (*In++); } break; } @@ -3298,7 +3299,7 @@ VMS_Case_Hack_Symbol (In, Out) * and ensure that they are lowercase */ for (i = 0; (In[i] != 0) && (i < 8); i++) - if (isupper (In[i]) && !Saw_Dollar && !flag_no_hash_mixed_case) + if (ISUPPER (In[i]) && !Saw_Dollar && !flag_no_hash_mixed_case) break; if (In[i] == 0) @@ -3313,11 +3314,11 @@ VMS_Case_Hack_Symbol (In, Out) i = 8; while ((--i >= 0) && (*In)) switch (vms_name_mapping){ - case 0: *Out++ = islower (*In) ? toupper (*In++) : *In++; + case 0: *Out++ = TOUPPER (*In++); break; case 3: *Out++ = *In++; break; - case 2: *Out++ = isupper (*In) ? tolower (*In++) : *In++; + case 2: *Out++ = TOLOWER (*In++); break; } } |