Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 7159 → Rev 7538

/programs/fs/unz/parse.inc
4,7 → 4,7
; 2 - error parsing
 
proc getLastParam ;¯®á«¥¤­¨© ¯ à ¬¥âà ¯¨è¥â ¢ fInp
xor al, al ;to end sring
xor al, al ;to end string
mov edi, params
mov ecx, 4096
repne scasb
100,26 → 100,30
xor eax, eax
endp
 
 
proc getParam2
;§ ¯®«­ï¥ pathOut
proc getParamOutPath
locals
retrn rd 0
endl
mov [retrn], 0
mov ebx, params
 
.find_o:
cmp [ebx], word '-o'
jne .find_o2
 
mov edx, ebx
lea esi, [ebx+3]
 
@@: ;skiping spaces
cmp esi, pathOut+1024
cmp esi, params+4096
jae .errorParsing
cmp byte[esi], ' '
jne @f
inc esi
jmp @b
@@: ;copying ; -o "file"
@@:
;copying ; -o "file"
mov ecx, 3
cmp byte[esi], '"'
jne ._notspace
132,7 → 136,7
je .clear
stosb
inc ecx
cmp esi, pathOut+1024
cmp esi, params+1024
jae errorParsing
jmp @b
 
143,7 → 147,7
inc ecx
cmp al, ' '
je .clear
cmp esi, pathOut+1024
cmp esi, params+1024
jae errorParsing
jmp @b
 
159,7 → 163,7
 
.find_o2:
inc ebx
cmp ebx, pathOut+1024
cmp ebx, params+1024
jae @f
cmp byte[ebx], 0
je @f
200,7 → 204,7
jmp @b
@@:
 
;copying ; -f "file"
;variant1: copying ; -f "file"
mov ecx, 3
cmp byte[esi], '"'
jne ._notspace
217,7 → 221,7
jae errorParsing
jmp @b
 
._notspace: ;copying ; -f file
._notspace: ;variant2: copying ; -f file
mov edi, [endPointer]
@@: lodsb
stosb