Subversion Repositories SvarDOS

Rev

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

Rev 1012 Rev 1023
Line 43... Line 43...
43 
 * the RMOD struct I find in memory is one that I know. Should the version
43 
 * the RMOD struct I find in memory is one that I know. Should the version
44 
 * mismatch, then it would likely mean that SvarCOM has been upgraded and
44 
 * mismatch, then it would likely mean that SvarCOM has been upgraded and
45 
 * RMOD should not be accessed as its structure might no longer be in sync
45 
 * RMOD should not be accessed as its structure might no longer be in sync
46 
 * with what I think it is.
46 
 * with what I think it is.
47 
 *          *** INCREMENT THIS AT EACH NEW SVARCOM RELEASE! ***          */
 47 
 *          *** INCREMENT THIS AT EACH NEW SVARCOM RELEASE! ***          */
48 
#define BYTE_VERSION 3
 48 
#define BYTE_VERSION 4
49 
 
 49 
 
50 
 
 50 
 
51 
struct config {
 51 
struct config {
52 
  unsigned char flags; /* command.com flags, as defined in rmodinit.h */
 52 
  unsigned char flags; /* command.com flags, as defined in rmodinit.h */
53 
  char *execcmd;
 53 
  char *execcmd;
Line 819... Line 819...
819 
  if ((cfg.flags & (FLAG_PERMANENT | FLAG_SKIP_AUTOEXEC)) == FLAG_PERMANENT) {
 819 
  if ((cfg.flags & (FLAG_PERMANENT | FLAG_SKIP_AUTOEXEC)) == FLAG_PERMANENT) {
820 
    if (file_getattr("AUTOEXEC.BAT") >= 0) cfg.execcmd = "AUTOEXEC.BAT";
 820 
    if (file_getattr("AUTOEXEC.BAT") >= 0) cfg.execcmd = "AUTOEXEC.BAT";
821 
  }
 821 
  }
822 
 
 822 
 
823 
  do {
 823 
  do {
- 
 
 824 
    /* am I inside a FOR loop? */
- 
 
 825 
    if (rmod->forloop) {
- 
 
 826 
      outputnl("FOR IS NOT IMPLEMENTED YET");
- 
 
 827 
      /* TODO dta_inited: FindFirst() or FindNext()? */
- 
 
 828 
      /* TODO read result */
- 
 
 829 
      /* TODO end of results? move to next pattern */
- 
 
 830 
      /* free used memory */
- 
 
 831 
      rmod_ffree(rmod->forloop);
- 
 
 832 
      rmod->forloop = NULL;
- 
 
 833 
    }
- 
 
 834 
 
824 
    /* terminate previous command with a CR/LF if ECHO ON (but not during BAT processing) */
 835 
    /* terminate previous command with a CR/LF if ECHO ON (but not during BAT processing) */
825 
    if ((rmod->flags & FLAG_ECHOFLAG) && (rmod->bat == NULL)) outputnl("");
 836 
    if ((rmod->flags & FLAG_ECHOFLAG) && (rmod->bat == NULL)) outputnl("");
826 
 
 837 
 
827 
    SKIP_NEWLINE:
 838 
    SKIP_NEWLINE:
828 
 
 839