Rev 3679 | Rev 3780 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 3679 | Rev 3724 | ||
---|---|---|---|
Line 245... | Line 245... | ||
245 | if debug eq yes |
245 | if debug eq yes |
246 | dps 'get file info' |
246 | dps 'get file info' |
247 | newline |
247 | newline |
248 | end if |
248 | end if |
249 | ;-------------------------------------- |
249 | ;-------------------------------------- |
- | 250 | mcall 68,1 |
|
250 | mcall 70,fileinfo |
251 | mcall 70,fileinfo |
251 | mov [fs_error],eax |
252 | mov [fs_error],eax |
252 | test eax,eax |
253 | test eax,eax |
253 | jnz .file_error |
254 | jnz .file_error |
254 | ;-------------------------------------- |
255 | ;-------------------------------------- |
Line 281... | Line 282... | ||
281 | if debug eq yes |
282 | if debug eq yes |
282 | dps 'get file' |
283 | dps 'get file' |
283 | newline |
284 | newline |
284 | end if |
285 | end if |
285 | ;-------------------------------------- |
286 | ;-------------------------------------- |
- | 287 | mcall 68,1 |
|
286 | mcall 70,fileinfo |
288 | mcall 70,fileinfo |
287 | mov [fs_error],eax |
289 | mov [fs_error],eax |
288 | test eax,eax |
290 | test eax,eax |
289 | jz @f |
291 | jz @f |
290 | ; cmp eax,6 |
292 | ; cmp eax,6 |