version 1.11, 2000/09/14 20:25:12
|
version 1.12, 2000/09/20 17:21:01
|
Line 830 ArgNode_t *argp;
|
Line 830 ArgNode_t *argp;
|
errCode = 1; |
errCode = 1; |
break; |
break; |
case S_VAR: case S_CONSTANT: |
case S_VAR: case S_CONSTANT: |
mean_vec_str = SECOND_ARGSTR(argp); |
mean_vec_str = strsave( SECOND_ARGSTR(argp) ); |
break; |
break; |
case IDENTIFIER: |
case IDENTIFIER: |
mean_vec_str = SECOND_ARGNAME(argp); |
mean_vec_str = strsave( SECOND_ARGNAME(argp) ); |
/* |
/* |
resultp->s_type = S_CONSTANT; |
resultp->s_type = S_CONSTANT; |
resultp->s_str = strsave("<<THE FIFTH ARG. OF THIS FUNCTION MUST BE AN ARRAY WITH DATA>>"); |
resultp->s_str = strsave("<<THE FIFTH ARG. OF THIS FUNCTION MUST BE AN ARRAY WITH DATA>>"); |
Line 1161 ArgNode_t *argp;
|
Line 1161 ArgNode_t *argp;
|
break; |
break; |
} /* end second switch */ |
} /* end second switch */ |
} break; |
} break; |
case ARRAY_MOMENTS_F: /* */ |
case ARRAY_MOMENTS_F: /* array_moments(output,input) */ |
{ |
{ |
char *tmp_input; |
char *tmp_input; |
Symbol *r_p; |
Symbol *r_p; |