projects
/
p5sagit/Devel-Declare.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Make get_linestr return NULL/undef if we aren't parsing.
[p5sagit/Devel-Declare.git]
/
Declare.xs
diff --git
a/Declare.xs
b/Declare.xs
index
3b8c5dd
..
69dd632
100644
(file)
--- a/
Declare.xs
+++ b/
Declare.xs
@@
-103,6
+103,9
@@
void dd_linestr_callback (pTHX_ char* type, char* name) {
}
char* dd_get_linestr(pTHX) {
+ if (!DD_HAVE_PARSER) {
+ return NULL;
+ }
return SvPVX(PL_linestr);
}