/*
 *  SHEL_ENVRN					(C) Digital Design 1991
 *
 *  Bestimmt den Wert einer AES-Environment-Variablen.
 *  Die Arbeitsumgebung (Environment) des AES wird beim Start
 *  von GEM festgelegt.
 *  Das AES selbst benutzt nur "PATH=" - und zwar f�r İrsrc_loadİ..\RSRC\RSRC_LOA.Cİ und
 *  İshel_findİSHEL_FIN.Cİ.
 */
#include <gemdefs.h>

int shel_envrn( char *sh_epvalue, char *sh_eparm )
{
  addrin[0] = sh_epvalue; /* Zeiger auf den gew�nschten Wert der	*
			   * Variablen, z.B. ";C:\".			*/
  addrin[1] = sh_eparm;  /* Zeiger auf den Namen der Variablen, deren	*
			  * Wert zur�ckgeliefert werden soll, z.B.	*
			  * "PATH=" f�r den Default-Search-Path.	*/
  AES( 125, 0, 1, 2, 0 );

  return intout[0]; /* = sh_eresvd: reserviert, immer 1.		*/
}