diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-22 17:00:10 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-22 17:00:10 +0000 |
commit | 132efe8bfb7cd0fb1beb15aaf284e33bf44eb1fa (patch) | |
tree | 3b2beed2e18e5ad7945a70f2d79c05ab02f6c1a8 /embed.h | |
parent | 7e51ecd7970e5ab67154a1eb99b2c95004024435 (diff) | |
download | perl-132efe8bfb7cd0fb1beb15aaf284e33bf44eb1fa.tar.gz |
Move the (pseudo)seed functio for (pseudo)random numbers to util.c.
p4raw-id: //depot/perl@19843
Diffstat (limited to 'embed.h')
-rw-r--r-- | embed.h | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -1110,6 +1110,9 @@ #define parse_unicode_opts Perl_parse_unicode_opts #endif #ifdef PERL_CORE +#define seed Perl_seed +#endif +#ifdef PERL_CORE #define report_evil_fh Perl_report_evil_fh #endif #ifdef PERL_CORE @@ -1470,9 +1473,6 @@ #ifdef PERL_CORE #define refto S_refto #endif -#ifdef PERL_CORE -#define seed S_seed -#endif #endif #if defined(PERL_IN_PP_PACK_C) || defined(PERL_DECL_PROT) #ifdef PERL_CORE @@ -3591,6 +3591,9 @@ #define parse_unicode_opts(a) Perl_parse_unicode_opts(aTHX_ a) #endif #ifdef PERL_CORE +#define seed() Perl_seed(aTHX) +#endif +#ifdef PERL_CORE #define report_evil_fh(a,b,c) Perl_report_evil_fh(aTHX_ a,b,c) #endif #ifdef PERL_CORE @@ -3945,9 +3948,6 @@ #ifdef PERL_CORE #define refto(a) S_refto(aTHX_ a) #endif -#ifdef PERL_CORE -#define seed() S_seed(aTHX) -#endif #endif #if defined(PERL_IN_PP_PACK_C) || defined(PERL_DECL_PROT) #ifdef PERL_CORE |