#include <stdio.h>
#include "poslib.h"

int main(void) {
   goalPosition goalPos;
   int numgoals;
   int i;
   fprintf(stdout, "Starting...\n");
   initperl();
   poslibinit();
   
   while (1) {
   
   }
   fprintf(stdout, "call_newgoal response is:%d.\n", call_newgoal());
   numgoals = call_howmanygoals();
   for (i=0; numgoals>=i; i++) {
     goalPos = call_getgoal(i);
     fprintf(stdout, "call_getgoal response is x=%.0f, y=%.0f.\n", goalPos.x, goalPos.y);
   }
   perlclose();
}