summaryrefslogtreecommitdiff
path: root/pod/perlguts.pod
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-02-29 22:29:36 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-02-29 22:29:36 +0000
commit4929bf7bc76235df307ee4ade0f6222410e8b46b (patch)
tree2ef7023a0940db572267040f96a32d4b2c3de6fe /pod/perlguts.pod
parent4b261d929a4c7cbf1234b17cb939dbdb2ff92731 (diff)
downloadperl-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.pod14
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);