[BACK]Return to expr.y CVS log [TXT][DIR] Up to [cvs.NetBSD.org] / src / bin / expr

Please note that diffs are not public domain; they are subject to the copyright notices on the relevant files.

Diff for /src/bin/expr/expr.y between version 1.9 and 1.10

version 1.9, 1993/07/20 01:10:55 version 1.10, 1993/08/16 23:20:22
Line 292  struct val *a, *b;
Line 292  struct val *a, *b;
         if (isstring (a) || isstring (b)) {          if (isstring (a) || isstring (b)) {
                 to_string (a);                  to_string (a);
                 to_string (b);                  to_string (b);
                 r = make_integer (strcmp (a->u.s, b->u.s) == 0);                  r = make_integer (strcoll (a->u.s, b->u.s) == 0);
         } else {          } else {
                 r = make_integer (a->u.i == b->u.i);                  r = make_integer (a->u.i == b->u.i);
         }          }
Line 311  struct val *a, *b;
Line 311  struct val *a, *b;
         if (isstring (a) || isstring (b)) {          if (isstring (a) || isstring (b)) {
                 to_string (a);                  to_string (a);
                 to_string (b);                  to_string (b);
                 r = make_integer (strcmp (a->u.s, b->u.s) > 0);                  r = make_integer (strcoll (a->u.s, b->u.s) > 0);
         } else {          } else {
                 r= make_integer (a->u.i > b->u.i);                  r= make_integer (a->u.i > b->u.i);
         }          }
Line 330  struct val *a, *b;
Line 330  struct val *a, *b;
         if (isstring (a) || isstring (b)) {          if (isstring (a) || isstring (b)) {
                 to_string (a);                  to_string (a);
                 to_string (b);                  to_string (b);
                 r = make_integer (strcmp (a->u.s, b->u.s) < 0);                  r = make_integer (strcoll (a->u.s, b->u.s) < 0);
         } else {          } else {
                 r = make_integer (a->u.i < b->u.i);                  r = make_integer (a->u.i < b->u.i);
         }          }
Line 349  struct val *a, *b;
Line 349  struct val *a, *b;
         if (isstring (a) || isstring (b)) {          if (isstring (a) || isstring (b)) {
                 to_string (a);                  to_string (a);
                 to_string (b);                  to_string (b);
                 r = make_integer (strcmp (a->u.s, b->u.s) >= 0);                  r = make_integer (strcoll (a->u.s, b->u.s) >= 0);
         } else {          } else {
                 r = make_integer (a->u.i >= b->u.i);                  r = make_integer (a->u.i >= b->u.i);
         }          }
Line 368  struct val *a, *b;
Line 368  struct val *a, *b;
         if (isstring (a) || isstring (b)) {          if (isstring (a) || isstring (b)) {
                 to_string (a);                  to_string (a);
                 to_string (b);                  to_string (b);
                 r = make_integer (strcmp (a->u.s, b->u.s) <= 0);                  r = make_integer (strcoll (a->u.s, b->u.s) <= 0);
         } else {          } else {
                 r = make_integer (a->u.i <= b->u.i);                  r = make_integer (a->u.i <= b->u.i);
         }          }
Line 387  struct val *a, *b;
Line 387  struct val *a, *b;
         if (isstring (a) || isstring (b)) {          if (isstring (a) || isstring (b)) {
                 to_string (a);                  to_string (a);
                 to_string (b);                  to_string (b);
                 r = make_integer (strcmp (a->u.s, b->u.s) != 0);                  r = make_integer (strcoll (a->u.s, b->u.s) != 0);
         } else {          } else {
                 r = make_integer (a->u.i != b->u.i);                  r = make_integer (a->u.i != b->u.i);
         }          }
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
CVSweb <webmaster@jp.NetBSD.org>