mktl.c
资源名称:export.zip [点击查看]
上传用户:hepax88
上传日期:2007-01-03
资源大小:1101k
文件大小:1k
源码类别:
TCP/IP协议栈
开发平台:
Visual C++
- /* Create command files for Borland TLIB command. Reads list of
- * object file names from stdin in free format
- *
- * June 1992 P. Karn
- */
- #include <stdio.h>
- #include <stdlib.h>
- #include <ctype.h>
- int
- main()
- {
- int c;
- int prev = 0;
- for(;;){
- /* Skip leading white space */
- while(c = getchar(),isspace(c))
- ;
- if(c == EOF)
- break;
- if(prev)
- printf(" &n");
- /* Print "+token" */
- printf("+%c",c);
- while(c = getchar(),!isspace(c) && c != EOF)
- putchar(c);
- if(c == EOF)
- break;
- prev = 1;
- }
- putchar('n'); /* Final line is empty */
- return 0;
- }