diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Vitor Santos Costa 2009-07-23 14:31:04 -05:00
parent a1e6a2baa7
commit 22ac3ee80b
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
C/arith2.c
View File

@ -1092,6 +1092,7 @@ static InitBinEntry InitBinTab[] = {
{"/\\", op_and}, {"/\\", op_and},
{"\\/", op_or}, {"\\/", op_or},
{"#", op_xor}, {"#", op_xor},
{"><", op_xor},
{"atan2", op_atan2}, {"atan2", op_atan2},
/* C-Prolog exponentiation */ /* C-Prolog exponentiation */
{"^", op_power}, {"^", op_power},

1
C/init.c
View File

@ -402,6 +402,7 @@ static Opdef Ops[] = {
{"-", yfx, 500}, {"-", yfx, 500},
{"/\\", yfx, 500}, {"/\\", yfx, 500},
{"\\/", yfx, 500}, {"\\/", yfx, 500},
{"><", yfx, 500},
{"#", yfx, 500}, {"#", yfx, 500},
{"+", fx, 200}, {"+", fx, 200},
{"-", fy, 200}, {"-", fy, 200},