ack/lang/cem/ctest/ctmargt/margt.c
1987-03-09 16:02:32 +00:00

22 lines
498 B
C

/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
char rcs_id[] = "$Header$" ;
main(argc,argv,envp) char **argv,**envp ; {
register int rargc ;
rargc=argc ;
printf("main called with argc = %d\n",argc) ;
printf("Arguments:\n") ;
while ( rargc-- ) {
printf(" %s\n",*argv++) ;
}
printf("Environment:\n") ;
while ( *envp ) {
printf(" %s\n",*envp++) ;
}
return(argc-1) ;
}