Subversion Repositories SvarDOS

Rev

Rev 2195 | Rev 2213 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2195 Rev 2199
Line 211... Line 211...
211 
 
 211 
 
212 
/* find next matching, ie. continues an action intiated by findfirst() */
 212 
/* find next matching, ie. continues an action intiated by findfirst() */
213 
unsigned short findnext(struct DTA *dta) {
 213 
unsigned short findnext(struct DTA *dta) {
214 
  unsigned short res = 0;
 214 
  unsigned short res = 0;
215 
  _asm {
 215 
  _asm {
216 
    mov ah, 0x4f    /* FindNext */
 216 
    /* set DTA location */
- 
 
 217 
    mov ah, 0x1a
217 
    mov dx, dta
 218 
    mov dx, dta
- 
 
 219 
    int 0x21
- 
 
 220 
    /* FindNext */
- 
 
 221 
    mov ah, 0x4f
218 
    int 0x21        /* CF set on error + err code in AX, DTA filled with FileInfoRec on success */
 222 
    int 0x21        /* CF set on error + err code in AX, DTA filled with FileInfoRec on success */
219 
    jnc DONE
 223 
    jnc DONE
220 
    mov [res], ax
 224 
    mov [res], ax
221 
    DONE:
 225 
    DONE:
222 
  }
 226 
  }