This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perlexperiment: Was missing vlb
[perl5.git] / makedef.pl
index ce203c1..2e55877 100644 (file)
@@ -753,7 +753,7 @@ unless ($define{'USE_QUADMATH'}) {
     foreach (@$embed) {
        my ($flags, $retval, $func, @args) = @$_;
        next unless $func;
-       if (($flags =~ /[AX]/ && $flags !~ $excludedre)
+       if (($flags =~ /[AXC]/ && $flags !~ $excludedre)
             || (!$define{'NO_MATHOMS'} && $flags =~ /b/))
         {
            # public API, so export
@@ -1306,7 +1306,7 @@ if ($ARGS{PLATFORM} eq 'win32') {
     print "LIBRARY $dll\n";
     # The DESCRIPTION module definition file statement is not supported
     # by VC7 onwards.
-    if ($ARGS{CCTYPE} =~ /^(?:MSVC60|GCC)$/) {
+    if ($ARGS{CCTYPE} eq 'GCC') {
        print "DESCRIPTION 'Perl interpreter'\n";
     }
     print "EXPORTS\n";