Select Code to Download

# create-test-files.pl

...
   build_file( $fname, $test_files{$fname} );
   print STDERR "done.\n";
}

package LLiL;
use strict;
...
#   $count =~ /^\d+$/   or die "error: invalid count '$_' (must contai
+n [0-9] only)";

1;

# llil.t
# Simple unit test of get_properties() function in LLiL.pm.
...
   cmp_ok( scalar(%{$href}), '==', 4, "number of items in hash" );
   is_deeply( $href, $expected_href, "hash content" );
}

perl -I . llil.t

prove -v -I . llil.t

> prove -v -I . llil.t
llil.t ..
...
All tests successful.
Files=1, Tests=5,  0 wallclock secs ( 0.00 usr +  0.00 sys =  0.00 CPU
+)
Result: PASS

$ sudo apt-get -y install cmake
$ cd $HOME/local-catch2
...
$ cd Catch2
$ cmake -Bbuild -H. -DBUILD_TESTING=OFF
$ sudo cmake --build build/ --target install

clang++ -o tcatch -std=c++20 -Wall -O3 -I "$HOME/local-parallel-hashma
+p/parallel-hashmap" -I "$HOME/local-boost/boost_1_81_0" -I /usr/local
+/include/catch2 tcatch.cpp /usr/local/lib/libCatch2Main.a /usr/local/
+lib/libCatch2.a

./tcatch --success --durations yes

Randomness seeded to: 640760095

...
0.000 s: Normal tests
======================================================================
+=========
All tests passed (4 assertions in 2 test cases)

// tcatch.cpp
// Example run: ./tcatch --success --durations yes
...
      { str_type { "pearl"     },   42 }
   } ));
}

// get_properties.inl
// Note: str_type, llil_int_type and map_str_int_type are not defined 
+here.
...
   ::fclose(fh);
   return nprop;
}