diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-19 22:17:07 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-19 22:17:07 +0000 |
| commit | 68795e9367de98482c4a5830e6e94b51bd60f4e3 (patch) | |
| tree | ce6632db4435b22ae2f82e511a34f76563752e4a /mg.h | |
| parent | 92110913508b9944d111285d9488f2f7b604919c (diff) | |
| download | perl-68795e9367de98482c4a5830e6e94b51bd60f4e3.tar.gz | |
Nearly-working threads re-structuring. Do not integrate,
submit-ing to get to Win32, and as "off site" backup.
p4raw-id: //depot/perlio@14352
Diffstat (limited to 'mg.h')
| -rw-r--r-- | mg.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -16,6 +16,9 @@ struct mgvtbl { U32 (CPERLscope(*svt_len)) (pTHX_ SV *sv, MAGIC* mg); int (CPERLscope(*svt_clear))(pTHX_ SV *sv, MAGIC* mg); int (CPERLscope(*svt_free)) (pTHX_ SV *sv, MAGIC* mg); + int (CPERLscope(*svt_copy)) (pTHX_ SV *sv, MAGIC* mg, + SV *nsv, const char *name, int namlen); + int (CPERLscope(*svt_dup)) (pTHX_ MAGIC *mg, CLONE_PARAMS *param); }; #endif @@ -33,6 +36,8 @@ struct magic { #define MGf_TAINTEDDIR 1 #define MGf_REFCOUNTED 2 #define MGf_GSKIP 4 +#define MGf_COPY 8 +#define MGf_DUP 16 #define MGf_MINMATCH 1 |