Subversion Repositories Kolibri OS

Rev

Rev 1327 | Rev 1573 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1327 Rev 1568
Line 276... Line 276...
276
	mov	ecx, eax
276
	mov	ecx, eax
277
	mov	eax, [_delta]
277
	mov	eax, [_delta]
278
	neg	eax
278
	neg	eax
279
	sub	eax, ecx
279
	sub	eax, ecx
280
	invoke	file.seek, ebx, eax, SEEK_CUR
280
	invoke	file.seek, ebx, eax, SEEK_CUR
-
 
281
	push	ecx
281
	invoke	file.write, ebx, [buf], ecx
282
	invoke	file.write, ebx, [buf], ecx
-
 
283
	pop	ecx
-
 
284
	cmp	eax, ecx
282
	jmp	@b
285
	jz	@b
-
 
286
  .fail:
-
 
287
	or	eax, -1
-
 
288
	pop	ecx ebx
-
 
289
	ret
283
  .done:
290
  .done:
284
	mov	eax, [_delta]
291
	mov	eax, [_delta]
285
	neg	eax
292
	neg	eax
286
	invoke	file.seek, ebx, eax, SEEK_CUR
293
	invoke	file.seek, ebx, eax, SEEK_CUR
287
	invoke	file.seteof, ebx
294
	invoke	file.seteof, ebx
288
	stdcall libini._.reload_block, [_f]
295
	stdcall libini._.reload_block, [_f]
289
	invoke	mem.free, [buf]
296
	invoke	mem.free, [buf]
290
	pop	ecx ebx
297
	pop	ecx ebx
291
  .skip:
298
  .skip:
292
	ret
299
	ret
293
  .fail:
-
 
294
	or	eax, -1
-
 
295
	pop	ecx ebx
-
 
296
	ret
-
 
Line 297... Line 300...
297
 
300
 
298
  .down:
301
  .down:
Line 299... Line 302...
299
	neg	[_delta]
302
	neg	[_delta]