Subversion Repositories Kolibri OS

Rev

Rev 3877 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3877 Rev 4137
Line 233... Line 233...
233 
}
 233 
}
Line 234... Line 234...
234 
 
 234 
 
235 
:dword abspath(dword relative_path) //GetAbsolutePathFromRelative()
 235 
:dword abspath(dword relative_path) //GetAbsolutePathFromRelative()
236 
{
 236 
{
237 
	char absolute_path[4096];
 237 
	char absolute_path[4096];
- 
 
 238 
	if (ESBYTE[relative_path]=='/')
- 
 
 239 
	{
- 
 
 240 
		strcpy(#absolute_path, relative_path);
- 
 
 241 
	}
- 
 
 242 
	else
238 
	if (ESBYTE[relative_path]=='/') return relative_path;
 243 
	{
239 
	strcpy(#absolute_path, #program_path);
 244 
		strcpy(#absolute_path, #program_path);
240 
	absolute_path[strrchr(#absolute_path, '/')] = '\0';
 245 
		absolute_path[strrchr(#absolute_path, '/')] = '\0';
- 
 
 246 
		strcat(#absolute_path, relative_path);
241 
	strcat(#absolute_path, relative_path);
 247 
	}
242 
	return #absolute_path;
 248 
	return #absolute_path;