Preprocess-Ops v20201117 Perl 5 v5.28.3 i386-freebsd

Status
Pass
From
Chris Williams (BINGOS)
Dist
Preprocess-Ops v20201117
Platform
Perl 5 v5.28.3 i386-freebsd
Date
2020-11-18 15:58:52
ID
f4124730-29b6-11eb-84bc-edd243e66a77
This distribution has been tested as part of the CPAN Testers
project, supporting the Perl programming language.  See
http://wiki.cpantesters.org/ for more information or email
questions to cpan-testers-discuss@perl.org


--

Dear PRBRENAN,

This is a computer-generated error report created automatically by
CPANPLUS, version 0.9908. Testers personal comments may appear
at the end of this report.


Thank you for uploading your work to CPAN.  Congratulations!
All tests were successful.

TEST RESULTS:

Below is the error stack from stage 'make test':

Unable to confirm presence of command: gcc
 at /usr/home/cpan/pit/jail/1738JWl1CX/lib/perl5/Data/Table/Text.pm line 4539, <DATA> line 246.
	Data::Table::Text::confirmHasCommandLineCommand("gcc") called at (eval 50) line 7
	eval 'use warnings FATAL=>qw(all);
use strict;
require v5.26;
use Time::HiRes qw(time);
use Test::More;

my $hasgcc = confirmHasCommandLineCommand(q(gcc));

if ($^O =~ m(bsd|linux)i and $hasgcc)                                           # Only these operating systems are supported
 {plan tests => 7
 }
else
 {plan skip_all => \'Not supported\'
 }

my $startTime = time();
my $localTest = ((caller(1))[0]//\'Preprocess::Ops\') eq "Preprocess::Ops";       # Local testing mode
Test::More->builder->output("/dev/null") if $localTest;                         # Suppress output in local testing mode

sub readCFile($)                                                                # Remove #line number statements from a C file
 {my ($file) = @_;                                                              # C file name
  my $c = readFile($file);
  $c =~ s(#line (\\d+) ".*/(\\w+).c") (#line $1 "$2.c");
  $c =~ s(\\A\\s+) ()s;
  $c =~ s(\\s+\\Z) ()s;
  "$c\\n"
 }

if (88) {                                                                       #Tc
  my $d  = q(zzz);
  my $ds = fpd($d,  qw(source));
  my $dd = fpd($d,  qw(derived));
  my $sc = fpe($ds, qw(node c));
  my $dc = fpe($dd, qw(node c));
  my $dh = fpe($dd, qw(node h));

  owf($sc, <<END);
#include <stdio.h>

typedef struct Node                                                             // Node
 {const struct ProtoTypes_Node *proto;
  int data;
 } Node;

#include "node.h"

static Node by                                                                  // New from node * number
 (const Node * n,                                                               // Node
  const int    i)                                                               // Multiplier
 {return new Node(data: i * n->data);
 }

static void dump                                                                // Dump a node to stdout
 (const Node * n)                                                               // Node to dump
 {printf("data=%d\\\\n", n->data);
 }

int main(void)                                                                  //TnewNode //Tdump //Tby
 {a ◁ new Node(data: 6);
  b ◁ a ▷ by(7);
  b ▷ dump;
  return 0;
 }
END

  my $r = c($sc, $dc, $dh);                                                     # Preprocess source c to get derived c
  my $c = qq((cd $dd; gcc node.c -o a; ./a));
  is_deeply scalar(qx($c)), "data=42\\n";

  is_deeply readCFile($dc), <<\'END\';                                            # Generated base.c
#line 1 "node.c"
#include <stdio.h>

typedef struct Node                                                             // Node
 {const struct ProtoTypes_Node *proto;
  int data;
 } Node;

#include "node.h"

static Node by                                                                  // New from node * number
 (const Node * n,                                                               // Node
  const int    i)                                                               // Multiplier
 {return newNode(({struct Node t = {data: i * n->data, proto: &ProtoTypes_Node}; t;}));
 }

static void dump                                                                // Dump a node to stdout
 (const Node * n)                                                               // Node to dump
 {printf("data=%d\\n", n->data);
 }

int main(void)                                                                  //TnewNode //Tdump //Tby
 {const typeof(newNode(({struct Node t = {data: 6, proto: &ProtoTypes_Node}; t;}))) a = newNode(({struct Node t = {data: 6, proto: &ProtoTypes_Node}; t;}));
  const typeof(a.proto->by(&a, 7)) b = a.proto->by(&a, 7);
  b.proto->dump(&b);
  return 0;
 }
END

  is_deeply readCFile($dh), <<END;                                              # Generated include file
static Node by
 (const Node * n,
  const int    i);
static void dump
 (const Node * n);
int main(void);
struct ProtoTypes_Node {
  Node  (*by)(                                                                  // New from node * number
    const Node * n,                                                             // Node
    const int i);                                                               // Multiplier
  void  (*dump)(                                                                // Dump a node to stdout
    const Node * n);                                                            // Node to dump
 } const ProtoTypes_Node =
{by, dump};
Node newNode(Node allocator) {return allocator;}
END

  clearFolder($d, 10);
 }

if (36) {                                                                       #Tc
  my $d = q(zzz);
  my $c = owf(fpe($d, qw(source c)), <<\'END\');
#include <assert.h>
#include <stdio.h>
int main(void)
 {a ◁ ◉;
a
  b
◉
  ✓ a[0] == \'a\';
  printf("%s", a);
 }
END

  my $h = fpe($d, qw(source  h));
  my $g = fpe($d, qw(derived c));

  my $r = c($c, $g, $h);

  is_deeply scalar(qx(cd $d; gcc derived.c -o a; ./a)), <<END, \'aaaa\';
a
  b
END

  is_deeply readCFile($g), <<\'END\', \'bbbb\';
#line 1 "source.c"
#include <assert.h>
#include <stdio.h>
int main(void)
 {const typeof("a\\n" "  b\\n") a = "a\\n" "  b\\n";
//◉a
//◉  b
//◉
  assert( a[0] == \'a\');
  printf("%s", a);
 }
END
  clearFolder($d, 10);
 }

if (26) {                                                                       #Tc
  my $d = q(zzz);
  my $c = owf(fpe($d, qw(source c)), <<\'END\');
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
int main(void)
 {typedef struct
   {int a;
    int b;
   } S;
  S s; s.a = 1; s.b = 2;
  S t;
    t ≞ s;  ✓ s ≞≞ t;
    t ≞ 0;  ✓ s !≞ t;

  S *ps = &s, *pt = &t;

   t ≞ 0; ✓ t.a == 0;   ✓ t.b == 0;    ✓ pt !◧ s;
  pt ◧ s; ✓ t.a == s.a; ✓ t.b == s.b;  ✓ pt ◧◧ s;

   s ≞ 0; ✓ s.a == 0;   ✓ s.b == 0;    ✓ t !◨ ps;
  ps ◧ t; ✓ s.a == t.a; ✓ s.b == t.b;  ✓ t ◨◨ ps;
  printf(◉);
success
◉
 }
END

  my $h = fpe($d, qw(source  h));
  my $g = fpe($d, qw(derived c));
  my $r = c($c, $g, $h);
  is_deeply scalar(qx(cd $d; gcc -g -Wall derived.c -o a; ./a)), <<END;
success
END
# clearFolder($d, 10);
 }

if (26) {                                                                       #Tc
  my $d = q(zzz);
  my $c = owf(fpe($d, qw(source c)), <<\'END\');
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
int main(void)
 {  a ≋ 12; b ≋ 12; c ≋ 12;
    a ≈ "aaaa";
    b ≈ "bbbb";
    A ◁ c +≈ a; B ◁ A +≈ b;
    C ◁  c ∼ b;

  ✓ a ≈≈ "aaaa";
  ✓ b ≈≈ "bbbb";
  ✓ b !≈ a;
  ✓ c ≈≈ "aaaabbbb";
  ✓ A ≈≈ b;
  ✓ B ≈≈ "";
  ✓ C ≈≈ b;

  printf(◉);
success
◉
 }
END

  my $h = fpe($d, qw(source  h));
  my $g = fpe($d, qw(derived c));
  my $r = c($c, $g, $h);
  is_deeply scalar(qx(cd $d; gcc -g -Wall derived.c -o a; ./a)), <<END;
success
END
# clearFolder($d, 10);
 }

done_testing;
# owf($logC, readCFile($dc));
# owf($logH, readCFile($dh));

if ($localTest)
 {say "TO finished in ", (time() - $startTime), " seconds";
 }

1;
' called at /usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/jKdKAtHXUh/Preprocess-Ops-20201117/blib/lib/Preprocess/Ops.pm line 1316
	Preprocess::Ops::test() called at test.pl line 11
test.pl .. skipped: Not supported
Files=1, Tests=0,  0 wallclock secs ( 0.05 usr  0.01 sys +  0.34 cusr  0.11 csys =  0.50 CPU)
Result: NOTESTS


PREREQUISITES:

Here is a list of prerequisites you specified and versions we
managed to load:

	  Module Name                        Have     Want
	  Carp                               1.50        0
	  Data::Dump                         1.23        0
	  Data::Table::Text              20201030 20201029
	  Test2::API                     1.302183        0
	  Test::More                     1.302183        0

Perl module toolchain versions installed:
	Module Name                        Have
	CPANPLUS                         0.9908
	CPANPLUS::Dist::Build              0.90
	Cwd                                3.75
	ExtUtils::CBuilder             0.280235
	ExtUtils::Command                  7.50
	ExtUtils::Install                  2.18
	ExtUtils::MakeMaker                7.50
	ExtUtils::Manifest                 1.72
	ExtUtils::ParseXS                  3.39
	File::Spec                         3.75
	Module::Build                    0.4231
	Pod::Parser                        1.63
	Pod::Simple                        3.35
	Test2                          1.302183
	Test::Harness                      3.42
	Test::More                     1.302183
	version                          0.9928

******************************** NOTE ********************************
The comments above are created mechanically, possibly without manual
checking by the sender.  As there are many people performing automatic
tests on each upload to CPAN, it is likely that you will receive
identical messages about the same problem.

If you believe that the message is mistaken, please reply to the first
one with correction and/or additional informations, and do not take
it personally.  We appreciate your patience. :)
**********************************************************************

Additional comments:


This report was machine-generated by CPANPLUS::Dist::YACSmoke 1.08.
Powered by minismokebox version 0.68

CPANPLUS is prefering Build.PL

------------------------------
ENVIRONMENT AND OTHER CONTEXT
------------------------------

Environment variables:

    AUTOMATED_TESTING = 1
    NONINTERACTIVE_TESTING = 1
    PATH = /sbin:/bin:/usr/sbin:/usr/bin:/usr/local/sbin:/usr/local/bin:/home/cpan/bin
    PERL5LIB = /usr/home/cpan/pit/jail/1738JWl1CX/lib/perl5:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/v5FrodHbdC/Data-Table-Text-20201030/blib/lib:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/v5FrodHbdC/Data-Table-Text-20201030/blib/arch:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/jKdKAtHXUh/Preprocess-Ops-20201117/blib/lib:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/jKdKAtHXUh/Preprocess-Ops-20201117/blib/arch
    PERL5_CPANPLUS_IS_RUNNING = 33358
    PERL5_CPANPLUS_IS_VERSION = 0.9908
    PERL5_MINISMOKEBOX = 0.68
    PERL5_YACSMOKE_BASE = /usr/home/cpan/pit/bare/conf/perl-5.28.3
    PERL_EXTUTILS_AUTOINSTALL = --defaultdeps
    PERL_LOCAL_LIB_ROOT = /usr/home/cpan/pit/jail/1738JWl1CX
    PERL_MB_OPT = --install_base "/usr/home/cpan/pit/jail/1738JWl1CX"
    PERL_MM_OPT = INSTALL_BASE=/usr/home/cpan/pit/jail/1738JWl1CX
    PERL_MM_USE_DEFAULT = 1
    SHELL = /usr/local/bin/bash
    TERM = screen

Perl special variables (and OS-specific diagnostics, for MSWin32):

    Perl: $^X = /usr/home/cpan/pit/bare/perl-5.28.3/bin/perl
    UID:  $<  = 1002
    EUID: $>  = 1002
    GID:  $(  = 1002 1002
    EGID: $)  = 1002 1002


-------------------------------


--

Summary of my perl5 (revision 5 version 28 subversion 3) configuration:
   
  Platform:
    osname=freebsd
    osvers=12.2-release
    archname=i386-freebsd
    uname='freebsd ffyrc 12.2-release freebsd 12.2-release r366954 generic i386 '
    config_args='-des -Dprefix=/usr/home/cpan/pit/bare/perl-5.28.3'
    hint=recommended
    useposix=true
    d_sigaction=define
    useithreads=undef
    usemultiplicity=undef
    use64bitint=undef
    use64bitall=undef
    uselongdouble=undef
    usemymalloc=n
    default_inc_excludes_dot=define
    bincompat5005=undef
  Compiler:
    cc='cc'
    ccflags ='-DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include'
    optimize='-O2'
    cppflags='-DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include'
    ccversion=''
    gccversion='FreeBSD Clang 10.0.1 (git@github.com:llvm/llvm-project.git llvmorg-10.0.1-0-gef32c611aa2)'
    gccosandvers=''
    intsize=4
    longsize=4
    ptrsize=4
    doublesize=8
    byteorder=1234
    doublekind=3
    d_longlong=define
    longlongsize=8
    d_longdbl=define
    longdblsize=12
    longdblkind=3
    ivtype='long'
    ivsize=4
    nvtype='double'
    nvsize=8
    Off_t='off_t'
    lseeksize=8
    alignbytes=4
    prototype=define
  Linker and Libraries:
    ld='cc'
    ldflags ='-Wl,-E  -fstack-protector-strong -L/usr/local/lib'
    libpth=/usr/lib /usr/local/lib /usr/lib/clang/10.0.1/lib /usr/lib
    libs=-lpthread -lgdbm -ldl -lm -lcrypt -lutil -lc
    perllibs=-lpthread -ldl -lm -lcrypt -lutil -lc
    libc=
    so=so
    useshrplib=false
    libperl=libperl.a
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_dlopen.xs
    dlext=so
    d_dlsymun=undef
    ccdlflags=' '
    cccdlflags='-DPIC -fPIC'
    lddlflags='-shared  -L/usr/local/lib -fstack-protector-strong'


Characteristics of this binary (from libperl): 
  Compile-time options:
    HAS_TIMES
    PERLIO_LAYERS
    PERL_COPY_ON_WRITE
    PERL_DONT_CREATE_GVSV
    PERL_MALLOC_WRAP
    PERL_OP_PARENT
    PERL_PRESERVE_IVUV
    USE_LARGE_FILES
    USE_LOCALE
    USE_LOCALE_COLLATE
    USE_LOCALE_CTYPE
    USE_LOCALE_NUMERIC
    USE_LOCALE_TIME
    USE_PERLIO
    USE_PERL_ATOF
  Locally applied patches:
    Devel::PatchPerl 2.00
  Built under freebsd
  Compiled at Nov  1 2020 05:26:16
  %ENV:
    PERL5LIB="/usr/home/cpan/pit/jail/1738JWl1CX/lib/perl5:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/v5FrodHbdC/Data-Table-Text-20201030/blib/lib:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/v5FrodHbdC/Data-Table-Text-20201030/blib/arch:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/jKdKAtHXUh/Preprocess-Ops-20201117/blib/lib:/usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/jKdKAtHXUh/Preprocess-Ops-20201117/blib/arch"
    PERL5_CPANPLUS_IS_RUNNING="33358"
    PERL5_CPANPLUS_IS_VERSION="0.9908"
    PERL5_MINISMOKEBOX="0.68"
    PERL5_YACSMOKE_BASE="/usr/home/cpan/pit/bare/conf/perl-5.28.3"
    PERL_EXTUTILS_AUTOINSTALL="--defaultdeps"
    PERL_LOCAL_LIB_ROOT="/usr/home/cpan/pit/jail/1738JWl1CX"
    PERL_MB_OPT="--install_base "/usr/home/cpan/pit/jail/1738JWl1CX""
    PERL_MM_OPT="INSTALL_BASE=/usr/home/cpan/pit/jail/1738JWl1CX"
    PERL_MM_USE_DEFAULT="1"
  @INC:
    /usr/home/cpan/pit/jail/1738JWl1CX/lib/perl5/5.28.3/i386-freebsd
    /usr/home/cpan/pit/jail/1738JWl1CX/lib/perl5/5.28.3
    /usr/home/cpan/pit/jail/1738JWl1CX/lib/perl5/i386-freebsd
    /usr/home/cpan/pit/jail/1738JWl1CX/lib/perl5
    /usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/v5FrodHbdC/Data-Table-Text-20201030/blib/lib
    /usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/v5FrodHbdC/Data-Table-Text-20201030/blib/arch
    /usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/jKdKAtHXUh/Preprocess-Ops-20201117/blib/lib
    /usr/home/cpan/pit/bare/conf/perl-5.28.3/.cpanplus/5.28.3/build/jKdKAtHXUh/Preprocess-Ops-20201117/blib/arch
    /usr/home/cpan/pit/bare/perl-5.28.3/lib/site_perl/5.28.3/i386-freebsd
    /usr/home/cpan/pit/bare/perl-5.28.3/lib/site_perl/5.28.3
    /usr/home/cpan/pit/bare/perl-5.28.3/lib/5.28.3/i386-freebsd
    /usr/home/cpan/pit/bare/perl-5.28.3/lib/5.28.3