From c016b2dcdc7faade5b279c279b2d506b9ea22bf7 Mon Sep 17 00:00:00 2001 From: Peter Stephenson Date: Sat, 30 Aug 2003 19:00:20 +0000 Subject: 18982: comments/rant for paramsubst() --- Src/params.c | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'Src') diff --git a/Src/params.c b/Src/params.c index 61aa3456a..a4890bcb0 100644 --- a/Src/params.c +++ b/Src/params.c @@ -137,7 +137,7 @@ static initparam special_params[] ={ #define GFN(X) BR(((char *(*)_((Param)))(X))) #define IPDEF1(A,B,C,D) {NULL,A,PM_INTEGER|PM_SPECIAL|D,BR(NULL),SFN(C),GFN(B),stdunsetfn,10,NULL,NULL,NULL,0} IPDEF1("#", poundgetfn, nullintsetfn, PM_READONLY), -IPDEF1("ERRNO", errnogetfn, nullintsetfn, PM_READONLY), +IPDEF1("ERRNO", errnogetfn, errnosetfn, 0), IPDEF1("GID", gidgetfn, gidsetfn, PM_DONTIMPORT | PM_RESTRICTED), IPDEF1("EGID", egidgetfn, egidsetfn, PM_DONTIMPORT | PM_RESTRICTED), IPDEF1("HISTSIZE", histsizegetfn, histsizesetfn, PM_RESTRICTED), @@ -3014,6 +3014,15 @@ savehistsizesetfn(Param pm, zlong v) savehistsiz = 0; } +/* Function to set value for special parameter `ERRNO' */ + +/**/ +void +errnosetfn(Param pm, zlong x) +{ + errno = (int)x; +} + /* Function to get value for special parameter `ERRNO' */ /**/ -- cgit 1.4.1