This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Metaconfig unit change for #7962.
authorJarkko Hietaniemi <jhi@iki.fi>
Sun, 3 Dec 2000 17:33:55 +0000 (17:33 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 3 Dec 2000 17:33:55 +0000 (17:33 +0000)
p4raw-id: //depot/metaconfig@7963

U/modified/stdchar.U

index 9b778d6..4530c66 100644 (file)
@@ -12,7 +12,7 @@
 ?RCS: Revision 3.0  1993/08/18  12:09:52  ram
 ?RCS: Baseline for dist 3.0 netwide release.
 ?RCS:
-?MAKE:stdchar: contains Findhdr
+?MAKE:stdchar: contains Findhdr cppstdin cppminus rm
 ?MAKE: -pick add $@ %<
 ?S:stdchar:
 ?S:    This variable conditionally defines STDCHAR to be the type of char
 ?C:.
 ?H:#define STDCHAR $stdchar    /**/
 ?H:.
-?T:stdiohdr
+?F:!stdioh
 : see what type of char stdio uses.
 echo " "
-if $contains 'unsigned.*char.*_ptr;' `./findhdr stdio.h` >/dev/null 2>&1 ; then
+?X: untangle the #include nest
+echo '#include <stdio.h>' | $cppstdin $cppminus > stdioh
+if $contains 'unsigned.*char.*_ptr;' stdioh >/dev/null 2>&1 ; then
        echo "Your stdio uses unsigned chars." >&4
        stdchar="unsigned char"
 else
-       : Solaris 7+, others?
-       stdiohdr=`./findhdr stdio_impl.h`
-       case "$stdiohdr" in
-       '') ;;
-       *)      if $contains 'unsigned.*char.*_ptr;' $stdiohdr >/dev/null 2>&1 ; then
-                       echo "Your stdio uses unsigned chars." >&4
-                       stdchar="unsigned char"
-               else
-                       echo "Your stdio uses signed chars." >&4
-                       stdchar="char"
-               fi
-               ;;
-       esac
+       echo "Your stdio uses signed chars." >&4
+       stdchar="char"
 fi
+$rm -f stdioh
+
+