[svn/Cll1h/.git] / demos / lists / float-list-plain.c

#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);
 } 
}
Commit	Line	Data
ea514b9e	1	#include "cll1.h"
	2
	3	def_mem(Node)
	4	{
	5	float f;
	6	list(Node);
	7	};
	8
	9	program
	10	{
	11	Node one,all=NULL,last=NULL;
	12
	13	repeat(20)
	14	{
	15	one=get_mem(Node);
	16	printf("Enter float: \n");
	17	scanf("%f", &(one->f));
	18	append(one,last);
	19	if(not all)
	20	{
	21	all=last;
	22	}
	23	}
	24
	25	for_each(one,all)
	26	{
	27	printf("The float you entered is %f\n",one->f);
	28	}
	29	}