#6 feature fuly implemented

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

diff --git a/demos/lists.c b/demos/lists.c
index c92117c379fa5d109316577cf9ff41bb10d60d8d..81eddae23c3750e2ebb40e54f55610d15f5b96be 100644 (file)
--- a/demos/lists.c
+++ b/demos/lists.c
@@ -9,9 +9,9 @@ def_mem(Record)
 
 program
 { 
- Record record,records=NULL;
+ Record record, records=NULL;
 
- print("4x insert(record,records,order_by,i);");
+ print("4x insert(record,records,order_by_int,i);");
 
  record=get_mem(Record);
  record->i=1; 
@@ -33,32 +33,59 @@ program
  record->s="aaaa";
  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);");
  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);
+ 
+ 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);
+
+ 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);
+
+ 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);
+ 
+ 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);
+ 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);
+
+ for_each(record,records)
+ {
+  printf("i=%d, s=%s\n",record->i,record->s);
+ }
 }