Commit | Line | Data |
---|---|---|
76830492 DW |
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 | } |