system_initenv(3f) - [M_system:ENVIRONMENT] initialize environment table pointer and size so table can be read by readenv(3f) (LICENSE:PD)
Synopsis
Description
Examples
subroutine system_initenv()
A simple interface allows reading the environment variable table of the process. Call system_initenv(3f) to initialize reading the environment table, then call system_readenv(3f) until a blank line is returned. If more than one thread reads the environment or the environment is changed while being read the results are undefined.
Sample program:
program demo_system_initenv use M_system, only : system_initenv, system_readenv character(len=:),allocatable :: string call system_initenv() do string=system_readenv() if(string.eq.)then exit else write(*,(a))string endif enddo end program demo_system_initenvSample results:
USERDOMAIN_ROAMINGPROFILE=buzz HOMEPATH=\Users\JSU APPDATA=C:\Users\JSU\AppData\Roaming MANPATH=/home/u/LIBRARY/libGPF/download/GPF/man:/home/u/doc/man::: DISPLAYNUM=0 ProgramW6432=C:\Program Files HOSTNAME=buzz XKEYSYMDB=/usr/share/X11/XKeysymDB PUBLISH_CMD= OnlineServices=Online Services : : :
Nemo Release 3.1 | system_initenv (3m_system) | March 07, 2025 |