diff --git a/common.h b/common.h index 7125ce3bc..1250e2e61 100644 --- a/common.h +++ b/common.h @@ -524,10 +524,21 @@ static __inline void blas_unlock(volatile BLASULONG *address){ *address = 0; } + +#ifdef OS_WINDOWS static __inline int readenv_atoi(char *env) { env_var_t p; return readenv(p,env) ? 0 : atoi(p); } +#else +static __inline int readenv_atoi(char *env) { + char *p; + if (( p = getenv(env) )) + return (atoi(p)); + else + return(0); +} +#endif #if !defined(XDOUBLE) || !defined(QUAD_PRECISION)