diff options
| author | Nicholas Clark <nick@ccl4.org> | 2005-09-21 10:53:56 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-09-21 10:53:56 +0000 |
| commit | 2596d9fe3023e9da9e3e000993c9f26fa30909ef (patch) | |
| tree | 24896940c9bb348b74e34fad515317adb56837ac /ext/Opcode | |
| parent | 8dfcc1616e57fd4d21ae26bcb2e0c92ae93ab613 (diff) | |
| download | perl-2596d9fe3023e9da9e3e000993c9f26fa30909ef.tar.gz | |
Remove the last STRLEN n_a;s that my compiler can reach.
p4raw-id: //depot/perl@25530
Diffstat (limited to 'ext/Opcode')
| -rw-r--r-- | ext/Opcode/Opcode.xs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/ext/Opcode/Opcode.xs b/ext/Opcode/Opcode.xs index b313999a71..8354b48845 100644 --- a/ext/Opcode/Opcode.xs +++ b/ext/Opcode/Opcode.xs @@ -466,8 +466,7 @@ PPCODE: } else if (SvPOK(bitspec) && SvCUR(bitspec) == (STRLEN)opset_len) { int b, j; - STRLEN n_a; - const char * const bitmap = SvPV(bitspec,n_a); + const char * const bitmap = SvPV_nolen_const(bitspec); int myopcode = 0; for (b=0; b < opset_len; b++) { const U16 bits = bitmap[b]; |