OpenXM_contrib2/asir2000/parse/pvar.c - diff

Return to pvar.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / parse

version 1.22, 2015/08/14 13:51:56

version 1.23, 2017/02/07 08:30:31

Line 45

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/parse/pvar.c,v 1.21 2015/08/08 14:19:42 fujimoto Exp $

* $OpenXM: OpenXM_contrib2/asir2000/parse/pvar.c,v 1.22 2015/08/14 13:51:56 fujimoto Exp $

#include "ca.h"

#include "parse.h"

Line 298 int getpvar(VS pvs,char *str,int searchonly)

if ( searchonly )

return -1;

if ( pvs->asize == pvs->n )

reallocarray((char **)&pvs->va,(int *)&pvs->asize,(int *)&pvs->n,(int)sizeof(struct oPV));

asir_reallocarray((char **)&pvs->va,(int *)&pvs->asize,(int *)&pvs->n,(int)sizeof(struct oPV));

v = &pvs->va[pvs->n];

NAME(v) = (char *)CALLOC(strlen(str)+1,sizeof(char));

strcpy(NAME(v),str); v->priv = 0;

Line 361 void restorepvs()

void storeans(pointer p)

{

if ( APVS->asize == APVS->n )

reallocarray((char **)&APVS->va,(int *)&APVS->asize,(int *)&APVS->n,(int)sizeof(struct oPV));

asir_reallocarray((char **)&APVS->va,(int *)&APVS->asize,(int *)&APVS->n,(int)sizeof(struct oPV));

APVS->va[APVS->n++].priv = p;

}