projects
/
gitmo/Class-MOP.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
c79ae27
)
Fix a stack operation
gfx [Sat, 5 Sep 2009 06:10:08 +0000 (15:10 +0900)]
xs/MethodConstructor.xs
patch
|
blob
|
blame
|
history
diff --git
a/xs/MethodConstructor.xs
b/xs/MethodConstructor.xs
index
f5af4ad
..
5fa6eda
100644
(file)
--- a/
xs/MethodConstructor.xs
+++ b/
xs/MethodConstructor.xs
@@
-54,6
+54,9
@@
XS(mop_xs_constructor)
croak("Not enough arguments for %s()", GvNAME(CvGV(cv)));
}
+ SP -= items;
+ PUTBACK;
+
klass = ST(0);
if(SvROK(klass)){