diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-29 22:29:36 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-29 22:29:36 +0000 |
commit | 4929bf7bc76235df307ee4ade0f6222410e8b46b (patch) | |
tree | 2ef7023a0940db572267040f96a32d4b2c3de6fe /pod/perlguts.pod | |
parent | 4b261d929a4c7cbf1234b17cb939dbdb2ff92731 (diff) | |
download | perl-4929bf7bc76235df307ee4ade0f6222410e8b46b.tar.gz |
fix pods to reflect newer canonical names for call_sv() etc.
p4raw-id: //depot/perl@5371
Diffstat (limited to 'pod/perlguts.pod')
-rw-r--r-- | pod/perlguts.pod | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/pod/perlguts.pod b/pod/perlguts.pod index eec6edca8d..2686c3991b 100644 --- a/pod/perlguts.pod +++ b/pod/perlguts.pod @@ -176,7 +176,7 @@ have "magic". See L<Magic Virtual Tables> later in this document. If you know the name of a scalar variable, you can get a pointer to its SV by using the following: - SV* perl_get_sv("package::varname", FALSE); + SV* get_sv("package::varname", FALSE); This returns NULL if the variable does not exist. @@ -287,7 +287,7 @@ then nothing is done. If you know the name of an array variable, you can get a pointer to its AV by using the following: - AV* perl_get_av("package::varname", FALSE); + AV* get_av("package::varname", FALSE); This returns NULL if the variable does not exist. @@ -362,7 +362,7 @@ specified below. If you know the name of a hash variable, you can get a pointer to its HV by using the following: - HV* perl_get_hv("package::varname", FALSE); + HV* get_hv("package::varname", FALSE); This returns NULL if the variable does not exist. @@ -535,9 +535,9 @@ to write: To create a new Perl variable with an undef value which can be accessed from your Perl script, use the following routines, depending on the variable type. - SV* perl_get_sv("package::varname", TRUE); - AV* perl_get_av("package::varname", TRUE); - HV* perl_get_hv("package::varname", TRUE); + SV* get_sv("package::varname", TRUE); + AV* get_av("package::varname", TRUE); + HV* get_hv("package::varname", TRUE); Notice the use of TRUE as the second parameter. The new variable can now be set, using the routines appropriate to the data type. @@ -710,7 +710,7 @@ following code: extern int dberror; extern char *dberror_list; - SV* sv = perl_get_sv("dberror", TRUE); + SV* sv = get_sv("dberror", TRUE); sv_setiv(sv, (IV) dberror); sv_setpv(sv, dberror_list[dberror]); SvIOK_on(sv); |