X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=SimpleServer.xs;h=93dbc4cdebc89c301a6872c2715b6344a69407cd;hb=28bca99ecd8a78278d8b3e27873d9ee0d1959507;hp=f5fe4026da24d4341d2de99781f22f06c273fffc;hpb=c688a3758bfbc432610ae0f5f447fbc563eff50d;p=simpleserver-moved-to-github.git diff --git a/SimpleServer.xs b/SimpleServer.xs index f5fe402..93dbc4c 100644 --- a/SimpleServer.xs +++ b/SimpleServer.xs @@ -1,5 +1,5 @@ /* - * $Id: SimpleServer.xs,v 1.51 2006-07-25 23:14:49 mike Exp $ + * $Id: SimpleServer.xs,v 1.53 2006-07-26 11:09:14 mike Exp $ * ---------------------------------------------------------------------- * * Copyright (c) 2000-2004, Index Data. @@ -962,16 +962,14 @@ int bend_fetch(void *handle, bend_fetch_rr *rr) temp = hv_fetch(href, "REP_FORM", 8, 1); rep_form = newSVsv(*temp); - fprintf(stderr, "about to get SCHEMA\n"); temp = hv_fetch(href, "SCHEMA", 6, 1); if (temp != 0) { schema = newSVsv(*temp); - fprintf(stderr, "got schema = %0p\n", schema); ptr = SvPV(schema, length); - fprintf(stderr, "got ptr=%0p, length=%d\n", ptr, length); - rr->schema = (char *)odr_malloc(rr->stream, length + 1); - strcpy(rr->schema, ptr); - fprintf(stderr, "copied schema len %d = '%.*s'\n", length, length+5, ptr); + if (length > 0) { + rr->schema = (char *)odr_malloc(rr->stream, length + 1); + strcpy(rr->schema, ptr); + } } temp = hv_fetch(href, "HANDLE", 6, 1);