Subversion Repositories SvarDOS

Rev

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

Rev 1572 Rev 1573
Line 30... Line 30...
30 
    dst = (char far *)dst + 1;
 30 
    dst = (char far *)dst + 1;
31 
    src = (char far *)src + 1;
 31 
    src = (char far *)src + 1;
32 
  }
 32 
  }
33 
}
 33 
}
34 
 
 34 
 
35 
unsigned short mdr_dos_fclose(unsigned short handle) {
 - 
 
36 
  unsigned short res = 0;
 - 
 
37 
  _asm {
 - 
 
38 
    push bx
 - 
 
39 
 
 - 
 
40 
    mov ah, 0x3e
 - 
 
41 
    mov bx, handle
 - 
 
42 
    int 0x21
 - 
 
43 
    jnc done
 - 
 
44 
    mov res, ax
 - 
 
45 
    done:
 - 
 
46 
 
 - 
 
47 
    pop bx
 - 
 
48 
  }
 - 
 
49 
  return(res);
 - 
 
50 
}
 - 
 
51 
 
 - 
 
52 
 
 35 
 
53 
unsigned short mdr_dos_resizeblock(unsigned short siz, unsigned short segn) {
 36 
unsigned short mdr_dos_resizeblock(unsigned short siz, unsigned short segn) {
54 
  unsigned short res = 0;
 37 
  unsigned short res = 0;
55 
 
 38 
 
56 
  _asm {
 39 
  _asm {