mktl.c
上传用户:hepax88
上传日期:2007-01-03
资源大小:1101k
文件大小:1k
源码类别:

TCP/IP协议栈

开发平台:

Visual C++

  1. /* Create command files for Borland TLIB command. Reads list of
  2.  * object file names from stdin in free format
  3.  *
  4.  * June 1992 P. Karn
  5.  */
  6. #include <stdio.h>
  7. #include <stdlib.h>
  8. #include <ctype.h>
  9. int
  10. main()
  11. {
  12. int c;
  13. int prev = 0;
  14. for(;;){
  15. /* Skip leading white space */
  16. while(c = getchar(),isspace(c))
  17. ;
  18. if(c == EOF)
  19. break;
  20. if(prev)
  21. printf(" &n");
  22. /* Print "+token" */
  23. printf("+%c",c);
  24. while(c = getchar(),!isspace(c) && c != EOF)
  25. putchar(c);
  26. if(c == EOF)
  27. break;
  28. prev = 1;
  29. }
  30. putchar('n'); /* Final line is empty */
  31. return 0;
  32. }