Listing 3

void myfunction1_a(char *format, va_list arg_ptr)
   {
   vfprintf(stdout,format,arg_ptr);
   }

void myfunction2_a(char *format, va_list arg_ptr)
   {
   FILE *fp;

   fp = fopen("TEST.DAT","a+");
   vfprintf(fp,format,arg_ptr);
   fclose(fp);
   }

void myfunction3(char *format, ...)
   {
   va_list arg_ptr1;
   va_list arg_ptr2;

   va_start(arg_ptr1,format);
   myfunction1_a(format, arg_ptr1);
   myfunction2_a(format,arg_ptr1);
   va_end(arg_ptr1);
   }
/* End of File */