X-Git-Url: http://git.harvie.cz/?p=svn%2FCll1h%2F.git;a=blobdiff_plain;f=demos%2Flists%2Ffloat-list-plain.c;fp=demos%2Flists%2Ffloat-list-plain.c;h=0000000000000000000000000000000000000000;hp=808303fdd1b253dd6c1c835bbd37bc148fde9217;hb=e63f1bc2438012b5f2f6592a474892501149af18;hpb=6a60bc82e8b8e6cccd0d4c2214a1f291662215f0

diff --git a/demos/lists/float-list-plain.c b/demos/lists/float-list-plain.c
deleted file mode 100644
index 808303f..0000000
--- a/demos/lists/float-list-plain.c
+++ /dev/null
@@ -1,29 +0,0 @@
-#include "cll1.h"
-
-def_mem(Node)
-{
- float f;
- list(Node);
-};
-
-program
-{
- Node one,all=NULL,last=NULL;
- 
- repeat(20)
- {
-  one=get_mem(Node);
-  printf("Enter float: \n");
-  scanf("%f", &(one->f));
-  append(one,last);
-  if(not all)
-  {
-   all=last;
-  }
- }
- 
- for_each(one,all)
- {
-  printf("The float you entered is %f\n",one->f);
- } 
-}