diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-03-16 08:44:37 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-03-16 08:44:37 +0000 |
| commit | ac4c12e7aee90d31d5da776601addbfd9d738a5a (patch) | |
| tree | 1824760ad266d03442e71a134673c0c0837302f1 /op.c | |
| parent | a0824163008c006b841cb7ca91d331692d4ba14a (diff) | |
| download | perl-ac4c12e7aee90d31d5da776601addbfd9d738a5a.tar.gz | |
[asperl] various changes to get asperl working under Borland
(passes all tests when built under PERL_OBJECT)
p4raw-id: //depot/asperl@809
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -582,7 +582,8 @@ op_free(OP *o) break; #endif /* USE_THREADS */ default: - if (!(o->op_flags & OPf_REF) || (check[o->op_type] != ck_ftst)) + if (!(o->op_flags & OPf_REF) + || (check[o->op_type] != FUNC_NAME_TO_PTR(ck_ftst))) break; /* FALL THROUGH */ case OP_GVSV: |