order_by_int, order_by_str, order_by_ascii + some examples

[svn/Cll1h/.git] / demos / lists.c

diff --git a/demos/lists.c b/demos/lists.c
index 0f36e64524338c1dc42995181ee6935dd585dd9a..c92117c379fa5d109316577cf9ff41bb10d60d8d 100644 (file)
--- a/demos/lists.c
+++ b/demos/lists.c
@@ -11,50 +11,54 @@ program
 { 
  Record record,records=NULL;
 
- print("4x insert(record,records ,order_by,i);");
+ print("4x insert(record,records,order_by,i);");
 
  record=get_mem(Record);
  record->i=1; 
  record->s="ddd";
- insert(record,records ,order_by,i);
+ insert(record,records,order_by_int,i);
 
  record=get_mem(Record);
  record->i=3; 
- record->s="bbbbb";
- insert(record,records ,order_by,i);
+ record->s="BBBB";
+ insert(record,records,order_by_int,i);
 
  record=get_mem(Record);
  record->i=4; 
  record->s="e";
- insert(record,records ,order_by,i);
+ insert(record,records,order_by_int,i);
 
  record=get_mem(Record);
  record->i=2; 
  record->s="aaaa";
- insert(record,records ,order_by,i);
+ insert(record,records,order_by_int,i);
 
- for_each(record,records ) printf("i=%d, s=%s\n",record->i,record->s);
+ for_each(record,records) printf("i=%d, s=%s\n",record->i,record->s);
 
- print("1x append(record,records );");
+ print("1x append(record,records);");
  record=get_mem(Record);
  record->i=0; 
  record->s="ccc";
- append(record,records );
- for_each(record,records ) printf("i=%d, s=%s\n",record->i,record->s);
+ append(record,records);
+ for_each(record,records) printf("i=%d, s=%s\n",record->i,record->s);
 
- print("sort(record,records ,desc_order_by,i);");
- sort(record,records ,desc_order_by,i);
- for_each(record,records ) printf("i=%d, s=%s\n",record->i,record->s);
+ print("sort(record,records,order_by_int_desc,i);");
+ sort(record,records,order_by_int_desc,i);
+ for_each(record,records) printf("i=%d, s=%s\n",record->i,record->s);
 
- print("sort(record,records ,sort_by,s);");
- sort(record,records ,sort_by,s);
- for_each(record,records ) printf("i=%d, s=%s\n",record->i,record->s);
+ print("sort(record,records,order_by_str,s);");
+ sort(record,records,order_by_str,s);
+ for_each(record,records) printf("i=%d, s=%s\n",record->i,record->s);
 
- print("remove(record,records ,record->i==1);");
- remove(record,records ,record->i==1);
- for_each(record,records ) printf("i=%d, s=%s\n",record->i,record->s);
+ print("sort(record,records,order_by_ascii_desc,s);");
+ sort(record,records,order_by_ascii_desc,s);
+ for_each(record,records) printf("i=%d, s=%s\n",record->i,record->s);
 
- print("drop(record,records );");
- drop(record,records );
- for_each(record,records ) printf("i=%d, s=%s\n",record->i,record->s);
+ print("remove(record,records,record->i==1);");
+ remove(record,records,record->i==1);
+ for_each(record,records) printf("i=%d, s=%s\n",record->i,record->s);
+
+ print("drop(record,records);");
+ drop(record,records);
+ for_each(record,records) printf("i=%d, s=%s\n",record->i,record->s);
 }