X-Git-Url: http://git.harvie.cz/?a=blobdiff_plain;ds=sidebyside;f=demos%2Feq.c;h=d3a87ca225cb1e20a1cc328f5233da69322a859f;hb=3f49056d3d4121eff6a0777c7b24c13c54fc0953;hp=730d0a7c6d12c1f56b9c8082bb6412dde4d4165e;hpb=4643aeafd08c5503aaa7d5960b3e74ad2e63becb;p=svn%2FCll1h%2F.git

diff --git a/demos/eq.c b/demos/eq.c
index 730d0a7..d3a87ca 100644
--- a/demos/eq.c
+++ b/demos/eq.c
@@ -3,25 +3,47 @@
 program
 {
  str a,b;
- 
+
+ print("Local language (enviroment) is set to:", LANG);
  a="¾luklý";
  b="®LUKLÝ";
- printf("strcoll(\"%s\",\"%s\")=%d\n",a,b,strcoll(a,b));
- printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
- printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
+ printf("str_order(\"%s\",\"%s\") = %d\n",a,b,str_order(a,b));
+ printf("eq(\"%s\",\"%s\") = %s\n",a,b,btoa(eq(a,b)));
+ printf("eq(\"%s\",\"%s\") = %s\n",a,a,btoa(eq(a,a)));
+ printf("eqi(\"%s\",\"%s\") = %s\n",a,b,btoa(eqi(a,b)));
  a="aabc";
  b="axyz";
- printf("strcoll(\"%s\",\"%s\")=%d\n",a,b,strcoll(a,b));
- printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
- printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
+ printf("str_order(\"%s\",\"%s\") = %d\n",a,b,str_order(a,b));
+ printf("eq(\"%s\",\"%s\") = %s\n",a,b,btoa(eq(a,b)));
+ printf("eqi(\"%s\",\"%s\") = %s\n",a,b,btoa(eqi(a,b)));
  a="ABC";
  b="abc";
- printf("strcoll(\"%s\",\"%s\")=%d\n",a,b,strcoll(a,b));
- printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
- printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
+ printf("str_order(\"%s\",\"%s\") = %d\n",a,b,str_order(a,b));
+ printf("eq(\"%s\",\"%s\") = %s\n",a,b,btoa(eq(a,b)));
+ printf("eqi(\"%s\",\"%s\") = %s\n",a,b,btoa(eqi(a,b)));
  a="abc";
  b="abc";
- printf("strcoll(\"%s\",\"%s\")=%d\n",a,b,strcoll(a,b));
- printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
- printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
+ printf("str_order(\"%s\",\"%s\") = %d\n",a,b,str_order(a,b));
+ printf("eq(\"%s\",\"%s\") = %s\n",a,b,btoa(eq(a,b)));
+ printf("eqi(\"%s\",\"%s\") = %s\n",a,b,btoa(eqi(a,b)));
+ a="";
+ b="";
+ printf("str_order(\"%s\",\"%s\") = %d\n",a,b,str_order(a,b));
+ printf("eq(\"%s\",\"%s\") = %s\n",a,b,btoa(eq(a,b)));
+ printf("eqi(\"%s\",\"%s\") = %s\n",a,b,btoa(eqi(a,b)));
+ a=NULL;
+ b="abc";
+ printf("str_order( %s ,\"%s\") = %d\n",a,b,str_order(a,b));
+ printf("eq( %s ,\"%s\") = %s\n",a,b,btoa(eq(a,b)));
+ printf("eqi( %s ,\"%s\") = %s\n",a,b,btoa(eqi(a,b)));
+ a=NULL;
+ b="";
+ printf("str_order( %s ,\"%s\") = %d\n",a,b,str_order(a,b));
+ printf("eq( %s ,\"%s\") = %s\n",a,b,btoa(eq(a,b)));
+ printf("eqi( %s ,\"%s\") = %s\n",a,b,btoa(eqi(a,b)));
+ a=NULL;
+ b=NULL;
+ printf("str_order( %s , %s ) = %d\n",a,b,str_order(a,b));
+ printf("eq( %s ,%s ) = %s\n",a,b,btoa(eq(a,b)));
+ printf("eqi( %s , %s ) = %s\n",a,b,btoa(eqi(a,b)));
 }