Subversion Repositories SvarDOS

Rev

Rev 357 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
352 mateuszvis 1 
/*
2 
 *
3 
 */
4 
 
5 
static int cmd_set(int argc, char const **argv, unsigned short env_seg) {
6 
  char far *env = MK_FP(env_seg, 0);
7 
  char buff[256];
8 
  int i;
9 
  while (*env != 0) {
10 
    /* copy string to local buff for display */
11 
    for (i = 0;; i++) {
12 
      buff[i] = *env;
13 
      env++;
14 
      if (buff[i] == 0) break;
15 
    }
16 
    puts(buff);
17 
  }
18 
 
19 
  return(0);
20 
}