Hi!
Try to execute

	GetEnvironmentVariable('NON_EXISTING_ONE');

I got a SIGSEGV....

Suggestion to resolve a problem:
replace a current impementation of StrPas in objpas/syspch.inc with a one like in Kylix

StrPas(Str: PChar): ShortString;
begin
  Result:=Str;
end;

Current implementation do not check result of GetEnv (it can be a nil), and StrLen can not handle nil args too.

Regards,
Sergey Korshunoff