21 lines
709 B
C
21 lines
709 B
C
|
extern char *argv0;
|
||
|
|
#define ARGBEGIN for((argv0? 0: (argv0=*argv)),argv++,argc--;\
|
||
|
|
argv[0] && argv[0][0]=='-' && argv[0][1];\
|
||
|
|
argc--, argv++) {\
|
||
|
|
char *_args, *_argt;\
|
||
|
|
Rune _argc;\
|
||
|
|
_args = &argv[0][1];\
|
||
|
|
if(_args[0]=='-' && _args[1]==0){\
|
||
|
|
argc--; argv++; break;\
|
||
|
|
}\
|
||
|
|
_argc = 0;\
|
||
|
|
while(*_args && (_args += chartorune(&_argc, _args)))\
|
||
|
|
switch(_argc)
|
||
|
|
#define ARGEND SET(_argt);USED(_argt); USED(_argc); USED(_args);}USED(argv); USED(argc);
|
||
|
|
#define ARGF() (_argt=_args, _args="",\
|
||
|
|
(*_argt? _argt: argv[1]? (argc--, *++argv): 0))
|
||
|
|
#define ARGC() _argc
|
||
|
|
|
||
|
|
#define EARGF(x) (_argt=_args, _args="",\
|
||
|
|
(*_argt? _argt: argv[1]? (argc--, *++argv): (x, (char*)0)))
|