| version 1.47, 2006/12/21 05:29:49 |
version 1.49, 2015/10/08 11:49:37 |
|
|
| /* $OpenXM: OpenXM/src/kan96xx/Kan/kanExport0.c,v 1.46 2005/09/27 06:10:43 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/kanExport0.c,v 1.48 2012/09/16 01:53:08 takayama Exp $ */ |
| #include <stdio.h> |
#include <stdio.h> |
| #include <stdlib.h> |
#include <stdlib.h> |
| #include <string.h> |
#include <string.h> |
| Line 940 struct object KdataConversion(obj,key) |
|
| Line 940 struct object KdataConversion(obj,key) |
|
| rob = newObjectArray(0); |
rob = newObjectArray(0); |
| return rob; |
return rob; |
| }else{ |
}else{ |
| |
/* fprintf(stderr,"key=%s\n",key); */ |
| warningKan("Sorry. The data conversion from null to this data type has not supported yet.\n"); |
warningKan("Sorry. The data conversion from null to this data type has not supported yet.\n"); |
| } |
} |
| break; |
break; |
| Line 3343 errorKan1(str,message) |
|
| Line 3344 errorKan1(str,message) |
|
| stdOperandStack(); contextControl(CCRESTORE); |
stdOperandStack(); contextControl(CCRESTORE); |
| /* fprintf(stderr,"Now. Long jump!\n"); */ |
/* fprintf(stderr,"Now. Long jump!\n"); */ |
| #if defined(__CYGWIN__) |
#if defined(__CYGWIN__) |
| siglongjmp(EnvOfStackMachine,1); |
MYSIGLONGJMP(EnvOfStackMachine,1); |
| #else |
#else |
| longjmp(EnvOfStackMachine,1); |
MYLONGJMP(EnvOfStackMachine,1); |
| #endif |
#endif |
| } |
} |
| |
|