Source position: amigados.pas line 1690
function GetCurrentDirName(
buf: pCHAR;
len: LongInt
):LongBool;