Listing 2

/* cycle indefinitely through circular list, processing data */

       if (proot_node == NULL) {
              fprintf(stderr, "List is empty\n");
              exit(EXIT_FAILURE);
       }

       pnode = proot_node;
       while (1) {
              if (pnode == proot_node) {
                     wait(5);
                     scr_clr();
              }
              scr_put(pnode->>line, pnode->>colm, pnode->>ch);
              pnode = pnode->>pfwd;
       }

       return(EXIT_SUCCESS);
}

/* End of File */