summaryrefslogtreecommitdiff
path: root/universal.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2017-01-07 14:12:05 +0000
committerDavid Mitchell <davem@iabyn.com>2017-01-07 14:30:45 +0000
commit7fd883b13f86fa5bca1523192141b690bdd8cde6 (patch)
treed145a6200620a584619f56b582c395bbe955cf01 /universal.c
parentd4914d8c1ae391758a02494120b9d3ed874ef93d (diff)
downloadperl-7fd883b13f86fa5bca1523192141b690bdd8cde6.tar.gz
fix some comment typos about PL_isa_DOES
... and expand one of the comments a bit.
Diffstat (limited to 'universal.c')
-rw-r--r--universal.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/universal.c b/universal.c
index 95934ca694..88835f9d78 100644
--- a/universal.c
+++ b/universal.c
@@ -184,8 +184,9 @@ The SV can be a Perl object or the name of a Perl class.
#include "XSUB.h"
-/* a special string address whose value is "isa", but whicb perl knows
- * to treat as if it were really "DOES" */
+/* a special string address whose value is "isa", but which perl knows
+ * to treat as if it were really "DOES" when printing the method name in
+ * the "Can't call method '%s'" error message */
char PL_isa_DOES[] = "isa";
bool
@@ -227,7 +228,7 @@ Perl_sv_does_sv(pTHX_ SV *sv, SV *namesv, U32 flags)
PUTBACK;
/* create a PV with value "isa", but with a special address
- * so that perl knows were' realling doing "DOES" instead */
+ * so that perl knows we're really doing "DOES" instead */
methodname = newSV_type(SVt_PV);
SvLEN(methodname) = 0;
SvCUR(methodname) = strlen(PL_isa_DOES);