#include <stdio.h> 
#include "mon_linda.h" 
 
#define MAXVAL 1000
int consumer();

main(argc,argv) 
int argc; 
char **argv; 
{ 
    int primes(); 
    int last,i,ok;
    struct linda_eval_table linda_eval_functions[2];
 
    linda_eval_functions[0].ptr = consumer;
    strcpy(linda_eval_functions[0].name,"consumer");
    linda_eval_functions[1].ptr = NULL;

    linda_init(&argc,argv,linda_eval_functions);
 
    for (i=0; i <= MAXVAL; i++) 
    { 
       out("%s%d","msg",i); 
       eval("%s","consumer"); 
       in("%s%d","ack",i); 
       /* p4_dprintfl(5,"master got ack = %d\n",i);  */
    } 
 
    printf("mainline exiting\n"); 

    linda_end(); 
} 


consumer() 
{ 
    int i,val; 
   
    in("%s?d","msg",&val); 
    /* p4_dprintfl(5,"slave got val = %d\n",val);  */
    out("%s%d","ack",val); 
    return; 
}