OpenEuphoria

Re: getenv

• Posted by Bernie Ryan <xotron at ?luefrog.co?> May 30, 2008
• 654 views

Derek Parnell wrote:
> 
> Jeremy Cowgar really meant to write:
> 
>  
>  }}}
<eucode>
>  override function getenv(sequence name)
>      object v
>      v = eu:getenv(name)
>      ifdef LINUX then
>       if atom(v) or length(v) = 0 then
>          v = -1
>       end if
>      end ifdef
>      return v
>  end function
>  </eucode>
{{{

> 
> 
>  
> 
> -- 
> Derek Parnell
> Melbourne, Australia
> Skype name: derek.j.parnell


if not getenv(name) and platform() = 3
then return -1
else return getenv(name) )

Bernie

My files in archive:
WMOTOR, XMOTOR, W32ENGIN, MIXEDLIB, EU_ENGIN, WIN32ERU, WIN32API 

Can be downloaded here:
http://www.rapideuphoria.com/cgi-bin/asearch.exu?dos=on&win=on&lnx=on&gen=on&keywords=bernie+ryan