Subversion Repositories Kolibri OS

Compare Revisions

Ignore whitespace Rev 6244 → Rev 6245

/programs/develop/libraries/box_lib/load_lib.mac
117,6 → 117,8
local lp2
local lp3
local lp4
local lp5
local lp6
local file_name
 
library_fun_memory_alloc equ 0 ;­¥ ¨á¯®«ì§®¢ âì ¢ ¬ ªà®á å ¯à®¢¥àªã ­  ä㭪樨 'lib_init'
168,6 → 170,21
test esi,esi
jz .str_lp4
 
;¯à®¢¥àª  ®â­®á¨â¥«ì­ëå ¯ã⥩ c ¤¢ã¬ï â®çª ¬¨ '../'
cmp word[esi],'..'
jne .lp3
dec edi ;¤«ï ¯¥à¥å®¤  ­  '/'
.lp6:
add esi,3 ;¯à®¯ã᪠¥¬ ®¤­® ¯®¤­ï⨥ '../'
.lp5:
dec edi ;¨¤¥¬ ¯® ¯ ¯ª ¬
cmp byte[edi],'/'
jnz .lp5
cmp word[esi],'..'
je .lp6
inc edi ;¤«ï ¯¥à¥å®¤  ­  '/'
 
;ª®¯¨à®¢ ­¨¥ ®â­®á¨â¥«ì­®£® ¯ãâ¨
align 4
.lp3:
lodsb
183,7 → 200,7
stosb
test eax,eax
jnz .lp4
;---------------------------------------------------------------------
;---------------------------------------------------------------------
ret
}
 
439,15 → 456,16
 
macro copy_path lib_name,dir_path,lib_path,point_dir_name
{
pushad ;save all registers
push dword lib_name
push dword dir_path
push dword lib_path
push dword point_dir_name
call @copy_path
pushad ;save all registers
push dword lib_name
push dword dir_path
push dword lib_path
push dword point_dir_name
call @copy_path
 
add esp,16
popad ;restore all registers
add esp,16
;notify_window_run lib_path ;unblok for test load path
popad ;restore all registers
}
 
; £®â®¢¨¬ ⥪áâ ¤«ï ¯®ª §  ç¥à¥§ @notify: