| version 1.44, 2013/09/22 01:26:07 |
version 1.45, 2013/09/22 01:32:10 |
|
|
| /* $OpenXM: OpenXM/src/kan96xx/Kan/ext.c,v 1.43 2012/12/23 01:27:54 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/ext.c,v 1.44 2013/09/22 01:26:07 takayama Exp $ */ |
| #include <stdio.h> |
#include <stdio.h> |
| #include <string.h> |
#include <string.h> |
| #include <sys/types.h> |
#include <sys/types.h> |
| Line 109 struct object Kextension(struct object obj) |
|
| Line 109 struct object Kextension(struct object obj) |
|
| char *abc; |
char *abc; |
| char *abc2; |
char *abc2; |
| extern struct context *CurrentContextp; |
extern struct context *CurrentContextp; |
| |
struct timeval tm; |
| #if (__CYGWIN__) |
#if (__CYGWIN__) |
| extern sigjmp_buf EnvOfStackMachine; |
extern sigjmp_buf EnvOfStackMachine; |
| #else |
#else |
| Line 181 struct object Kextension(struct object obj) |
|
| Line 182 struct object Kextension(struct object obj) |
|
| } */ |
} */ |
| }else if (strcmp(key,"date")==0) { |
}else if (strcmp(key,"date")==0) { |
| if (size != 1) errorKan1("%s\n","[(date)] extension."); |
if (size != 1) errorKan1("%s\n","[(date)] extension."); |
| struct timeval tm; |
|
| gettimeofday(&tm,NULL); |
gettimeofday(&tm,NULL); |
| rob = KpoString(ctime(&((time_t)tm.tv_sec))); |
rob = KpoString(ctime(&((time_t)tm.tv_sec))); |
| }else if (strcmp(key,"defaultPolyRing")==0) { |
}else if (strcmp(key,"defaultPolyRing")==0) { |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to ext.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / Kan