diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-04-24 08:58:33 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-04-24 08:58:33 +0000 |
| commit | ceda4f9bd200878375d13c58d9a0b95f9d15724b (patch) | |
| tree | 913c9340336ec2c7460d86448ff72503328df6c4 | |
| parent | 8870b5c7e468bf26269024a1229e6ad51bcb3798 (diff) | |
| download | perl-ceda4f9bd200878375d13c58d9a0b95f9d15724b.tar.gz | |
small os390 tweaks (from Peter Prymmer)
p4raw-id: //depot/perl@5930
| -rw-r--r-- | config_h.SH | 2 | ||||
| -rwxr-xr-x | makedepend.SH | 45 |
2 files changed, 31 insertions, 16 deletions
diff --git a/config_h.SH b/config_h.SH index 0f6f19acf7..bf14044dc8 100644 --- a/config_h.SH +++ b/config_h.SH @@ -1212,7 +1212,7 @@ sed <<!GROK!THIS! >config.h -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un- # define STRINGIFY(a) PeRl_StGiFy(a) #endif #if $cpp_stuff != 1 && $cpp_stuff != 42 -#include "Bletch: How does this C preprocessor catenate tokens?" +# include "Bletch: How does this C preprocessor catenate tokens?" #endif /* CPPSTDIN: diff --git a/makedepend.SH b/makedepend.SH index 7129e08a84..9a6f4c19a6 100755 --- a/makedepend.SH +++ b/makedepend.SH @@ -130,22 +130,37 @@ for file in `$cat .clist`; do -e 's|\\$||' \ -e p \ -e '}' ) >UU/$file.c - if [ "$osname" = os390 -a "$file" = perly.c ]; then - $echo '#endif' >>UU/$file.c + if [ "$osname" = os390 ]; then + if [ "$file" = perly.c ]; then + $echo '#endif' >>UU/$file.c + fi + $cppstdin $finc -I. $cppflags $cppminus <UU/$file.c | + $sed \ + -e '/^#.*<stdin>/d' \ + -e '/^#.*"-"/d' \ + -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \ + -e 's/^[ ]*#[ ]*line/#/' \ + -e '/^# *[0-9][0-9]* *[".\/]/!d' \ + -e 's/^.*"\(.*\)".*$/'$filebase'\$(OBJ_EXT): \1/' \ + -e 's/^# *[0-9][0-9]* \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \ + -e 's|: \./|: |' \ + -e 's|\.c\.c|.c|' $uwinfix | \ + $uniq | $sort | $uniq >> .deptmp + else + $cppstdin $finc -I. $cppflags $cppminus <UU/$file.c | + $sed \ + -e '1d' \ + -e '/^#.*<stdin>/d' \ + -e '/^#.*"-"/d' \ + -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \ + -e 's/^[ ]*#[ ]*line/#/' \ + -e '/^# *[0-9][0-9]* *[".\/]/!d' \ + -e 's/^.*"\(.*\)".*$/'$filebase'\$(OBJ_EXT): \1/' \ + -e 's/^# *[0-9][0-9]* \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \ + -e 's|: \./|: |' \ + -e 's|\.c\.c|.c|' $uwinfix | \ + $uniq | $sort | $uniq >> .deptmp fi - $cppstdin $finc -I. $cppflags $cppminus <UU/$file.c | - $sed \ - -e '1d' \ - -e '/^#.*<stdin>/d' \ - -e '/^#.*"-"/d' \ - -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \ - -e 's/^[ ]*#[ ]*line/#/' \ - -e '/^# *[0-9][0-9]* *[".\/]/!d' \ - -e 's/^.*"\(.*\)".*$/'$filebase'\$(OBJ_EXT): \1/' \ - -e 's/^# *[0-9][0-9]* \(.*\)$/'$filebase'\$(OBJ_EXT): \1/' \ - -e 's|: \./|: |' \ - -e 's|\.c\.c|.c|' $uwinfix | \ - $uniq | $sort | $uniq >> .deptmp done $sed <$mf >$mf.new -e '1,/^# AUTOMATICALLY/!d' |