Subversion Repositories Kolibri OS

(root)/programs/cmm/lib/file_system.h – Rev 3467 → 3877



 
char isdir(dword fpath)
{
	BDVK fpath_atr;
	GetFileInfo(fpath, #fpath_atr);
	if (TestBit( fpath_atr.attr, 4)) return 1; else return 0;
}
 
:int GetFile(dword buf, filesize, read_path)
{
	BDVK ReadFile_atr;
	dword rBuf;

Rev 3467	Rev 3877
Line 165...	Line 165...
165		165
166	char isdir(dword fpath)	166	char isdir(dword fpath)
167	{	167	{
168	BDVK fpath_atr;	168	BDVK fpath_atr;
169	GetFileInfo(fpath, #fpath_atr);	169	GetFileInfo(fpath, #fpath_atr);
170	if ( $test fpath_atr.attr, 4 ) return 1; else return 0;	170	if (TestBit( fpath_atr.attr, 4)) return 1; else return 0;
-		171	}
171	}	172
172	:int GetFile(dword buf, filesize, read_path)	173	:int GetFile(dword buf, filesize, read_path)
173	{	174	{
174	BDVK ReadFile_atr;	175	BDVK ReadFile_atr;
175	dword rBuf;	176	dword rBuf;