Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 3378 → Rev 3377

/programs/fs/kfm/trunk/sort.inc
1,8 → 1,6
left_sort_files:
; mcall 26,9
; mov [timer_tick],eax
cmp [left_folder_block], 0
jz .nothing
mov eax,[left_folder_data]
add eax,32+40
cmp [eax],word '..'
12,7 → 10,6
add [left_folder_data],304
dec [left_folder_block]
mov [exit_to_dir],1
jz .return_exit_to_dir
@@:
; add memory for sorting
mov ecx,[right_folder_data]
44,18 → 41,16
shr ecx,2
cld
rep movsd
; sub memory for sorting
pop ecx
mov [appl_memory],ecx
mcall 64,1
cmp [exit_to_dir],0
je @f
.return_exit_to_dir:
sub [left_folder_data],304
inc [left_folder_block]
mov [exit_to_dir],0
@@:
.nothing:
; sub memory for sorting
pop ecx
mov [appl_memory],ecx
mcall 64,1
; mcall 26,9
; sub eax,[timer_tick]
; mov [timer_tick],eax
636,8 → 631,6
ret
;---------------------------------------------------------------------
right_sort_files:
cmp [right_folder_block], 0
jz .nothing
mov eax,[right_folder_data]
add eax,32+40
cmp [eax],word '..'
647,7 → 640,6
add [right_folder_data],304
dec [right_folder_block]
mov [exit_to_dir],1
jz .return_exit_to_dir
@@:
; add memory for sorting
mov ecx,[appl_memory]
678,18 → 670,16
shr ecx,2
cld
rep movsd
; sub memory for sorting
pop ecx
mov [appl_memory],ecx
mcall 64,1
cmp [exit_to_dir],0
je @f
.return_exit_to_dir:
sub [right_folder_data],304
inc [right_folder_block]
mov [exit_to_dir],0
@@:
.nothing:
; sub memory for sorting
pop ecx
mov [appl_memory],ecx
mcall 64,1
ret
;---------------------------------------------------------------------
right_name_sort: