Subversion Repositories SvarDOS

Rev

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

Rev 1070 Rev 1074
Line 79... Line 79...
79
  struct forctx *f = (void *)(p->BUFFER);
79
  struct forctx *f = (void *)(p->BUFFER);
80
  unsigned short i;
80
  unsigned short i;
81
 
81
 
82
  /* forbid nested FORs */
82
  /* forbid nested FORs */
83
  if (p->rmod->forloop) {
83
  if (p->rmod->forloop) {
84
    nls_outputnl(18,7); /* FOR cannot be nested */
84
    nls_outputnl(18,7); /* "FOR cannot be nested" */
85
    return(CMD_FAIL);
85
    return(CMD_FAIL);
86
  }
86
  }
87
 
87
 
88
  /* help screen ONLY if /? is the only argument */
88
  /* help screen ONLY if /? is the only argument */
89
  if ((p->argc == 1) && (imatch(p->argv[0], "/?"))) {
89
  if ((p->argc == 1) && (imatch(p->argv[0], "/?"))) {
90
    nls_outputnl(18,0); /* "Runs a specified command for each file in a set of files" */
90
    nls_outputnl(18,0); /* "Runs a specified command for each file in a set of files" */
91
    outputnl("");
91
    outputnl("");
92
    nls_outputnl(18,1); /* "FOR %variable IN (set) DO command [parameters]" */
92
    nls_outputnl(18,1); /* "FOR %variable IN (set) DO command [parameters]" */
93
    outputnl("");
93
    outputnl("");
94
    nls_outputnl(18,2); /* "%variable    a replaceable parameter name" */
94
    nls_outputnl(18,2); /* "%variable   A replaceable parameter name. (single letter)" */
95
    nls_outputnl(18,3); /* "(set)        a set of one of more files. Wildcards allowed." */
95
    nls_outputnl(18,3); /* "((set)       One of more space-separated strings or filename wildcards." */
96
    nls_outputnl(18,4); /* "command      the command to carry out for each matched file" */
96
    nls_outputnl(18,4); /* "command     The command to carry out for each matched file." */
97
    nls_outputnl(18,5); /* "parameters   parameters or switches for the specified command" */
97
    nls_outputnl(18,5); /* "parameters  Parameters or switches for the specified command." */
98
    outputnl("");
98
    outputnl("");
99
    nls_outputnl(18,6); /* "To use FOR in a batch program, use %%variable instead of %variable" */
99
    nls_outputnl(18,6); /* "To use FOR in a batch program, use %%variable instead of %variable" */
100
    return(CMD_OK);
100
    return(CMD_OK);
101
  }
101
  }
102
 
102