diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-05 17:17:22 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-05 17:17:22 +0000 |
| commit | 5b877257c279c72efd65c092c32959c904c739e8 (patch) | |
| tree | 919d1549e2e3b64da1557bebdfff999658705550 /perl_exp.SH | |
| parent | 049fc1c86dccf1e1a1afcb2acb4ac5e1259cf74b (diff) | |
| download | perl-5b877257c279c72efd65c092c32959c904c739e8.tar.gz | |
AIX threaded build, plus few more on the side.
p4raw-id: //depot/cfgperl@3592
Diffstat (limited to 'perl_exp.SH')
| -rw-r--r-- | perl_exp.SH | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/perl_exp.SH b/perl_exp.SH index 436bfd1e14..f467884ce8 100644 --- a/perl_exp.SH +++ b/perl_exp.SH @@ -77,9 +77,13 @@ fi #cat >>perl.exp <<END #END +case "$usemymalloc" in +true|[yY]*) usemymalloc=define ;; +esac + # Remove mymalloc if needed. case "$usemymalloc$d_mymalloc" in -ydefine) ;; +definedefine) ;; *) egrep -v '^(Perl_(calloc|malloc|malloced_size|mfree|realloc|safexcalloc|safexfree|safexmalloc|safexrealloc)|^PL_malloc_mutex)$' < perl.exp > perl.exp$$ mv -f perl.exp$$ perl.exp @@ -97,9 +101,13 @@ esac egrep -v '^(Perl_my_(bcopy|bzero|chsize|htonl|memcmp|memset|ntohl|swap))$' < perl.exp > perl.exp$$ mv -f perl.exp$$ perl.exp +case "$usethreads" in +true|[yY]*) usethreads=define ;; +esac + # Remove thread symbols if needed. case "$usethreads" in -y) ;; +define) ;; *) egrep -v '^(Perl_(condpair_magic|find_threadsv|magic_mutexfree|new_struct_thread|unlock_condpair)|^PL_((eval|nthreads)_cond|curthr|eval_owner|(cred|eval|strtab|sv|svref|threads|malloc|vtbl)_mutex|nthreads|threadnum|threadsv_names|thr_key|thrsv))$' < perl.exp > perl.exp$$ mv -f perl.exp$$ perl.exp |