capa/capa51/pProj/capaFunction.c - diff

Return to capaFunction.c CVS log

Up to [LON-CAPA] / capa / capa51 / pProj

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;