]> diplodocus.org Git - nmh/blob - docs/historical/mh-jun-1982/subs/pr_array.c
Create new mh-format function %(ordinal)
[nmh] / docs / historical / mh-jun-1982 / subs / pr_array.c
1 #ifdef COMMENT
2 Proprietary Rand Corporation, 1981.
3 Further distribution of this software
4 subject to the terms of the Rand
5 license agreement.
6 #endif
7
8 pr_array(cp,ap)
9 char *cp, **ap;
10 {
11 register int i;
12
13 for(i=0; *ap; ap++,i++)
14 printf("%s[%d]=> %s\n", cp,i,*ap);
15 }
16