Did you know ... | Search Documentation: |
Packs (add-ons) for SWI-Prolog |
Title: | probat - Property based testing Prolog programs. |
---|---|
Rating: | Not rated. Create the first rating! |
Latest version: | 0.1 |
SHA1 sum: | 824cf934280393056c8d90038ecab8d9ad5d70cc |
Author: | Damiano Azzolini <damiazz94@gmail.com> |
Home page: | https://github.com/damianoazzolini/probat |
No reviews. Create the first review!.
Version | SHA1 | #Downloads | URL |
---|---|---|---|
0.1 | 07a3504b59df46da8972bee9960fc31fcaa4c96c | 1 | https://github.com/damianoazzolini/probat.git |
7e8cc677bae0cbadb8f5bceb24fcf0a3fe3ca5dc | 1 | https://github.com/damianoazzolini/probat.git | |
824cf934280393056c8d90038ecab8d9ad5d70cc | 1 | https://github.com/damianoazzolini/probat.git |
Property based testing Prolog programs (currently only SWI Prolog is supported).
Installation (SWI Prolog only, by now)
pack_install('https://github.com/damianoazzolini/probat.git').
Property based testing: given a property that should always hold, the library generates a number of random input values to check whether the specified property holds.
The library exposes the predicates property_test/0 and property_test/1. The former can be used to run the tests with the default parameters which are:
trials
: 100, (Number of test)depth
: 8, (Max shrink depth)maxLenList
: 32, (Max list length)verbosity
: 1, (Verbosity)minVal
: -2147483648, (Min val to generate)maxVal
: 2147483648, (Max val to generate)
If you want to change the default parameters, the predicate property_test/1 accepts a list where each atom has as name the argument to set (among the specified in the above list) and as argument its value.
For instance, with property_test([trials(10)])
the number of trials is set to 10.
Futhermore, the library tries to perform shrinking, i.e., when an example that violates the property is found, the library tries to found a smaller one, which is possibly more helpful for the programmer.
Add to your source code a set of facts property/1 where the argument is the predicate that describe the property that must be checked and as its argument one of the following types ([x] means implemented, [] not yet implemented):
int
pos_int
(int >= 0)pos_int_no_zero
(int > 0)neg_int
(int =< 0)neg_int_no_zero
(int < 0)float
pos_float
(float >= 0)neg_float
(float =< 0)number
(int or float)var
: variableany
: anythinglist
: list of arbitrary length of arbitrary typeslist(N)
: list of length N of arbitrary typeslist(any,[type])
-> list of arbitrary length of type typelist(N,[type0,type1,...])
: list of length N of only types type0
, type1
, ...list([type0,type1,...])
: list of length of the input list where the first element is of type0
, the second of type1
, and so onlist(2)
: list of length 2 of arbitrary typeslist(any,[int])
: list of arbitrary length of intlist(3,[int,float])
: list of length 3 of only int and floatlist([int,float])
: list of length 2 where the first element is an int and the second a floatlist([list,float])
: list of length 2 where the first element is an arbitrary list and the second a float
You have this program in a file called a.pl
.
:- use_module(library(probat)). % this is the predicate defining the property you want to check always_hold(A,B):- A > 0, B > 0. % with this fact you say that you want to test the property described by always_hold(A,B) when % A and B are both arbitrary integers. property(always_hold(int,int)).
Load it into SWI
$ swipl a.pl
and test the property with property_test/0 (or property_test/1 if you don't like the default values):
?- property_test. Found 1 tests Executing test: always_hold(int,int) Run 100 attempts, 77 failures (0.77 %) Failures list [always_hold(-1,-1),always_hold(-1,0),always_hold(0,-1),always_hold(0,0)] --- FAILED --- --- Summary --- Executed 1 test in 0.007462978363037109 seconds Failed 1 over 1 (1 %) . true.
Further examples can be found into the examples
folder.
This library is based on the quickcheck haskell' library.
Another Prolog library that performs property based testing is:
Pack contains 11 files holding a total of 23.1K bytes.