Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 3839 → Rev 3877

/programs/cmm/lib/copyf.h
26,12 → 26,16
BDVK CopyFile_atr;
dword error, cbuf;
if (error = GetFileInfo(copy_from3, #CopyFile_atr))
{
debug("Error: CopyFile->GetFileInfo");
}
else
{
cbuf = malloc(CopyFile_atr.sizelo);
if (error = ReadFile(0, CopyFile_atr.sizelo, cbuf, copy_from3))
{
debug("Error: CopyFile->ReadFile");
}
else
{
if (error = WriteFile(CopyFile_atr.sizelo, cbuf, copy_in3)) debug("Error: CopyFile->WriteFile");
/programs/cmm/lib/file_system.h
167,8 → 167,9
{
BDVK fpath_atr;
GetFileInfo(fpath, #fpath_atr);
if ( $test fpath_atr.attr, 4 ) return 1; else return 0;
if (TestBit( fpath_atr.attr, 4)) return 1; else return 0;
}
 
:int GetFile(dword buf, filesize, read_path)
{
BDVK ReadFile_atr;
/programs/cmm/lib/kolibri.h
152,6 → 152,20
 
//----------------------------------------
 
/* ecx = point to structure
sysdir_name rb 64
sysdir_path rb 64
Ïðèìåð:
dir_name1 db 'addappl',0
dir_path1 db 'HD0/1',0
*/
inline fastcall int SetAddApplDir( ECX)
{
EAX = 30;
EBX = 3;
$int 0x40
}
 
inline fastcall dword GetFreeRAM()
{
$mov eax, 18