From b615dc7e6e41cd4cd2696592cb2f354bbd53f16f Mon Sep 17 00:00:00 2001
From: Tomasz Sowa <t.sowa@ttmath.org>
Date: Sat, 22 Jan 2022 04:35:42 +0100
Subject: [PATCH] add cmp ezc function

---
 winixcli/src/main.cpp | 19 +++++++++++++++++--
 1 file changed, 17 insertions(+), 2 deletions(-)

diff --git a/winixcli/src/main.cpp b/winixcli/src/main.cpp
index 16c17e7..5ea3384 100644
--- a/winixcli/src/main.cpp
+++ b/winixcli/src/main.cpp
@@ -115,8 +115,6 @@ void esc_tex(wchar_t c, pt::WTextStream & str)
 }
 
 
-
-
 void fil_tex(Ezc::FunInfo<MyStream> & env)
 {
 	auto i = env.in.begin();
@@ -127,6 +125,22 @@ void fil_tex(Ezc::FunInfo<MyStream> & env)
 	}
 }
 
+void cmp(Ezc::FunInfo<MyStream> & env)
+{
+	if( env.params.size() >= 2 )
+	{
+		env.res = true;
+
+		for(size_t a=0 ; a < env.params.size() - 1 ; ++a)
+		{
+			if( env.params[a].str != env.params[a+1].str )
+			{
+				env.res = false;
+				break;
+			}
+		}
+	}
+}
 
 
 bool generate(const pt::Space & input_options, pt::Space & schema)
@@ -161,6 +175,7 @@ bool generate(const pt::Space & input_options, pt::Space & schema)
 	}
 
 	functions.Insert("fil_tex", fil_tex);
+	functions.Insert("cmp", cmp);
 
 	parser.Directory(dir);
 	parser.SetBlocks(blocks);