===================================================================
RCS file: /home/cvs/OpenXM/src/kxx/serversm.h,v
retrieving revision 1.4
retrieving revision 1.6
diff -u -p -r1.4 -r1.6
--- OpenXM/src/kxx/serversm.h	2005/06/16 05:07:24	1.4
+++ OpenXM/src/kxx/serversm.h	2015/10/08 08:14:25	1.6
@@ -15,7 +15,16 @@ void Sm1_getsp(void);
 void Sm1_dupErrors(void);
 void Sm1_pushCMOtag(int serial);
 
+#include <setjmp.h>
 
+#if defined(__CYGWIN__) || defined(__MSYS__)
+#define MYSETJMP(e) _setjmp(e)
+#define MYSIGSETJMP(e,f) setjmp(e)
+#else
+#define MYSETJMP(e)  setjmp(e)
+#define MYSIGSETJMP(e,f) sigsetjmp(e,f)
+#endif
+
 /********************  Object from Kan/stackm.h *************************/
 #define Snull             0
 #define Sinteger          1     /* integer */
@@ -61,10 +70,12 @@ void KSpush(struct object ob);
 struct object KfindUserDictionary(char *s);
 struct object KputUserDictionary(char *s,struct object ob);
 struct object KnewErrorPacket(int serial,int no,char *s);
+struct object KnewErrorPacketObj(struct object);
 struct object KSmathCap(void);  /* defined plugin/cmo.c */
 void *KSmathCapByStruct(void);  /* defined plugin/cmo.c */
 char *popErrorStackByString(void);
 struct object KSdupErrors(void);
 struct object KpoInteger(int i);
+struct object KpoString(char *s);
 struct object KSpeek(int k);
-
+struct object KSnewObjectArray(int k);