From a27a5c52f5efeac5165b4dddcb90f207853cc1f5 Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Tue, 29 Jun 2021 18:31:58 +0000 Subject: Add more operators --- parser.c | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) (limited to 'parser.c') diff --git a/parser.c b/parser.c index f3dd7aa..df05037 100644 --- a/parser.c +++ b/parser.c @@ -338,11 +338,29 @@ initoperators(void) } addoperator(1200, Xfx, L":-"); + addoperator(1200, Xfx, L"-->"); addoperator(1200, Fx, L":-"); + addoperator(1200, Fx, L"?-"); addoperator(1100, Xfy, L";"); + addoperator(1050, Xfy, L"->"); addoperator(1000, Xfy, L","); + addoperator(900, Fy, L"\\+"); addoperator(700, Xfx, L"="); + addoperator(700, Xfx, L"\\="); + addoperator(700, Xfx, L"=="); + addoperator(700, Xfx, L"\\=="); + addoperator(700, Xfx, L"@<"); + addoperator(700, Xfx, L"@=<"); + addoperator(700, Xfx, L"@>"); + addoperator(700, Xfx, L"@>="); addoperator(700, Xfx, L"is"); + addoperator(700, Xfx, L"=:="); + addoperator(700, Xfx, L"=\="); + addoperator(700, Xfx, L"<"); + addoperator(700, Xfx, L"=<"); + addoperator(700, Xfx, L">"); + addoperator(700, Xfx, L">="); + addoperator(700, Xfx, L"=.."); addoperator(500, Yfx, L"+"); addoperator(400, Yfx, L"*"); addoperator(400, Yfx, L"/"); -- cgit v1.2.3