projects
/
simpleserver-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Towards 1.10
[simpleserver-moved-to-github.git]
/
SimpleServer.xs
diff --git
a/SimpleServer.xs
b/SimpleServer.xs
index
7769776
..
788b929
100644
(file)
--- a/
SimpleServer.xs
+++ b/
SimpleServer.xs
@@
-1,5
+1,5
@@
/*
/*
- * $Id: SimpleServer.xs,v 1.78 2007-09-10 11:17:13 mike Exp $
+ * $Id: SimpleServer.xs,v 1.79 2007-09-10 14:50:31 mike Exp $
* ----------------------------------------------------------------------
*
* Copyright (c) 2000-2004, Index Data.
* ----------------------------------------------------------------------
*
* Copyright (c) 2000-2004, Index Data.
@@
-425,9
+425,9
@@
static SV *apt2perl(Z_AttributesPlusTerm *at)
newSViv(*elem->value.numeric));
} else {
Z_ComplexAttribute *c;
newSViv(*elem->value.numeric));
} else {
Z_ComplexAttribute *c;
+ Z_StringOrNumeric *son;
assert(elem->which == Z_AttributeValue_complex);
c = elem->value.complex;
assert(elem->which == Z_AttributeValue_complex);
c = elem->value.complex;
- Z_StringOrNumeric *son;
/* We ignore semantic actions and multiple values */
assert(c->num_list > 0);
son = c->list[0];
/* We ignore semantic actions and multiple values */
assert(c->num_list > 0);
son = c->list[0];