~mdw
/
catacomb-perl
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Update for new keydata interface.
[catacomb-perl]
/
ec.xs
diff --git
a/ec.xs
b/ec.xs
index
83d1f72
..
7507c8f
100644
(file)
--- a/
ec.xs
+++ b/
ec.xs
@@
-123,7
+123,7
@@
get(s)
else {
XPUSHs(RET(p, "Catacomb::EC::Point"));
if (GIMME_V == G_ARRAY)
else {
XPUSHs(RET(p, "Catacomb::EC::Point"));
if (GIMME_V == G_ARRAY)
- XPUSHs(sv_2mortal(newSVpvn(BCUR(&b), BLEFT(&b))));
+ XPUSHs(sv_2mortal(newSVpvn(
(char *)
BCUR(&b), BLEFT(&b))));
}
MODULE = Catacomb PACKAGE = Catacomb::EC::Curve PREFIX = ec_
}
MODULE = Catacomb PACKAGE = Catacomb::EC::Curve PREFIX = ec_
@@
-252,7
+252,7
@@
_getraw(c, s)
else {
XPUSHs(RET(p, "Catacomb::EC::Point"));
if (GIMME_V == G_ARRAY)
else {
XPUSHs(RET(p, "Catacomb::EC::Point"));
if (GIMME_V == G_ARRAY)
- XPUSHs(sv_2mortal(newSVpvn(BCUR(&b), BLEFT(&b))));
+ XPUSHs(sv_2mortal(newSVpvn(
(char *)
BCUR(&b), BLEFT(&b))));
}
ec *
}
ec *