* gasp.c (do_print, do_form, buffer_and_nest): Use case insensitive

[deliverable/binutils-gdb.git] / gas / gasp.c

diff --git a/gas/gasp.c b/gas/gasp.c
index 661c247c95b6196aa7e2e7142243db824d10918b..4e19590a49a4cef9d312f9bd7b9e784de76c58c6 100644 (file)
--- a/gas/gasp.c
+++ b/gas/gasp.c
@@ -1641,12 +1641,12 @@ do_print (idx, in)
   idx = sb_skip_white (idx, in);
   while (idx < in->len)
     {
-      if (strncmp (in->ptr + idx, "LIST", 4) == 0)
+      if (strncasecmp (in->ptr + idx, "LIST", 4) == 0)
        {
          fprintf (outfile, ".list\n");
          idx += 4;
        }
-      else if (strncmp (in->ptr + idx, "NOLIST", 6) == 0)
+      else if (strncasecmp (in->ptr + idx, "NOLIST", 6) == 0)
        {
          fprintf (outfile, ".nolist\n");
          idx += 6;
@@ -1689,13 +1689,13 @@ do_form (idx, in)
   while (idx < in->len)
     {
 
-      if (strncmp (in->ptr + idx, "LIN=", 4) == 0)
+      if (strncasecmp (in->ptr + idx, "LIN=", 4) == 0)
        {
          idx += 4;
          idx = exp_get_abs ("form LIN= needs absolute expresssion.\n", idx, in, &lines);
        }
 
-      if (strncmp (in->ptr + idx, "COL=", 4) == 0)
+      if (strncasecmp (in->ptr + idx, "COL=", 4) == 0)
        {
          idx += 4;
          idx = exp_get_abs ("form COL= needs absolute expresssion.\n", idx, in, &columns);
@@ -2490,9 +2490,9 @@ buffer_and_nest (from, to, ptr)
        {
          if (ptr->ptr[i] == '.')
              i++;
-         if (strncmp (ptr->ptr + i, from, from_len) == 0)
+         if (strncasecmp (ptr->ptr + i, from, from_len) == 0)
            depth++;
-         if (strncmp (ptr->ptr + i, to, to_len) == 0)
+         if (strncasecmp (ptr->ptr + i, to, to_len) == 0)
            {
              depth--;
              if (depth == 0)