Subversion Repositories SvarDOS

Rev

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

Rev 1395 Rev 1396
Line 699... Line 699...
699
    mdr_coutraw_char(' ');
699
    mdr_coutraw_char(' ');
700
    mdr_coutraw_puts(arg);
700
    mdr_coutraw_puts(arg);
701
    err = loadfile(&(dbarr[count]), arg);
701
    err = loadfile(&(dbarr[count]), arg);
702
    if (err) {
702
    if (err) {
703
      if (err == 1) { /* file not found */
703
      if (err == 1) { /* file not found */
-
 
704
        if ((count == 0) && (lastarg != 0)) { /* a 'file not found' is fine if only one file was given */
-
 
705
          memcpy(dbarr[count].fname, arg, strlen(arg) + 1);
-
 
706
          err = 0;
-
 
707
        } else {
704
        err = 11;
708
          err = 11;
-
 
709
        }
705
      } else { /* general error */
710
      } else { /* general error */
706
        err = 10;
711
        err = 10;
707
      }
712
      }
-
 
713
      if (err) {
708
      mdr_coutraw_puts(svarlang_str(0,err));
714
        mdr_coutraw_puts(svarlang_str(0,err));
709
      return(-1);
715
        return(-1);
-
 
716
      }
710
    }
717
    }
711
    count++;
718
    count++;
712
  }
719
  }
713
 
720
 
714
  return(0);
721
  return(0);