Subversion Repositories SvarDOS

Rev

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

Rev 1587 Rev 1597
Line 51... Line 51...
51
    unsigned char far *rmod_exitcode = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_LEXITCODE);
51
    unsigned char far *rmod_exitcode = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_LEXITCODE);
52
    unsigned short far *rmod_comspecptr = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_COMSPECPTR);
52
    unsigned short far *rmod_comspecptr = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_COMSPECPTR);
53
    char far *fptr;
53
    char far *fptr;
54
    unsigned short i;
54
    unsigned short i;
55
    printf("rmod->rmodseg = 0x%04X\r\n", p->rmod->rmodseg);
55
    printf("rmod->rmodseg = 0x%04X\r\n", p->rmod->rmodseg);
56
    printf("rmod->origparent = %04X:%04X\r\n", p->rmod->origparent >> 16, p->rmod->origparent & 0xffff);
56
    printf("rmod->origint22 = %04X:%04X\r\n", p->rmod->origint22 >> 16, p->rmod->origint22 & 0xffff);
-
 
57
    printf("rmod->origparent = 0x%04X\r\n", p->rmod->origparent);
57
    printf("rmod->origenvseg = 0x%04X\r\n", p->rmod->origenvseg);
58
    printf("rmod->origenvseg = 0x%04X\r\n", p->rmod->origenvseg);
58
    printf("rmod->flags = 0x%02X\r\n", p->rmod->flags);
59
    printf("rmod->flags = 0x%02X\r\n", p->rmod->flags);
59
    printf("[rmod:RMOD_OFFSET_ENVSEG] = 0x%04X\r\n", *rmod_envseg);
60
    printf("[rmod:RMOD_OFFSET_ENVSEG] = 0x%04X\r\n", *rmod_envseg);
60
    printf("environment allocated size: %u bytes\r\n", env_allocsz(*rmod_envseg));
61
    printf("environment allocated size: %u bytes\r\n", env_allocsz(*rmod_envseg));
61
    for (fptr = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_BOOTDRIVE), i = 0; *fptr != 0; fptr++) buff[i++] = *fptr;
62
    for (fptr = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_BOOTDRIVE), i = 0; *fptr != 0; fptr++) buff[i++] = *fptr;