|
|
1.1 root 1: /*
2: char id_ierrno[] = "@(#)ierrno_.c 1.1";
3: *
4: * return the current value of the system error register
5: *
6: * calling sequence:
7: * ier = ierrno()
8: * where:
9: * ier will receive the current value of errno
10: */
11:
12: extern int errno;
13:
14: long ierrno_()
15: {
16: return((long)errno);
17: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.