mirror of
https://github.com/Perl/perl5.git
synced 2026-01-26 16:39:36 +00:00
NETWARE CopFILE_setn
broken since 5.8.9
This commit is contained in:
parent
78465a4bd4
commit
d166b3ad85
2
cop.h
2
cop.h
@ -400,7 +400,7 @@ struct cop {
|
||||
|
||||
# ifdef NETWARE
|
||||
# define CopFILE_set(c,pv) ((c)->cop_file = savepv(pv))
|
||||
# define CopFILE_setn(c,pv,l) ((c)->cop_file = savepv((pv),(l)))
|
||||
# define CopFILE_setn(c,pv,l) ((c)->cop_file = savepvn((pv),(l)))
|
||||
# else
|
||||
# define CopFILE_set(c,pv) ((c)->cop_file = savesharedpv(pv))
|
||||
# define CopFILE_setn(c,pv,l) ((c)->cop_file = savesharedpvn((pv),(l)))
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user