{

RChunk chunk;

if(chunk.OpenGlobal(RThread().Name(), ETrue) != KErrNone)

return;

TUint* ptr = (TUint*) chunk.Base();

if(ptr != NULL)

{

aArgc = (int) *(ptr); // count

aArgv = (char**) *(ptr + 1);

}

chunk.Close();

{

/* Get the clean-up stack */

CTrapCleanup* cleanup = CTrapCleanup::New();

/* Arrange for multi-threaded operation */

SpawnPosixServerThread();

/* Get args and environment */

int argc=0;

char** argv=0;

char** envp=0;

#ifndef __WINS__

__crt0(argc,argv,envp);

#else

GetCmdLine(argc, argv);

#endif

/* Start the application! */

/* Create stdlib */

_REENT;

/* Set process and thread priority and name */

RThread currentThread;

RProcess thisProcess;

TParse exeName;

exeName.Set(thisProcess.FileName(), NULL, NULL);

currentThread.Rename(exeName.Name());

currentThread.SetProcessPriority(EPriorityLow);

currentThread.SetPriority(EPriorityMuchLess);

/* Call stdlib main */

int ret = main(argc, argv, envp); /* !! process exits here if there is "exit()" in main! */

/* Call exit */

//exit(ret); /* !! process exits here! */

//Markus: I do not understand above

//I commented it at let this function

//to return ret value - was it purpose

//that cleanup below is not called at all - why?

/* Free resources and return */

_cleanup(); //this is normally called at exit, I call it here, Markus

CloseSTDLIB();

delete cleanup;

#ifdef __WINS__

// User::Panic(_L("exit"), ret);

// RThread().Kill(ret); //Markus get rid of this thread

// RThread().RaiseException(EExcKill);

#endif

return ret;//Markus, or exit(ret); ??

//return(KErrNone);

{

return E32Main();

// return WinsMain(0, 0, 0);