Use >< for xor (Paulo Mour, Iso meeting)

2009-07-23 14:31:04 -05:00 · 2009-07-23 14:31:04 -05:00 · 22ac3ee80b
parent a1e6a2baa7
commit 22ac3ee80b
2 changed files with 2 additions and 0 deletions
--- a/C/arith2.c
+++ b/C/arith2.c
@ -1092,6 +1092,7 @@ static InitBinEntry InitBinTab[] = {
  {"/\\", op_and},
  {"\\/", op_or},
  {"#", op_xor},
+  {"><", op_xor},
  {"atan2", op_atan2},
  /* C-Prolog exponentiation */
  {"^", op_power},
--- a/C/init.c
+++ b/C/init.c
@ -402,6 +402,7 @@ static Opdef    Ops[] = {
  {"-", yfx, 500},
  {"/\\", yfx, 500},
  {"\\/", yfx, 500},
+  {"><", yfx, 500},
  {"#", yfx, 500},
  {"+", fx, 200},
  {"-", fy, 200},