Subversion Repositories SvarDOS

Rev

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

Rev 475 Rev 488
Line 63... Line 63...
63
      for (fptr = MK_FP(*rmod_envseg, *rmod_comspecptr), i = 0; *fptr != 0; fptr++) buff[i++] = *fptr;
63
      for (fptr = MK_FP(*rmod_envseg, *rmod_comspecptr), i = 0; *fptr != 0; fptr++) buff[i++] = *fptr;
64
      buff[i] = 0;
64
      buff[i] = 0;
65
    }
65
    }
66
    printf("[rmod:RMOD_OFFSET_COMSPECPTR] = '%s'\r\n", buff);
66
    printf("[rmod:RMOD_OFFSET_COMSPECPTR] = '%s'\r\n", buff);
67
    printf("[rmod:RMOD_OFFSET_LEXITCODE] = %u\r\n", *rmod_exitcode);
67
    printf("[rmod:RMOD_OFFSET_LEXITCODE] = %u\r\n", *rmod_exitcode);
-
 
68
    printf("rmod dump (first 64 bytes at [rmodseg:0100h]):\r\n");
-
 
69
    fptr = MK_FP(p->rmod->rmodseg, 0x100);
-
 
70
    for (i = 0; i < 64; i += 16) {
-
 
71
      int ii;
-
 
72
      for (ii = i; ii < i + 16; ii++) printf(" %02X", fptr[ii]);
-
 
73
      printf("   ");
-
 
74
      for (ii = i; ii < i + 16; ii++) {
-
 
75
        if (fptr[ii] < ' ') {
-
 
76
          printf(".");
-
 
77
        } else {
-
 
78
          printf("%c", fptr[ii]);
-
 
79
        }
-
 
80
      }
-
 
81
      printf("\r\n");
-
 
82
    }
-
 
83
 
68
    return(-1);
84
    return(-1);
69
  }
85
  }
70
#endif
86
#endif
71
 
87
 
72
  if ((p->argc == 1) && (imatch(p->argv[0], "/about"))) {
88
  if ((p->argc == 1) && (imatch(p->argv[0], "/about"))) {