|
|
1.1 root 1: /*
2: char id_loc[] = "@(#)loc_.c 1.1";
3: *
4: * Return the address of the argument.
5: *
6: * calling sequence:
7: * iloc = loc (arg)
8: * where:
9: * iloc will receive the address of arg
10: */
11:
12: long loc_(arg)
13: long *arg;
14: {
15: return((long)arg);
16: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.