Rev 2570 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 2570 | Rev 3130 | ||
|---|---|---|---|
| Line 510... | Line 510... | ||
| 510 | ;;------------------------------------------------------------------------------------------------;; |
510 | ;;------------------------------------------------------------------------------------------------;; |
| 511 | ;< eax = -1 (error) / file pointer position |
511 | ;< eax = -1 (error) / file pointer position |
| 512 | ;;------------------------------------------------------------------------------------------------;; |
512 | ;;------------------------------------------------------------------------------------------------;; |
| 513 | ;# call `file.err` to obtain extended error information ;; |
513 | ;# call `file.err` to obtain extended error information ;; |
| 514 | ;;================================================================================================;; |
514 | ;;================================================================================================;; |
| - | 515 | cmp eax,32 |
|
| - | 516 | jb .exit_error |
|
| 515 | mov eax, [_filed] |
517 | mov eax, [_filed] |
| 516 | mov [eax + InternalFileInfo.Mode], 0 |
518 | mov [eax + InternalFileInfo.Mode], 0 |
| 517 | mov [eax + InternalFileInfo.FileName], 0 |
519 | mov [eax + InternalFileInfo.FileName], 0 |
| 518 | invoke mem.free, eax |
520 | invoke mem.free, eax |
| 519 | xor eax, eax |
521 | xor eax, eax |
| - | 522 | jmp @f |
|
| - | 523 | .exit_error: |
|
| - | 524 | or eax, -1 |
|
| - | 525 | @@: |
|
| 520 | ret |
526 | ret |
| 521 | endp |
527 | endp |
| Line 522... | Line 528... | ||
| 522 | 528 | ||