Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
5 changes: 1 addition & 4 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -25,7 +25,7 @@ You can reach PropEr's developers in the following ways:
We welcome user contributions and feedback (comments, suggestions, feature
requests, bug reports, patches, etc.).

Copyright 2010-2018 by Manolis Papadakis, Eirini Arvaniti and Kostis Sagonas.
Copyright 2010-2019 by Manolis Papadakis, Eirini Arvaniti and Kostis Sagonas.

This program is distributed under the [GPL](http://www.gnu.org/licenses/gpl.html),
version 3 or later. Please see the [COPYING][license] file for details.
Expand Down Expand Up @@ -96,8 +96,6 @@ Quickstart guide
dialyzer PLT. To do the above but also build PropEr's documentation issue
a `make all` call; in that case, you are going to need the `syntax_tools`
application and a recent version of `EDoc`).
Optionally, sfmt-erlang can be selected as an alternative random number
generator using `./configure --use-sfmt` before running `make`.
* If you are using [Homebrew](https://brew.sh), you can simply:

```shell
Expand All @@ -117,7 +115,6 @@ Quickstart guide
```erlang
code:load_abs("/full/path/to/proper").
```
If using the sfmt RNG be sure to add /full/path/to/proper/deps/sfmt too.
* Add the following include line to all source files that contain properties:

```erlang
Expand Down
79 changes: 0 additions & 79 deletions configure

This file was deleted.

13 changes: 3 additions & 10 deletions include/proper_internal.hrl
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
%%% -*- coding: utf-8 -*-
%%% -*- erlang-indent-level: 2 -*-
%%% -------------------------------------------------------------------
%%% Copyright 2010-2018 Manolis Papadakis <manopapad@gmail.com>,
%%% Copyright 2010-2019 Manolis Papadakis <manopapad@gmail.com>,
%%% Eirini Arvaniti <eirinibob@gmail.com>
%%% and Kostis Sagonas <kostis@cs.ntua.gr>
%%%
Expand All @@ -20,7 +20,7 @@
%%% You should have received a copy of the GNU General Public License
%%% along with PropEr. If not, see <http://www.gnu.org/licenses/>.

%%% @copyright 2010-2018 Manolis Papadakis, Eirini Arvaniti and Kostis Sagonas
%%% @copyright 2010-2019 Manolis Papadakis, Eirini Arvaniti and Kostis Sagonas
%%% @version {@version}
%%% @author Manolis Papadakis
%%% @doc Internal header file: This header is included in all PropEr source
Expand All @@ -33,20 +33,13 @@
%% Random generator selection
%%------------------------------------------------------------------------------

-ifdef(USE_SFMT).
-define(RANDOM_MOD, sfmt).
-define(SEED_NAME, sfmt_seed).

-else.

-ifdef(AT_LEAST_19).
-define(RANDOM_MOD, rand). %% for 19.x use the 'rand' module
-define(RANDOM_MOD, rand). %% for 19.x onwards use the 'rand' module
-define(SEED_NAME, rand_seed).
-else.
-define(RANDOM_MOD, random).
-define(SEED_NAME, random_seed).
-endif.
-endif.


%%------------------------------------------------------------------------------
Expand Down
10 changes: 2 additions & 8 deletions src/proper_gen.erl
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
%%% -*- coding: utf-8 -*-
%%% -*- erlang-indent-level: 2 -*-
%%% -------------------------------------------------------------------
%%% Copyright 2010-2017 Manolis Papadakis <manopapad@gmail.com>,
%%% Copyright 2010-2019 Manolis Papadakis <manopapad@gmail.com>,
%%% Eirini Arvaniti <eirinibob@gmail.com>
%%% and Kostis Sagonas <kostis@cs.ntua.gr>
%%%
Expand All @@ -20,7 +20,7 @@
%%% You should have received a copy of the GNU General Public License
%%% along with PropEr. If not, see <http://www.gnu.org/licenses/>.

%%% @copyright 2010-2017 Manolis Papadakis, Eirini Arvaniti and Kostis Sagonas
%%% @copyright 2010-2019 Manolis Papadakis, Eirini Arvaniti and Kostis Sagonas
%%% @version {@version}
%%% @author Manolis Papadakis

Expand Down Expand Up @@ -632,11 +632,6 @@ function_body(Args, RetType, {Seed1,Seed2}) ->
proper_symb:internal_eval(Ret)
end.

-ifdef(USE_SFMT).
update_seed(Seed) ->
_ = sfmt:seed(Seed),
ok.
-else.
-ifdef(AT_LEAST_19).
update_seed(Seed) ->
_ = rand:seed(exsplus, Seed),
Expand All @@ -645,4 +640,3 @@ update_seed(Seed) ->
update_seed(Seed) ->
put(?SEED_NAME, Seed).
-endif.
-endif.