OpenXM/src/kan96xx/Kan/kanExport0.c - diff

Return to kanExport0.c CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.46, 2005/09/27 06:10:43

version 1.49, 2015/10/08 11:49:37

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/kanExport0.c,v 1.45 2005/07/03 11:08:53 ohara Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/kanExport0.c,v 1.48 2012/09/16 01:53:08 takayama Exp $ */

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

Line 940 struct object KdataConversion(obj,key)

rob = newObjectArray(0);

return rob;

}else{

/* fprintf(stderr,"key=%s\n",key); */

warningKan("Sorry. The data conversion from null to this data type has not supported yet.\n");

}

break;

Line 1659 int KsetUpRing(ob1,ob2,ob3,ob4,ob5)

Line 1660 int KsetUpRing(ob1,ob2,ob3,ob4,ob5)

newRingp->cc = cc;

newRingp->x = xvars;

newRingp->D = dvars;

newRingp->Dsmall = makeDsmall(dvars,n);

/* You don't need to set order and orderMatrixSize here.

It was set by setOrder(). */

setFromTo(newRingp);

Line 3342 errorKan1(str,message)

Line 3344 errorKan1(str,message)

stdOperandStack(); contextControl(CCRESTORE);

/* fprintf(stderr,"Now. Long jump!\n"); */

#if defined(__CYGWIN__)

siglongjmp(EnvOfStackMachine,1);

MYSIGLONGJMP(EnvOfStackMachine,1);

#else

longjmp(EnvOfStackMachine,1);

MYLONGJMP(EnvOfStackMachine,1);

#endif

}