]> diplodocus.org Git - nmh/blob - docs/historical/SRI-NOSC/subs.dir/getcpy.c
Added start_test/finish_test to a bunch of tests.
[nmh] / docs / historical / SRI-NOSC / subs.dir / getcpy.c
1 getcpy(str)
2 {
3 register char *cp;
4
5 cp = alloc(length(str) + 1);
6 copy(str, cp);
7 return(cp);
8 }