X-Git-Url: http://git.indexdata.com/?p=simpleserver-moved-to-github.git;a=blobdiff_plain;f=SimpleServer.xs;h=0f4d5ab2b9ae3c763bbbc309383e51350abc11b7;hp=879ea748ebae900e64418ff36679ef3efc923e1b;hb=9c887fc97d778b4817ab59bea111f5377196d8b4;hpb=b18ec135ab08c3234a8f8d5e69e17e8b632b7fcc diff --git a/SimpleServer.xs b/SimpleServer.xs index 879ea74..0f4d5ab 100644 --- a/SimpleServer.xs +++ b/SimpleServer.xs @@ -1,6 +1,6 @@ /* - * $Id: SimpleServer.xs,v 1.21 2004-05-11 12:15:16 sondberg Exp $ + * $Id: SimpleServer.xs,v 1.22 2004-05-11 12:56:37 adam Exp $ * ---------------------------------------------------------------------- * * Copyright (c) 2000, Index Data. @@ -38,7 +38,10 @@ #include #include #include +#ifdef WIN32 +#else #include +#endif #include #include #define GRS_MAX_FIELDS 500 @@ -1137,8 +1140,6 @@ bend_initresult *bend_init(bend_initrequest *q) char *passwd = NULL; CV* handler_cv = 0; - PERL_SET_CONTEXT(PERL_GET_THX); - dSP; ENTER; SAVETMPS;