diff options
author | Hugo van der Sanden <hv@crypt.org> | 2002-08-23 11:02:35 +0000 |
---|---|---|
committer | hv <hv@crypt.org> | 2002-08-23 11:02:35 +0000 |
commit | ba329e04450c9e718e3584348f2d0f15c4762fb6 (patch) | |
tree | 86d59e89495d3393bf78862ecaadffb79a856c5f /universal.c | |
parent | b53307ead6e86d4eafd7cc2ea1c0dbe964e63e43 (diff) | |
download | perl-ba329e04450c9e718e3584348f2d0f15c4762fb6.tar.gz |
fixup threaded build for vstring changes
p4raw-id: //depot/perl@17762
Diffstat (limited to 'universal.c')
-rw-r--r-- | universal.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/universal.c b/universal.c index 486b366f4a..668fa3b34a 100644 --- a/universal.c +++ b/universal.c @@ -414,7 +414,7 @@ XS(XS_version_stringify) lobj = tmp; } else - croak("lobj is not of type version"); + Perl_croak(aTHX_ "lobj is not of type version"); { SV *vs = NEWSV(92,5); @@ -444,7 +444,7 @@ XS(XS_version_numify) lobj = tmp; } else - croak("lobj is not of type version"); + Perl_croak(aTHX_ "lobj is not of type version"); { SV *vs = NEWSV(92,5); @@ -471,7 +471,7 @@ XS(XS_version_vcmp) lobj = tmp; } else - croak("lobj is not of type version"); + Perl_croak(aTHX_ "lobj is not of type version"); { SV *rs; @@ -516,7 +516,7 @@ XS(XS_version_boolean) lobj = tmp; } else - croak("lobj is not of type version"); + Perl_croak(aTHX_ "lobj is not of type version"); { SV *rs; @@ -542,10 +542,10 @@ XS(XS_version_noop) lobj = tmp; } else - croak("lobj is not of type version"); + Perl_croak(aTHX_ "lobj is not of type version"); { - croak("operation not supported with version object"); + Perl_croak(aTHX_ "operation not supported with version object"); } } |