shithub: pprolog

Download patch

ref: a27a5c52f5efeac5165b4dddcb90f207853cc1f5
parent: 50768fba487e1ec08278cdc4be614863db32a5c4
author: Peter Mikkelsen <peter@pmikkelsen.com>
date: Tue Jun 29 14:31:58 EDT 2021

Add more operators

--- a/parser.c
+++ b/parser.c
@@ -338,11 +338,29 @@
 	}
 
 	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"/");