[perl #31697] [PATCH] B::Showlex::newlex enhancement and pod
[p5sagit/p5-mst-13.2.git] / embed.fnc
index 8ca6b0e..3a52c18 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1282,7 +1282,7 @@ s |HV *   |find_in_my_stash|char *pkgname|I32 len
 s      |SV*    |new_constant   |char *s|STRLEN len|const char *key|SV *sv \
                                |SV *pv|const char *type
 #  if defined(DEBUGGING)
-s      |void   |tokereport     |char *thing|char *s|I32 rv
+s      |int    |tokereport     |char *s|I32 rv
 #  endif
 s      |int    |ao             |int toketype
 s      |void   |depcom