diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-10-03 20:34:13 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-10-03 20:34:13 +0000 |
| commit | cb77fdf0e62f488063efd544deea3e13e215fac6 (patch) | |
| tree | 57357b53ba1e38d46872e8b7b061593152d03d6b /op.c | |
| parent | 276b2a0c6a53ec634026b73150a6cb3f81349921 (diff) | |
| download | perl-cb77fdf0e62f488063efd544deea3e13e215fac6.tar.gz | |
Change the warning message "%s trapped by operation mask"
to include '' around the op name. Document it in perldiag.
p4raw-id: //depot/perl@17973
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -104,7 +104,7 @@ S_Slab_Free(pTHX_ void *op) #define CHECKOP(type,o) \ ((PL_op_mask && PL_op_mask[type]) \ ? ( op_free((OP*)o), \ - Perl_croak(aTHX_ "%s trapped by operation mask", PL_op_desc[type]), \ + Perl_croak(aTHX_ "'%s' trapped by operation mask", PL_op_desc[type]), \ Nullop ) \ : CALL_FPTR(PL_check[type])(aTHX_ (OP*)o)) |