File 3031-dialyzer-Eliminate-the-race_conditions-opt... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 3031-dialyzer-Eliminate-the-race_conditions-option.patch of Package erlang (Revision f2cb6664a9597ea658e888a53cd508ed)

Currently displaying revision f2cb6664a9597ea658e888a53cd508ed , Show latest

From 74c65fbb588b98ee24df9f7302a43552178dfac2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Wed, 8 Dec 2021 14:56:44 +0100
Subject: [PATCH] dialyzer: Eliminate the `race_conditions` option

The `race_conditions` option has not matured despite having been in
Dialyzer since 2008. Quoting its documentation:

> Notice that the analysis that finds data races performs
  intra-procedural data flow analysis and can sometimes explode in
  time. Enable it at your own risk.

Removing the `race_conditions` option simplifies the Dialyzer code base;
especially the `dialyzer_dataflow` module.
---
 lib/dialyzer/doc/src/dialyzer.xml             |    7 -
 lib/dialyzer/src/Makefile                     |    2 -
 lib/dialyzer/src/dialyzer.app.src             |    2 -
 lib/dialyzer/src/dialyzer.erl                 |    4 -
 lib/dialyzer/src/dialyzer.hrl                 |    5 +-
 .../src/dialyzer_analysis_callgraph.erl       |   11 +-
 lib/dialyzer/src/dialyzer_callgraph.erl       |  158 +-
 lib/dialyzer/src/dialyzer_cl_parse.erl        |    2 -
 lib/dialyzer/src/dialyzer_dataflow.erl        |  354 +--
 lib/dialyzer/src/dialyzer_gui_wx.erl          |    3 -
 lib/dialyzer/src/dialyzer_gui_wx.hrl          |    5 +-
 lib/dialyzer/src/dialyzer_options.erl         |    2 -
 .../src/dialyzer_race_data_server.erl         |  127 -
 lib/dialyzer/src/dialyzer_races.erl           | 2483 -----------------
 .../test/indent_SUITE_data/dialyzer_options   |    2 +-
 .../results/whereis_control_flow1             |    4 -
 .../src/whereis_control_flow1.erl             |   17 -
 .../test/race_SUITE_data/dialyzer_options     |    1 -
 .../race_SUITE_data/results/ets_insert_args1  |    2 -
 .../race_SUITE_data/results/ets_insert_args10 |    2 -
 .../race_SUITE_data/results/ets_insert_args2  |    2 -
 .../race_SUITE_data/results/ets_insert_args3  |    0
 .../race_SUITE_data/results/ets_insert_args4  |    2 -
 .../race_SUITE_data/results/ets_insert_args5  |    2 -
 .../race_SUITE_data/results/ets_insert_args6  |    2 -
 .../race_SUITE_data/results/ets_insert_args7  |    2 -
 .../race_SUITE_data/results/ets_insert_args8  |    2 -
 .../results/ets_insert_control_flow1          |    2 -
 .../results/ets_insert_control_flow2          |    3 -
 .../results/ets_insert_control_flow3          |    3 -
 .../results/ets_insert_control_flow4          |    3 -
 .../results/ets_insert_control_flow5          |    5 -
 .../results/ets_insert_diff_atoms_race1       |    2 -
 .../results/ets_insert_diff_atoms_race2       |    2 -
 .../results/ets_insert_diff_atoms_race3       |    2 -
 .../results/ets_insert_diff_atoms_race4       |    2 -
 .../results/ets_insert_diff_atoms_race5       |    2 -
 .../results/ets_insert_diff_atoms_race6       |    2 -
 .../results/ets_insert_double1                |    4 -
 .../results/ets_insert_double2                |    4 -
 .../race_SUITE_data/results/ets_insert_funs1  |    2 -
 .../race_SUITE_data/results/ets_insert_funs2  |    2 -
 .../race_SUITE_data/results/ets_insert_new    |    0
 .../race_SUITE_data/results/ets_insert_param  |    5 -
 .../race_SUITE_data/results/ets_insert_public |    2 -
 .../results/extract_translations              |    5 -
 .../results/mnesia_diff_atoms_race1           |    2 -
 .../results/mnesia_diff_atoms_race2           |    2 -
 .../results/mnesia_dirty_read_one_write_two   |    2 -
 .../results/mnesia_dirty_read_two_write_one   |    2 -
 .../results/mnesia_dirty_read_write_double1   |    2 -
 .../results/mnesia_dirty_read_write_double2   |    2 -
 .../results/mnesia_dirty_read_write_double3   |    2 -
 .../results/mnesia_dirty_read_write_double4   |    2 -
 .../results/mnesia_dirty_read_write_one       |    2 -
 .../results/mnesia_dirty_read_write_two       |    2 -
 .../results/whereis_control_flow1             |    2 -
 .../results/whereis_control_flow2             |    3 -
 .../results/whereis_control_flow3             |    2 -
 .../results/whereis_control_flow4             |    3 -
 .../results/whereis_control_flow5             |    2 -
 .../results/whereis_control_flow6             |    2 -
 .../results/whereis_diff_atoms_no_race        |    0
 .../results/whereis_diff_atoms_race           |    2 -
 .../results/whereis_diff_functions1           |    3 -
 .../results/whereis_diff_functions1_nested    |    2 -
 .../results/whereis_diff_functions1_pathsens  |    2 -
 .../results/whereis_diff_functions1_twice     |    3 -
 .../results/whereis_diff_functions2           |    2 -
 .../results/whereis_diff_functions2_nested    |    2 -
 .../results/whereis_diff_functions2_pathsens  |    2 -
 .../results/whereis_diff_functions2_twice     |    3 -
 .../results/whereis_diff_functions3           |    2 -
 .../results/whereis_diff_functions3_nested    |    2 -
 .../results/whereis_diff_functions3_pathsens  |    2 -
 .../results/whereis_diff_functions4           |    2 -
 .../results/whereis_diff_functions5           |    2 -
 .../results/whereis_diff_functions6           |    2 -
 .../results/whereis_diff_modules1             |    2 -
 .../results/whereis_diff_modules1_pathsens    |    2 -
 .../results/whereis_diff_modules1_rec         |    2 -
 .../results/whereis_diff_modules2             |    2 -
 .../results/whereis_diff_modules2_pathsens    |    2 -
 .../results/whereis_diff_modules2_rec         |    2 -
 .../results/whereis_diff_modules3             |    2 -
 .../results/whereis_diff_modules_nested       |    2 -
 .../results/whereis_diff_modules_twice        |    3 -
 .../results/whereis_diff_vars_no_race         |    0
 .../results/whereis_diff_vars_race            |    2 -
 .../results/whereis_intra_inter_module1       |    2 -
 .../results/whereis_intra_inter_module2       |    2 -
 .../results/whereis_intra_inter_module3       |    2 -
 .../results/whereis_intra_inter_module4       |    2 -
 .../results/whereis_intra_inter_module5       |    2 -
 .../results/whereis_intra_inter_module6       |    2 -
 .../results/whereis_intra_inter_module7       |    2 -
 .../results/whereis_intra_inter_module8       |    2 -
 .../race_SUITE_data/results/whereis_param     |    2 -
 .../results/whereis_param_inter_module        |    2 -
 .../results/whereis_rec_function1             |    2 -
 .../results/whereis_rec_function2             |    2 -
 .../results/whereis_rec_function3             |    2 -
 .../results/whereis_rec_function4             |    2 -
 .../results/whereis_rec_function5             |    2 -
 .../results/whereis_rec_function6             |    2 -
 .../results/whereis_rec_function7             |    2 -
 .../results/whereis_rec_function8             |    2 -
 .../race_SUITE_data/results/whereis_try_catch |    3 -
 .../race_SUITE_data/results/whereis_vars1     |    0
 .../race_SUITE_data/results/whereis_vars10    |    2 -
 .../race_SUITE_data/results/whereis_vars11    |    0
 .../race_SUITE_data/results/whereis_vars12    |    2 -
 .../race_SUITE_data/results/whereis_vars13    |    2 -
 .../race_SUITE_data/results/whereis_vars14    |    2 -
 .../race_SUITE_data/results/whereis_vars15    |    2 -
 .../race_SUITE_data/results/whereis_vars16    |    2 -
 .../race_SUITE_data/results/whereis_vars17    |    2 -
 .../race_SUITE_data/results/whereis_vars18    |    0
 .../race_SUITE_data/results/whereis_vars19    |    0
 .../race_SUITE_data/results/whereis_vars2     |    2 -
 .../race_SUITE_data/results/whereis_vars20    |    0
 .../race_SUITE_data/results/whereis_vars21    |    0
 .../race_SUITE_data/results/whereis_vars22    |    2 -
 .../race_SUITE_data/results/whereis_vars3     |    2 -
 .../race_SUITE_data/results/whereis_vars4     |    2 -
 .../race_SUITE_data/results/whereis_vars5     |    2 -
 .../race_SUITE_data/results/whereis_vars6     |    2 -
 .../race_SUITE_data/results/whereis_vars7     |    2 -
 .../race_SUITE_data/results/whereis_vars8     |    2 -
 .../race_SUITE_data/results/whereis_vars9     |    2 -
 .../race_SUITE_data/src/ets_insert_args1.erl  |   17 -
 .../race_SUITE_data/src/ets_insert_args10.erl |   19 -
 .../src/ets_insert_args1_suppressed.erl       |   19 -
 .../race_SUITE_data/src/ets_insert_args2.erl  |   17 -
 .../race_SUITE_data/src/ets_insert_args3.erl  |   17 -
 .../race_SUITE_data/src/ets_insert_args4.erl  |   17 -
 .../race_SUITE_data/src/ets_insert_args5.erl  |   17 -
 .../race_SUITE_data/src/ets_insert_args6.erl  |   17 -
 .../race_SUITE_data/src/ets_insert_args7.erl  |   17 -
 .../race_SUITE_data/src/ets_insert_args8.erl  |   16 -
 .../src/ets_insert_control_flow1.erl          |   20 -
 .../src/ets_insert_control_flow2.erl          |   26 -
 .../src/ets_insert_control_flow3.erl          |   31 -
 .../src/ets_insert_control_flow4.erl          |   31 -
 .../src/ets_insert_control_flow5.erl          |   34 -
 .../src/ets_insert_diff_atoms_race1.erl       |   22 -
 .../src/ets_insert_diff_atoms_race2.erl       |   22 -
 .../src/ets_insert_diff_atoms_race3.erl       |   22 -
 .../src/ets_insert_diff_atoms_race4.erl       |   22 -
 .../src/ets_insert_diff_atoms_race5.erl       |   22 -
 .../src/ets_insert_diff_atoms_race6.erl       |   22 -
 .../src/ets_insert_double1.erl                |   28 -
 .../src/ets_insert_double2.erl                |   28 -
 .../race_SUITE_data/src/ets_insert_funs1.erl  |   18 -
 .../race_SUITE_data/src/ets_insert_funs2.erl  |   18 -
 .../race_SUITE_data/src/ets_insert_new.erl    |   15 -
 .../race_SUITE_data/src/ets_insert_param.erl  |   26 -
 .../race_SUITE_data/src/ets_insert_public.erl |   23 -
 .../src/extract_translations.erl              |  293 --
 .../src/mnesia_diff_atoms_race1.erl           |   33 -
 .../src/mnesia_diff_atoms_race2.erl           |   37 -
 .../src/mnesia_dirty_read_one_write_two.erl   |   20 -
 .../src/mnesia_dirty_read_two_write_one.erl   |   20 -
 .../src/mnesia_dirty_read_write_double1.erl   |   25 -
 .../src/mnesia_dirty_read_write_double2.erl   |   25 -
 .../src/mnesia_dirty_read_write_double3.erl   |   25 -
 .../src/mnesia_dirty_read_write_double4.erl   |   25 -
 .../src/mnesia_dirty_read_write_one.erl       |   20 -
 .../src/mnesia_dirty_read_write_two.erl       |   20 -
 .../src/whereis_control_flow1.erl             |   17 -
 .../src/whereis_control_flow2.erl             |   19 -
 .../src/whereis_control_flow3.erl             |   25 -
 .../src/whereis_control_flow4.erl             |   29 -
 .../src/whereis_control_flow5.erl             |   12 -
 .../src/whereis_control_flow6.erl             |   12 -
 .../src/whereis_diff_atoms_no_race.erl        |   23 -
 .../src/whereis_diff_atoms_race.erl           |   34 -
 .../src/whereis_diff_functions1.erl           |   22 -
 .../src/whereis_diff_functions1_nested.erl    |   23 -
 .../src/whereis_diff_functions1_pathsens.erl  |   32 -
 .../src/whereis_diff_functions1_twice.erl     |   30 -
 .../src/whereis_diff_functions2.erl           |   25 -
 .../src/whereis_diff_functions2_nested.erl    |   20 -
 .../src/whereis_diff_functions2_pathsens.erl  |   29 -
 .../src/whereis_diff_functions2_twice.erl     |   27 -
 .../src/whereis_diff_functions3.erl           |   11 -
 .../src/whereis_diff_functions3_nested.erl    |   21 -
 .../src/whereis_diff_functions3_pathsens.erl  |   29 -
 .../src/whereis_diff_functions4.erl           |   32 -
 .../src/whereis_diff_functions5.erl           |   22 -
 .../src/whereis_diff_functions6.erl           |   29 -
 .../whereis_diff_modules1.erl                 |   16 -
 .../whereis_diff_modules2.erl                 |   11 -
 .../whereis_diff_modules1_pathsens.erl        |   26 -
 .../whereis_diff_modules2_pathsens.erl        |   12 -
 .../whereis_diff_modules1_rec.erl             |   22 -
 .../whereis_diff_modules2_rec.erl             |    8 -
 .../whereis_diff_modules3.erl                 |    8 -
 .../whereis_diff_modules4.erl                 |   11 -
 .../whereis_diff_modules3_pathsens.erl        |   25 -
 .../whereis_diff_modules4_pathsens.erl        |   13 -
 .../whereis_diff_modules3_rec.erl             |   25 -
 .../whereis_diff_modules4_rec.erl             |    8 -
 .../whereis_diff_modules5.erl                 |   23 -
 .../whereis_diff_modules6.erl                 |   11 -
 .../whereis_diff_modules1_nested.erl          |   14 -
 .../whereis_diff_modules2_nested.erl          |   11 -
 .../whereis_diff_modules3_nested.erl          |   11 -
 .../whereis_diff_modules1_twice.erl           |   21 -
 .../whereis_diff_modules2_twice.erl           |   11 -
 .../src/whereis_diff_vars_no_race.erl         |   13 -
 .../src/whereis_diff_vars_race.erl            |   19 -
 .../whereis_intra_inter_module1.erl           |   19 -
 .../whereis_intra_inter_module2.erl           |   11 -
 .../whereis_intra_inter_module3.erl           |   16 -
 .../whereis_intra_inter_module4.erl           |   14 -
 .../whereis_intra_inter_module5.erl           |   19 -
 .../whereis_intra_inter_module6.erl           |   14 -
 .../whereis_intra_inter_module7.erl           |   11 -
 .../whereis_intra_inter_module8.erl           |   13 -
 .../whereis_intra_inter_module10.erl          |   16 -
 .../whereis_intra_inter_module9.erl           |   11 -
 .../whereis_intra_inter_module11.erl          |   27 -
 .../whereis_intra_inter_module12.erl          |   14 -
 .../whereis_intra_inter_module13.erl          |   19 -
 .../whereis_intra_inter_module14.erl          |   22 -
 .../whereis_intra_inter_module15.erl          |   19 -
 .../whereis_intra_inter_module16.erl          |   22 -
 .../race_SUITE_data/src/whereis_param.erl     |   16 -
 .../whereis_param_inter_module1.erl           |    8 -
 .../whereis_param_inter_module2.erl           |   13 -
 .../src/whereis_rec_function1.erl             |   19 -
 .../src/whereis_rec_function2.erl             |   24 -
 .../src/whereis_rec_function3.erl             |   27 -
 .../src/whereis_rec_function4.erl             |   27 -
 .../src/whereis_rec_function5.erl             |   21 -
 .../src/whereis_rec_function6.erl             |   24 -
 .../src/whereis_rec_function7.erl             |   19 -
 .../src/whereis_rec_function8.erl             |   22 -
 .../race_SUITE_data/src/whereis_try_catch.erl |   25 -
 .../race_SUITE_data/src/whereis_vars1.erl     |   17 -
 .../race_SUITE_data/src/whereis_vars10.erl    |   22 -
 .../race_SUITE_data/src/whereis_vars11.erl    |   22 -
 .../race_SUITE_data/src/whereis_vars12.erl    |   22 -
 .../race_SUITE_data/src/whereis_vars13.erl    |   22 -
 .../race_SUITE_data/src/whereis_vars14.erl    |   22 -
 .../race_SUITE_data/src/whereis_vars15.erl    |   23 -
 .../race_SUITE_data/src/whereis_vars16.erl    |   23 -
 .../race_SUITE_data/src/whereis_vars17.erl    |   23 -
 .../race_SUITE_data/src/whereis_vars18.erl    |   22 -
 .../race_SUITE_data/src/whereis_vars19.erl    |   23 -
 .../race_SUITE_data/src/whereis_vars2.erl     |   18 -
 .../race_SUITE_data/src/whereis_vars20.erl    |   22 -
 .../race_SUITE_data/src/whereis_vars21.erl    |   23 -
 .../race_SUITE_data/src/whereis_vars22.erl    |   27 -
 .../race_SUITE_data/src/whereis_vars3.erl     |   18 -
 .../race_SUITE_data/src/whereis_vars4.erl     |   18 -
 .../race_SUITE_data/src/whereis_vars5.erl     |   22 -
 .../race_SUITE_data/src/whereis_vars6.erl     |   22 -
 .../race_SUITE_data/src/whereis_vars7.erl     |   22 -
 .../race_SUITE_data/src/whereis_vars8.erl     |   22 -
 .../race_SUITE_data/src/whereis_vars9.erl     |   22 -
 262 files changed, 66 insertions(+), 6327 deletions(-)
 delete mode 100644 lib/dialyzer/src/dialyzer_race_data_server.erl
 delete mode 100644 lib/dialyzer/src/dialyzer_races.erl
 delete mode 100644 lib/dialyzer/test/indent_SUITE_data/results/whereis_control_flow1
 delete mode 100644 lib/dialyzer/test/indent_SUITE_data/src/whereis_control_flow1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/dialyzer_options
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args10
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args6
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args7
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_args8
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race6
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_double1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_double2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_new
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_param
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/ets_insert_public
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/extract_translations
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_one_write_two
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_two_write_one
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_one
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_two
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow6
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_atoms_no_race
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_atoms_race
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_nested
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_pathsens
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_twice
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_nested
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_pathsens
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_twice
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_nested
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_pathsens
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions6
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_pathsens
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_rec
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_pathsens
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_rec
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_nested
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_twice
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_vars_no_race
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_diff_vars_race
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module6
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module7
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module8
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_param
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_param_inter_module
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function6
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function7
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function8
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_try_catch
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars1
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars10
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars11
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars12
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars13
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars14
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars15
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars16
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars17
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars18
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars19
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars2
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars20
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars21
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars22
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars3
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars4
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars5
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars6
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars7
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars8
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/results/whereis_vars9
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args10.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1_suppressed.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args7.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_args8.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_double1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_double2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_new.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_param.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/ets_insert_public.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/extract_translations.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_one_write_two.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_two_write_one.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_one.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_two.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_no_race.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_race.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_nested.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_pathsens.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_twice.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_nested.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_pathsens.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_twice.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_nested.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_pathsens.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules1_pathsens.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules2_pathsens.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules1_rec.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules2_rec.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules3_pathsens.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules4_pathsens.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules3_rec.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules4_rec.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules1_nested.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules2_nested.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules3_nested.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules1_twice.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules2_twice.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_no_race.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_race.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module7.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module8.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module10.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module9.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module11.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module12.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module13.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module14.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module15.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module16.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_param.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function7.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function8.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_try_catch.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars1.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars10.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars11.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars12.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars13.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars14.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars15.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars16.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars17.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars18.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars19.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars2.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars20.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars21.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars22.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars3.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars4.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars5.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars6.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars7.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars8.erl
 delete mode 100644 lib/dialyzer/test/race_SUITE_data/src/whereis_vars9.erl

diff --git a/lib/dialyzer/doc/src/dialyzer.xml b/lib/dialyzer/doc/src/dialyzer.xml
index 1b111b73ba..95778b7341 100644
--- a/lib/dialyzer/doc/src/dialyzer.xml
+++ b/lib/dialyzer/doc/src/dialyzer.xml
@@ -372,13 +372,6 @@ dialyzer --plts plt_1 ... plt_n -- files_to_analyze</code>
 <item>
 Suppress warnings for unused functions.
 </item>
- <tag><c>-Wrace_conditions</c> (***)</tag>
- <item>
- Include warnings for possible race conditions. Notice that the
- analysis that finds data races performs intra-procedural data flow
- analysis and can sometimes explode in time. Enable it at your own
- risk.
- </item>
 <tag><c>-Wunderspecs</c> (***)</tag>
 <item>
 Warn about underspecified functions (the specification is strictly
diff --git a/lib/dialyzer/src/Makefile b/lib/dialyzer/src/Makefile
index 5e69bd147e..df540a431b 100644
--- a/lib/dialyzer/src/Makefile
+++ b/lib/dialyzer/src/Makefile
@@ -64,8 +64,6 @@ MODULES = \
 	dialyzer_gui_wx \
 	dialyzer_options \
 	dialyzer_plt \
-	dialyzer_race_data_server \
-	dialyzer_races \
 	dialyzer_succ_typings \
 	dialyzer_timing \
 	dialyzer_typesig \
diff --git a/lib/dialyzer/src/dialyzer.app.src b/lib/dialyzer/src/dialyzer.app.src
index 93d004d2e7..cc340a7fd9 100644
--- a/lib/dialyzer/src/dialyzer.app.src
+++ b/lib/dialyzer/src/dialyzer.app.src
@@ -40,8 +40,6 @@
 	 dialyzer_gui_wx,
 	 dialyzer_options,
 	 dialyzer_plt,
-	 dialyzer_race_data_server,
-	 dialyzer_races,
 	 dialyzer_succ_typings,
 	 dialyzer_typesig,
 	 dialyzer_utils,
diff --git a/lib/dialyzer/src/dialyzer.erl b/lib/dialyzer/src/dialyzer.erl
index 32dcb25544..255407792f 100644
--- a/lib/dialyzer/src/dialyzer.erl
+++ b/lib/dialyzer/src/dialyzer.erl
@@ -503,10 +503,6 @@ message_to_string({opaque_size, [SizeType, Size]}, I, _E) ->
 message_to_string({opaque_call, [M, F, Args, Culprit, OpaqueType]}, I, _E) ->
 io_lib:format("The call ~s:~ts~ts breaks the opacity of the term ~ts :: ~ts\n",
 [M, F, a(Args, I), c(Culprit, I), t(OpaqueType, I)]);
-%%----- Warnings for concurrency errors --------------------
-message_to_string({race_condition, [M, F, Args, Reason]}, I, _E) ->
- %% There is a possibly huge type in Reason.
- io_lib:format("The call ~w:~tw~ts ~ts\n", [M, F, a(Args, I), Reason]);
 %%----- Warnings for behaviour errors --------------------
 message_to_string({callback_type_mismatch, [B, F, A, ST, CT]}, I, _E) ->
 io_lib:format("The inferred return type of ~tw/~w ~ts has nothing in"
diff --git a/lib/dialyzer/src/dialyzer.hrl b/lib/dialyzer/src/dialyzer.hrl
index 26ba0afea4..9338d76ef2 100644
--- a/lib/dialyzer/src/dialyzer.hrl
+++ b/lib/dialyzer/src/dialyzer.hrl
@@ -52,7 +52,6 @@
 -define(WARN_CONTRACT_RANGE, warn_contract_range).
 -define(WARN_CALLGRAPH, warn_callgraph).
 -define(WARN_UNMATCHED_RETURN, warn_umatched_return).
--define(WARN_RACE_CONDITION, warn_race_condition).
 -define(WARN_BEHAVIOUR, warn_behaviour).
 -define(WARN_UNDEFINED_CALLBACK, warn_undefined_callbacks).
 -define(WARN_UNKNOWN, warn_unknown).
@@ -71,7 +70,7 @@
 | ?WARN_FUN_APP | ?WARN_MAP_CONSTRUCTION
 | ?WARN_MATCHING | ?WARN_NON_PROPER_LIST
 | ?WARN_NOT_CALLED | ?WARN_OPAQUE
- | ?WARN_RACE_CONDITION | ?WARN_RETURN_NO_RETURN
+ | ?WARN_RETURN_NO_RETURN
 | ?WARN_RETURN_ONLY_EXIT | ?WARN_UNDEFINED_CALLBACK
 | ?WARN_UNKNOWN | ?WARN_UNMATCHED_RETURN.
 
@@ -126,7 +125,6 @@
 | 'no_undefined_callbacks'
 | 'no_underspecs'
 | 'no_unused'
- | 'race_conditions'
 | 'underspecs'
 | 'unknown'
 | 'unmatched_returns'
@@ -180,7 +178,6 @@
 		 start_from = byte_code	 :: start_from(),
 		 plt :: dialyzer_plt:plt(),
 		 use_contracts = true :: boolean(),
-		 race_detection = false	 :: boolean(),
 		 behaviours_chk = false :: boolean(),
 		 timing = false :: boolean() | 'debug',
 		 timing_server = none :: dialyzer_timing:timing_server(),
diff --git a/lib/dialyzer/src/dialyzer_analysis_callgraph.erl b/lib/dialyzer/src/dialyzer_analysis_callgraph.erl
index de03192c47..75da4457dd 100644
--- a/lib/dialyzer/src/dialyzer_analysis_callgraph.erl
+++ b/lib/dialyzer/src/dialyzer_analysis_callgraph.erl
@@ -68,9 +68,8 @@
 
 start(Parent, LegalWarnings, Analysis) ->
 TimingServer = dialyzer_timing:init(Analysis#analysis.timing),
- RacesOn = ordsets:is_element(?WARN_RACE_CONDITION, LegalWarnings),
 Analysis0 =
- Analysis#analysis{race_detection = RacesOn, timing_server = TimingServer},
+ Analysis#analysis{timing_server = TimingServer},
 Analysis1 = expand_files(Analysis0),
 Analysis2 = run_analysis(Analysis1, LegalWarnings),
 State = #server_state{parent = Parent},
@@ -145,17 +144,11 @@ analysis_start(Parent, Analysis, LegalWarnings) ->
 Exports = dialyzer_codeserver:get_exports(NewCServer),
 NonExports = sets:subtract(sets:from_list(AllNodes, [{version, 2}]), Exports),
 NonExportsList = sets:to_list(NonExports),
- NewCallgraph =
- case Analysis#analysis.race_detection of
- true -> dialyzer_callgraph:put_race_detection(true, Callgraph);
- false -> Callgraph
- end,
- State2 = analyze_callgraph(NewCallgraph, State1),
+ State2 = analyze_callgraph(Callgraph, State1),
 #analysis_state{plt = Plt2,
 doc_plt = DocPlt,
 codeserver = Codeserver0} = State2,
 {Codeserver, Plt3} = move_data(Codeserver0, Plt2),
- dialyzer_callgraph:dispose_race_server(NewCallgraph),
 %% Since the PLT is never used, a dummy is sent:
 DummyPlt = dialyzer_plt:new(),
 send_codeserver_plt(Parent, Codeserver, DummyPlt),
diff --git a/lib/dialyzer/src/dialyzer_callgraph.erl b/lib/dialyzer/src/dialyzer_callgraph.erl
index 506a785885..f610cb0b2c 100644
--- a/lib/dialyzer/src/dialyzer_callgraph.erl
+++ b/lib/dialyzer/src/dialyzer_callgraph.erl
@@ -42,9 +42,6 @@
 	 get_depends_on/2,
 	 %% get_required_by/2,
 	 in_neighbours/2,
-	 renew_race_info/4,
-	 renew_race_code/2,
-	 renew_race_public_tables/2,
 	 reset_from_funs/2,
 	 scan_core_tree/2,
 	 strip_module_deps/2,
@@ -52,12 +49,6 @@
 	 to_dot/2,
 	 to_ps/3]).
 
--export([cleanup/1, get_digraph/1, get_named_tables/1, get_public_tables/1,
- get_race_code/1, get_race_detection/1, race_code_new/1,
- put_digraph/2, put_race_code/2, put_race_detection/2,
- put_named_tables/2, put_public_tables/2, put_behaviour_api_calls/2,
-	 get_behaviour_api_calls/1, dispose_race_server/1, duplicate/1]).
-
 -export_type([callgraph/0, mfa_or_funlbl/0, callgraph_edge/0, mod_deps/0]).
 
 -include("dialyzer.hrl").
@@ -89,24 +80,15 @@
 %%		 whenever applicable.
 %%-----------------------------------------------------------------------------
 
-%% Types with comment 'race' are due to dialyzer_races.erl.
 -record(callgraph, {digraph = digraph:new() :: digraph:graph(),
-		 active_digraph :: active_digraph()
- | 'undefined', % race
- esc	 :: ets:tid()
- | 'undefined', % race
- letrec_map :: ets:tid()
- | 'undefined', % race
+		 active_digraph :: active_digraph() | 'undefined',
+ esc	 :: ets:tid(),
+ letrec_map :: ets:tid(),
 name_map	 :: ets:tid(),
 rev_name_map :: ets:tid(),
- rec_var_map :: ets:tid()
- | 'undefined', % race
- self_rec	 :: ets:tid()
- | 'undefined', % race
- calls :: ets:tid()
- | 'undefined', % race
- race_detection = false :: boolean(),
-		 race_data_server = dialyzer_race_data_server:new() :: pid()}).
+ rec_var_map :: ets:tid(),
+ self_rec	 :: ets:tid(),
+ calls :: ets:tid()}).
 
 %% Exported Types
 
@@ -620,134 +602,6 @@ digraph_reaching_subgraph(Funs, DG) ->
 Vertices = digraph_utils:reaching(Funs, DG),
 digraph_utils:subgraph(DG, Vertices).
 
-%%----------------------------------------------------------------------
-%% Races
-%%----------------------------------------------------------------------
-
--spec renew_race_info(callgraph(), dict:dict(), [label()], [string()]) ->
- callgraph().
-
-renew_race_info(#callgraph{race_data_server = RaceDataServer} = CG,
-		RaceCode, PublicTables, NamedTables) ->
- ok = dialyzer_race_data_server:cast(
-	 {renew_race_info, {RaceCode, PublicTables, NamedTables}},
-	 RaceDataServer),
- CG.
-
--spec renew_race_code(dialyzer_races:races(), callgraph()) -> callgraph().
-
-renew_race_code(Races, #callgraph{race_data_server = RaceDataServer} = CG) ->
- Fun = dialyzer_races:get_curr_fun(Races),
- FunArgs = dialyzer_races:get_curr_fun_args(Races),
- Code = lists:reverse(dialyzer_races:get_race_list(Races)),
- ok = dialyzer_race_data_server:cast(
-	 {renew_race_code, {Fun, FunArgs, Code}},
-	 RaceDataServer),
- CG.
-
--spec renew_race_public_tables(label(), callgraph()) -> callgraph().
-
-renew_race_public_tables(VarLabel,
-			 #callgraph{race_data_server = RaceDataServer} = CG) ->
- ok =
- dialyzer_race_data_server:cast({renew_race_public_tables, VarLabel}, RaceDataServer),
- CG.
-
--spec cleanup(callgraph()) -> callgraph().
-
-cleanup(#callgraph{digraph = Digraph,
- name_map = NameMap,
- rev_name_map = RevNameMap,
-		 race_data_server = RaceDataServer}) ->
- #callgraph{digraph = Digraph,
-	 name_map = NameMap,
- rev_name_map = RevNameMap,
-	 race_data_server = dialyzer_race_data_server:duplicate(RaceDataServer)}.
-
--spec duplicate(callgraph()) -> callgraph().
-
-duplicate(#callgraph{race_data_server = RaceDataServer} = Callgraph) ->
- Callgraph#callgraph{
- race_data_server = dialyzer_race_data_server:duplicate(RaceDataServer)}.
-
--spec dispose_race_server(callgraph()) -> ok.
-
-dispose_race_server(#callgraph{race_data_server = RaceDataServer}) ->
- dialyzer_race_data_server:stop(RaceDataServer).
-
--spec get_digraph(callgraph()) -> digraph:graph().
-
-get_digraph(#callgraph{digraph = Digraph}) ->
- Digraph.
-
--spec get_named_tables(callgraph()) -> [string()].
-
-get_named_tables(#callgraph{race_data_server = RaceDataServer}) ->
- dialyzer_race_data_server:call(get_named_tables, RaceDataServer).
-
--spec get_public_tables(callgraph()) -> [label()].
-
-get_public_tables(#callgraph{race_data_server = RaceDataServer}) ->
- dialyzer_race_data_server:call(get_public_tables, RaceDataServer).
-
--spec get_race_code(callgraph()) -> dict:dict().
-
-get_race_code(#callgraph{race_data_server = RaceDataServer}) ->
- dialyzer_race_data_server:call(get_race_code, RaceDataServer).
-
--spec get_race_detection(callgraph()) -> boolean().
-
-get_race_detection(#callgraph{race_detection = RD}) ->
- RD.
-
--spec get_behaviour_api_calls(callgraph()) -> [{mfa(), mfa()}].
-
-get_behaviour_api_calls(#callgraph{race_data_server = RaceDataServer}) ->
- dialyzer_race_data_server:call(get_behaviour_api_calls, RaceDataServer).
-
--spec race_code_new(callgraph()) -> callgraph().
-
-race_code_new(#callgraph{race_data_server = RaceDataServer} = CG) ->
- ok = dialyzer_race_data_server:cast(race_code_new, RaceDataServer),
- CG.
-
--spec put_digraph(digraph:graph(), callgraph()) -> callgraph().
-
-put_digraph(Digraph, Callgraph) ->
- Callgraph#callgraph{digraph = Digraph}.
-
--spec put_race_code(dict:dict(), callgraph()) -> callgraph().
-
-put_race_code(RaceCode, #callgraph{race_data_server = RaceDataServer} = CG) ->
- ok = dialyzer_race_data_server:cast({put_race_code, RaceCode}, RaceDataServer),
- CG.
-
--spec put_race_detection(boolean(), callgraph()) -> callgraph().
-
-put_race_detection(RaceDetection, Callgraph) ->
- Callgraph#callgraph{race_detection = RaceDetection}.
-
--spec put_named_tables([string()], callgraph()) -> callgraph().
-
-put_named_tables(NamedTables,
-		 #callgraph{race_data_server = RaceDataServer} = CG) ->
- ok = dialyzer_race_data_server:cast({put_named_tables, NamedTables}, RaceDataServer),
- CG.
-
--spec put_public_tables([label()], callgraph()) -> callgraph().
-
-put_public_tables(PublicTables,
-		 #callgraph{race_data_server = RaceDataServer} = CG) ->
- ok = dialyzer_race_data_server:cast({put_public_tables, PublicTables}, RaceDataServer),
- CG.
-
--spec put_behaviour_api_calls([{mfa(), mfa()}], callgraph()) -> callgraph().
-
-put_behaviour_api_calls(Calls,
-		 #callgraph{race_data_server = RaceDataServer} = CG) ->
- ok = dialyzer_race_data_server:cast({put_behaviour_api_calls, Calls}, RaceDataServer),
- CG.
-
 %%=============================================================================
 %% Utilities for 'dot'
 %%=============================================================================
diff --git a/lib/dialyzer/src/dialyzer_cl_parse.erl b/lib/dialyzer/src/dialyzer_cl_parse.erl
index ff7930f21a..b78bfd442d 100644
--- a/lib/dialyzer/src/dialyzer_cl_parse.erl
+++ b/lib/dialyzer/src/dialyzer_cl_parse.erl
@@ -544,8 +544,6 @@ warning_options_msg() ->
 value or do not match against one of many possible return value(s).
 -Werror_handling ***
 Include warnings for functions that only return by means of an exception.
- -Wrace_conditions ***
- Include warnings for possible race conditions.
 -Wunderspecs ***
 Warn about underspecified functions
 (those whose -spec is strictly more allowing than the success typing).
diff --git a/lib/dialyzer/src/dialyzer_dataflow.erl b/lib/dialyzer/src/dialyzer_dataflow.erl
index 63b430671c..b333b67ab2 100644
--- a/lib/dialyzer/src/dialyzer_dataflow.erl
+++ b/lib/dialyzer/src/dialyzer_dataflow.erl
@@ -24,16 +24,6 @@
 
 -export([get_fun_types/5, get_warnings/5, format_args/3]).
 
-%% Data structure interfaces.
--export([state__add_warning/2, state__cleanup/1,
-	 state__duplicate/1, dispose_state/1,
- state__get_callgraph/1, state__get_races/1,
- state__get_records/1, state__put_callgraph/2,
- state__put_races/2, state__records_only/1,
- state__find_function/2]).
-
--export_type([state/0]).
-
 -include("dialyzer.hrl").
 
 -import(erl_types,
@@ -89,31 +79,19 @@
 
 -define(BITS, 128).
 
-%% Types with comment 'race' are due to dialyzer_races.erl.
--record(state, {callgraph :: dialyzer_callgraph:callgraph()
- | 'undefined', % race
- codeserver :: dialyzer_codeserver:codeserver()
- | 'undefined', % race
-		envs :: env_tab()
- | 'undefined', % race
-		fun_tab		 :: fun_tab()
- | 'undefined', % race
- fun_homes :: dict:dict(label(), mfa())
- | 'undefined', % race
- reachable_funs :: sets:set(label())
- | 'undefined', % race
-		plt		 :: dialyzer_plt:plt()
- | 'undefined', % race
-		opaques :: [type()]
- | 'undefined', % race
-		races = dialyzer_races:new() :: dialyzer_races:races(),
+-record(state, {callgraph :: dialyzer_callgraph:callgraph(),
+ codeserver :: dialyzer_codeserver:codeserver(),
+ envs :: env_tab(),
+ fun_tab		 :: fun_tab(),
+ fun_homes :: dict:dict(label(), mfa()),
+ reachable_funs :: sets:set(label()),
+ plt		 :: dialyzer_plt:plt(),
+ opaques :: [type()],
 		records = dict:new() :: types(),
-		tree_map	 :: dict:dict(label(), cerl:cerl())
- | 'undefined', % race
+ tree_map	 :: dict:dict(label(), cerl:cerl()),
 		warning_mode = false :: boolean(),
 		warnings = [] :: [raw_warning()],
-		work :: {[_], [_], sets:set()}
- | 'undefined', % race
+ work :: {[_], [_], sets:set()},
 		module :: module(),
 curr_fun :: curr_fun()
 }).
@@ -132,9 +110,7 @@
 -type type_tab() :: #{key() => type()}.
 -type subst_tab() :: #{key() => cerl:cerl()}.
 
-%% Exported Types
-
--opaque state() :: #state{}.
+-type state() :: #state{}.
 
 %%--------------------------------------------------------------------
 
@@ -149,8 +125,7 @@
 get_warnings(Tree, Plt, Callgraph, Codeserver, Records) ->
 State1 = analyze_module(Tree, Plt, Callgraph, Codeserver, Records, true),
 State2 = state__renew_warnings(state__get_warnings(State1), State1),
- State3 = state__get_race_warnings(State2),
- {State3#state.warnings, state__all_fun_types(State3)}.
+ {State2#state.warnings, state__all_fun_types(State2)}.
 
 -spec get_fun_types(cerl:c_module(), dialyzer_plt:plt(),
 dialyzer_callgraph:callgraph(),
@@ -172,15 +147,13 @@ analyze_module(Tree, Plt, Callgraph, Codeserver, Records, GetWarnings) ->
 Module = cerl:atom_val(cerl:module_name(Tree)),
 TopFun = cerl:ann_c_fun([{label, top}], [], Tree),
 State = state__new(Callgraph, Codeserver, TopFun, Plt, Module, Records),
- State1 = state__race_analysis(not GetWarnings, State),
- State2 = analyze_loop(State1),
+ State1 = analyze_loop(State),
 case GetWarnings of
 true ->
- State3 = state__set_warning_mode(State2),
- State4 = analyze_loop(State3),
- dialyzer_races:race(State4);
+ State2 = state__set_warning_mode(State1),
+ analyze_loop(State2);
 false ->
- State2
+ State1
 end.
 
 analyze_loop(State) ->
@@ -209,32 +182,16 @@ analyze_loop(State) ->
 	 Vars = cerl:fun_vars(Fun),
 	 Map1 = enter_type_lists(Vars, ArgTypes, Map),
 	 Body = cerl:fun_body(Fun),
- FunLabel = get_label(Fun),
-	 IsRaceAnalysisEnabled = is_race_analysis_enabled(State),
- NewState3 =
- case IsRaceAnalysisEnabled of
- true ->
- NewState2 = state__renew_curr_fun(
- state__lookup_name(FunLabel, NewState1), FunLabel,
- NewState1),
- state__renew_race_list([], 0, NewState2);
-		 false -> NewState1
- end,
-	 {NewState4, _Map2, BodyType} =
-		traverse(Body, Map1, NewState3),
+	 {NewState2, _Map2, BodyType} =
+		traverse(Body, Map1, NewState1),
 	 ?debug("Done analyzing: ~w:~ts\n",
 		 [NewState1#state.curr_fun,
 		 t_to_string(t_fun(ArgTypes, BodyType))]),
- NewState5 =
- case IsRaceAnalysisEnabled of
- true -> renew_race_code(NewState4);
- false -> NewState4
- end,
- NewState6 =
- state__update_fun_entry(Fun, ArgTypes, BodyType, NewState5),
+ NewState3 =
+ state__update_fun_entry(Fun, ArgTypes, BodyType, NewState2),
 ?debug("done adding stuff for ~tw\n",
 [state__lookup_name(get_label(Fun), State)]),
- analyze_loop(NewState6)
+ analyze_loop(NewState3)
 	 end
 end
 end.
@@ -544,16 +501,6 @@ handle_apply_or_call([{TypeOfApply, {Fun, Sig, Contr, LocalRet}}|Left],
 ?debug("ContrRet: ~ts\n", [erl_types:t_to_string(ContrRet)]),
 ?debug("LocalRet: ~ts\n", [erl_types:t_to_string(LocalRet)]),
 
- State1 =
- case is_race_analysis_enabled(State) of
- true ->
- Ann = cerl:get_ann(Tree),
- File = get_file(Ann, State),
- Location = get_location(Tree),
- dialyzer_races:store_race_call(Fun, ArgTypes, Args,
- {File, Location}, State);
- false -> State
- end,
 FailedConj = any_none([RetWithoutLocal|NewArgTypes]),
 IsFailBif = t_is_none(BifRange(BifArgs)),
 IsFailSig = t_is_none(SigRange),
@@ -575,7 +522,7 @@ handle_apply_or_call([{TypeOfApply, {Fun, Sig, Contr, LocalRet}}|Left],
 	 %% This Msg will be post_processed by dialyzer_succ_typings
 	 Msg =
 	 {contract_range, [Contract, M1, F1, A1, ArgStrings, CRet]},
-	 state__add_warning(State1, ?WARN_CONTRACT_RANGE, Tree, Msg);
+	 state__add_warning(State, ?WARN_CONTRACT_RANGE, Tree, Msg);
 	 false ->
 	 FailedSig = any_none(NewArgsSig),
 	 FailedContract =
@@ -586,7 +533,7 @@ handle_apply_or_call([{TypeOfApply, {Fun, Sig, Contr, LocalRet}}|Left],
 	 FailReason =
 	 apply_fail_reason(FailedSig, FailedBif, FailedContract),
 	 Msg = get_apply_fail_msg(Fun, Args, ArgTypes, NewArgTypes, InfSig,
-				 Contr, CArgs, State1, FailReason, Opaques),
+				 Contr, CArgs, State, FailReason, Opaques),
 	 WarnType = case Msg of
 			 {call, _} -> ?WARN_FAILING_CALL;
 			 {apply, _} -> ?WARN_FAILING_CALL;
@@ -608,9 +555,9 @@ handle_apply_or_call([{TypeOfApply, {Fun, Sig, Contr, LocalRet}}|Left],
 Tree
 		 end,
 Frc = {erlang, is_record, 3} =:= state__lookup_name(Fun, State),
-	 state__add_warning(State1, WarnType, LocTree, Msg, Frc)
+	 state__add_warning(State, WarnType, LocTree, Msg, Frc)
 	end;
- false -> State1
+ false -> State
 end,
 State3 =
 case TypeOfApply of
@@ -1001,17 +948,9 @@ handle_case(Tree, Map, State) ->
 case t_is_none_or_unit(ArgType) of
 true -> SMA;
 false ->
- State2 =
- case is_race_analysis_enabled(State) of
- true ->
-	 {RaceList, RaceListSize} = get_race_list_and_size(State1),
- state__renew_race_list([beg_case|RaceList],
- RaceListSize + 1, State1);
- false -> State1
- end,
 Map2 = join_maps_begin(Map1),
 {MapList, State3, Type, Warns} =
-	handle_clauses(Clauses, Arg, ArgType, ArgType, State2,
+	handle_clauses(Clauses, Arg, ArgType, ArgType, State1,
 		 [], Map2, [], [], []),
 %% Non-Erlang BEAM languages, such as Elixir, expand language constructs
 %% into case statements. In that case, we do not want to warn on
@@ -1048,45 +987,22 @@ handle_cons(Tree, Map, State) ->
 %%----------------------------------------
 
 handle_let(Tree, Map, State) ->
- IsRaceAnalysisEnabled = is_race_analysis_enabled(State),
 Arg = cerl:let_arg(Tree),
 Vars = cerl:let_vars(Tree),
 {Map0, State0} =
 case cerl:is_c_var(Arg) of
 true ->
 	[Var] = Vars,
-	{enter_subst(Var, Arg, Map),
- case IsRaceAnalysisEnabled of
- true ->
-	 {RaceList, RaceListSize} = get_race_list_and_size(State),
- state__renew_race_list(
- [dialyzer_races:let_tag_new(Var, Arg)|RaceList],
- RaceListSize + 1, State);
- false -> State
- end};
+	{enter_subst(Var, Arg, Map), State};
 false -> {Map, State}
 end,
 Body = cerl:let_body(Tree),
 {State1, Map1, ArgTypes} = SMA = traverse(Arg, Map0, State0),
- State2 =
- case IsRaceAnalysisEnabled andalso cerl:is_c_call(Arg) of
- true ->
- Mod = cerl:call_module(Arg),
- Name = cerl:call_name(Arg),
- case cerl:is_literal(Mod) andalso
- cerl:concrete(Mod) =:= ets andalso
- cerl:is_literal(Name) andalso
- cerl:concrete(Name) =:= new of
- true -> renew_race_public_tables(Vars, State1);
- false -> State1
- end;
- false -> State1
- end,
 case t_is_none_or_unit(ArgTypes) of
 true -> SMA;
 false ->
 Map2 = enter_type_lists(Vars, t_to_tlist(ArgTypes), Map1),
- traverse(Body, Map2, State2)
+ traverse(Body, Map2, State1)
 end.
 
 %%----------------------------------------
@@ -1263,62 +1179,24 @@ field_name(Elements, ErrorPat, FieldNames) ->
 %% Clauses
 %%
 handle_clauses([C|Left], Arg, ArgType, OrigArgType, State, CaseTypes, MapIn,
-	 Acc, ClauseAcc, WarnAcc0) ->
- IsRaceAnalysisEnabled = is_race_analysis_enabled(State),
- State1 =
- case IsRaceAnalysisEnabled of
- true ->
-	{RaceList, RaceListSize} = get_race_list_and_size(State),
- state__renew_race_list(
- [dialyzer_races:beg_clause_new(Arg, cerl:clause_pats(C),
- cerl:clause_guard(C))|
- RaceList], RaceListSize + 1,
- State);
- false -> State
- end,
- {State2, ClauseMap, BodyType, NewArgType, WarnAcc} =
- do_clause(C, Arg, ArgType, OrigArgType, MapIn, State1, WarnAcc0),
- {NewClauseAcc, State3} =
- case IsRaceAnalysisEnabled of
- true ->
-	{RaceList1, RaceListSize1} = get_race_list_and_size(State2),
- EndClause = dialyzer_races:end_clause_new(Arg, cerl:clause_pats(C),
- cerl:clause_guard(C)),
- {[EndClause|ClauseAcc],
- state__renew_race_list([EndClause|RaceList1],
- RaceListSize1 + 1, State2)};
- false -> {ClauseAcc, State2}
- end,
+	 Acc, NewClauseAcc, WarnAcc0) ->
+ {State1, ClauseMap, BodyType, NewArgType, WarnAcc} =
+ do_clause(C, Arg, ArgType, OrigArgType, MapIn, State, WarnAcc0),
 {NewCaseTypes, NewAcc} =
 case t_is_none(BodyType) of
 true -> {CaseTypes, Acc};
 false -> {[BodyType|CaseTypes], [ClauseMap|Acc]}
 end,
- handle_clauses(Left, Arg, NewArgType, OrigArgType, State3,
+ handle_clauses(Left, Arg, NewArgType, OrigArgType, State1,
 		 NewCaseTypes, MapIn, NewAcc, NewClauseAcc, WarnAcc);
 handle_clauses([], _Arg, _ArgType, _OrigArgType, State, CaseTypes, _MapIn, Acc,
-	 ClauseAcc, WarnAcc) ->
- State1 =
- case is_race_analysis_enabled(State) of
- true ->
-	{RaceList, RaceListSize} = get_race_list_and_size(State),
- state__renew_race_list(
- [dialyzer_races:end_case_new(ClauseAcc)|RaceList],
-	 RaceListSize + 1, State);
- false -> State
- end,
- {lists:reverse(Acc), State1, t_sup(CaseTypes), WarnAcc}.
+	 _ClauseAcc, WarnAcc) ->
+ {lists:reverse(Acc), State, t_sup(CaseTypes), WarnAcc}.
 
 do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 Pats = cerl:clause_pats(C),
 Guard = cerl:clause_guard(C),
 Body = cerl:clause_body(C),
- State1 =
- case is_race_analysis_enabled(State) of
- true ->
- state__renew_fun_args(Pats, State);
- false -> State
- end,
 Map0 = mark_as_fresh(Pats, Map),
 Map1 = bind_subst(Arg, Pats, Map0),
 BindRes =
@@ -1331,15 +1209,15 @@ do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 	 true -> [ArgType0 || _ <- Pats];
 	 false -> t_to_tlist(ArgType0)
 	 end,
-	bind_pat_vars(Pats, ArgTypes, [], Map1, State1)
+	bind_pat_vars(Pats, ArgTypes, [], Map1, State)
 end,
 case BindRes of
 {error, ErrorType, NewPats, Type, OpaqueTerm} ->
 ?debug("Failed binding pattern: ~ts\nto ~ts\n",
-	 [cerl_prettypr:format(C), format_type(ArgType0, State1)]),
- case state__warning_mode(State1) of
+	 [cerl_prettypr:format(C), format_type(ArgType0, State)]),
+ case state__warning_mode(State) of
 false ->
-	 {State1, Map, t_none(), ArgType0, Warns};
+	 {State, Map, t_none(), ArgType0, Warns};
 	true ->
 	 {Msg, Force} =
 	 case t_is_none(ArgType0) of
@@ -1352,9 +1230,9 @@ do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 		 false -> t_to_tlist(OrigArgType)
 		 end,
 PatString = format_patterns(Pats),
- ArgTypeString = format_type(OrigArgType, State1),
+ ArgTypeString = format_type(OrigArgType, State),
 BindResOrig =
- bind_pat_vars(Pats, OrigArgTypes, [], Map1, State1),
+ bind_pat_vars(Pats, OrigArgTypes, [], Map1, State),
 		Tag =
 		 case BindResOrig of
 		 {error, bind, _, _, _} -> pattern_match;
@@ -1365,7 +1243,7 @@ do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 PatTypes = case BindResOrig of
 {error, opaque, _, _, OpaqueType} ->
 [PatString, ArgTypeString,
- format_type(OpaqueType, State1)];
+ format_type(OpaqueType, State)];
 _ -> [PatString, ArgTypeString]
 end,
 {{Tag, PatTypes}, false};
@@ -1409,10 +1287,10 @@ do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 opaque -> format_patterns(NewPats)
 end,
 		PatTypes = case ErrorType of
-			 bind -> [PatString, format_type(ArgType0, State1)];
-			 record -> [PatString, format_type(Type, State1)];
-			 opaque -> [PatString, format_type(Type, State1),
-					format_type(OpaqueTerm, State1)]
+			 bind -> [PatString, format_type(ArgType0, State)];
+			 record -> [PatString, format_type(Type, State)];
+			 opaque -> [PatString, format_type(Type, State),
+					format_type(OpaqueTerm, State)]
 			 end,
 		FailedTag = case ErrorType of
 			 bind -> pattern_match;
@@ -1427,20 +1305,20 @@ do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 		 {record_match, _} -> ?WARN_MATCHING;
 		 {pattern_match_cov, _} -> ?WARN_MATCHING
 		 end,
-	 {State1, Map, t_none(), ArgType0, [{WarnType, C, Msg, Force}|Warns]}
+	 {State, Map, t_none(), ArgType0, [{WarnType, C, Msg, Force}|Warns]}
 end;
 {Map2, PatTypes} ->
 %% Try to bind the argument. Will only succeed if
 %% it is a simple structured term.
 Map3 =
 case bind_pat_vars_reverse([Arg], [t_product(PatTypes)],
- [], Map2, State1) of
+ [], Map2, State) of
 {error, _, _, _, _} -> Map2;
 {NewMap, _} -> NewMap
 	end,
 GenType = dialyzer_typesig:get_safe_underapprox(Pats, Guard),
 NewArgType = t_subtract(t_product(t_to_tlist(ArgType0)), GenType),
- case bind_guard(Guard, Map3, State1) of
+ case bind_guard(Guard, Map3, State) of
 	{error, Reason} ->
 	 ?debug("Failed guard: ~ts\n",
 		 [cerl_prettypr:format(C, [{hook, cerl_typean:pp_hook()}])]),
@@ -1449,7 +1327,7 @@ do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 	 case Pats =:= [] of
 	 true -> {guard_fail, []};
 	 false ->
-		{guard_fail_pat, [PatString, format_type(ArgType0, State1)]}
+		{guard_fail_pat, [PatString, format_type(ArgType0, State)]}
 	 end,
 	 Warn =
 	 case Reason of
@@ -1467,9 +1345,9 @@ do_clause(C, Arg, ArgType0, OrigArgType, Map, State, Warns) ->
 		 {?WARN_MATCHING, C, Msg, false}
 		end
 	 end,
-	 {State1, Map, t_none(), NewArgType, [Warn|Warns]};
+	 {State, Map, t_none(), NewArgType, [Warn|Warns]};
 Map4 ->
- {RetState, RetMap, BodyType} = traverse(Body, Map4, State1),
+ {RetState, RetMap, BodyType} = traverse(Body, Map4, State),
 {RetState, RetMap, BodyType, NewArgType, Warns}
 end
 end.
@@ -3014,7 +2892,7 @@ state__new(Callgraph, Codeserver, Tree, Plt, Module, Records) ->
 		 dict:new(), Funs),
 #state{callgraph = Callgraph, codeserver = Codeserver,
 envs = Env, fun_tab = FunTab, fun_homes = FunHomes, opaques = Opaques,
-	 plt = Plt, races = dialyzer_races:new(), records = Records,
+	 plt = Plt, records = Records,
 	 warning_mode = false, warnings = [], work = Work, tree_map = TreeMap,
 	 module = Module, reachable_funs = sets:new([{version, 2}])}.
 
@@ -3022,7 +2900,7 @@ state__warning_mode(#state{warning_mode = WM}) ->
 WM.
 
 state__set_warning_mode(#state{tree_map = TreeMap, fun_tab = FunTab,
- races = Races, callgraph = Callgraph,
+ callgraph = Callgraph,
 reachable_funs = ReachableFuns} = State) ->
 ?debug("==========\nStarting warning pass\n==========\n", []),
 Funs = dict:fetch_keys(TreeMap),
@@ -3032,37 +2910,11 @@ state__set_warning_mode(#state{tree_map = TreeMap, fun_tab = FunTab,
 dialyzer_callgraph:lookup_name(Fun, Callgraph) =/= error orelse
 sets:is_element(Fun, ReachableFuns)],
 State#state{work = init_work(Work),
-	 fun_tab = FunTab, warning_mode = true,
- races = dialyzer_races:put_race_analysis(true, Races)}.
-
-state__race_analysis(Analysis, #state{races = Races} = State) ->
- State#state{races = dialyzer_races:put_race_analysis(Analysis, Races)}.
-
-state__renew_curr_fun(CurrFun, CurrFunLabel,
- #state{races = Races} = State) ->
- State#state{races = dialyzer_races:put_curr_fun(CurrFun, CurrFunLabel,
- Races)}.
-
-state__renew_fun_args(Args, #state{races = Races} = State) ->
- case state__warning_mode(State) of
- true -> State;
- false ->
- State#state{races = dialyzer_races:put_fun_args(Args, Races)}
- end.
-
-state__renew_race_list(RaceList, RaceListSize,
- #state{races = Races} = State) ->
- State#state{races = dialyzer_races:put_race_list(RaceList, RaceListSize,
- Races)}.
+	 fun_tab = FunTab, warning_mode = true}.
 
 state__renew_warnings(Warnings, State) ->
 State#state{warnings = Warnings}.
 
--spec state__add_warning(raw_warning(), state()) -> state().
-
-state__add_warning(Warn, #state{warnings = Warnings} = State) ->
- State#state{warnings = [Warn|Warnings]}.
-
 state__add_warning(State, Tag, Tree, Msg) ->
 state__add_warning(State, Tag, Tree, Msg, false).
 
@@ -3113,15 +2965,6 @@ state__set_curr_fun(undefined, State) ->
 state__set_curr_fun(FunLbl, State) ->
 State#state{curr_fun = find_function(FunLbl, State)}.
 
--spec state__find_function(mfa_or_funlbl(), state()) -> mfa_or_funlbl().
-
-state__find_function(FunLbl, State) ->
- find_function(FunLbl, State).
-
-state__get_race_warnings(#state{races = Races} = State) ->
- {Races1, State1} = dialyzer_races:get_race_warnings(Races, State),
- State1#state{races = Races1}.
-
 state__get_warnings(#state{tree_map = TreeMap, fun_tab = FunTab,
 			 callgraph = Callgraph, plt = Plt,
 reachable_funs = ReachableFuns} = State) ->
@@ -3449,101 +3292,12 @@ forward_args(Fun, ArgTypes, #state{work = Work, fun_tab = FunTab} = State) ->
 State#state{work = NewWork, fun_tab = NewFunTab}
 end.
 
--spec state__cleanup(state()) -> state().
-
-state__cleanup(#state{callgraph = Callgraph,
- races = Races,
- records = Records}) ->
- #state{callgraph = dialyzer_callgraph:cleanup(Callgraph),
- races = dialyzer_races:cleanup(Races),
- records = Records}.
-
--spec state__duplicate(state()) -> state().
-
-state__duplicate(#state{callgraph = Callgraph} = State) ->
- State#state{callgraph = dialyzer_callgraph:duplicate(Callgraph)}.
-
--spec dispose_state(state()) -> ok.
-
-dispose_state(#state{callgraph = Callgraph}) ->
- dialyzer_callgraph:dispose_race_server(Callgraph).
-
--spec state__get_callgraph(state()) -> dialyzer_callgraph:callgraph().
-
-state__get_callgraph(#state{callgraph = Callgraph}) ->
- Callgraph.
-
--spec state__get_races(state()) -> dialyzer_races:races().
-
-state__get_races(#state{races = Races}) ->
- Races.
-
--spec state__get_records(state()) -> types().
-
-state__get_records(#state{records = Records}) ->
- Records.
-
--spec state__put_callgraph(dialyzer_callgraph:callgraph(), state()) ->
- state().
-
-state__put_callgraph(Callgraph, State) ->
- State#state{callgraph = Callgraph}.
-
--spec state__put_races(dialyzer_races:races(), state()) -> state().
-
-state__put_races(Races, State) ->
- State#state{races = Races}.
-
--spec state__records_only(state()) -> state().
-
-state__records_only(#state{records = Records}) ->
- #state{records = Records}.
-
 -spec state__translate_file(file:filename(), state()) -> file:filename().
 
 state__translate_file(FakeFile, State) ->
 #state{codeserver = CodeServer, module = Module} = State,
 dialyzer_codeserver:translate_fake_file(CodeServer, Module, FakeFile).
 
-%%% ===========================================================================
-%%%
-%%% Races
-%%%
-%%% ===========================================================================
-
-is_race_analysis_enabled(#state{races = Races, callgraph = Callgraph}) ->
- RaceDetection = dialyzer_callgraph:get_race_detection(Callgraph),
- RaceAnalysis = dialyzer_races:get_race_analysis(Races),
- RaceDetection andalso RaceAnalysis.
-
-get_race_list_and_size(#state{races = Races}) ->
- dialyzer_races:get_race_list_and_size(Races).
-
-renew_race_code(#state{races = Races, callgraph = Callgraph,
-		 warning_mode = WarningMode} = State) ->
- case WarningMode of
- true -> State;
- false ->
- NewCallgraph = dialyzer_callgraph:renew_race_code(Races, Callgraph),
- State#state{callgraph = NewCallgraph}
- end.
-
-renew_race_public_tables([Var], #state{races = Races, callgraph = Callgraph,
-				 warning_mode = WarningMode} = State) ->
- case WarningMode of
- true -> State;
- false ->
- Table = dialyzer_races:get_new_table(Races),
- case Table of
-	no_t -> State;
-	_Other ->
-	 VarLabel = get_label(Var),
-	 NewCallgraph =
-	 dialyzer_callgraph:renew_race_public_tables(VarLabel, Callgraph),
-	 State#state{callgraph = NewCallgraph}
- end
- end.
-
 %%% ===========================================================================
 %%%
 %%% Worklist
diff --git a/lib/dialyzer/src/dialyzer_gui_wx.erl b/lib/dialyzer/src/dialyzer_gui_wx.erl
index 3a24f140e0..3b04b56f80 100644
--- a/lib/dialyzer/src/dialyzer_gui_wx.erl
+++ b/lib/dialyzer/src/dialyzer_gui_wx.erl
@@ -242,7 +242,6 @@ create_window(Wx, #options{init_plts = InitPltFiles} = DialyzerOptions) ->
 	 {?WARN_OPAQUE, ?menuID_WARN_OPAQUE},
 	 {?WARN_FAILING_CALL, ?menuID_WARN_FAIL_FUN_CALLS},
 	 {?WARN_CALLGRAPH, ?menuID_WARN_UNEXPORTED_FUN},
- {?WARN_RACE_CONDITION, ?menuID_WARN_RACE_CONDITIONS},
 	 %% For contracts.
 	 {?WARN_CONTRACT_TYPES,?menuID_WARN_WRONG_CONTRACTS},
 	 {?WARN_CONTRACT_SYNTAX, ?menuID_WARN_CONTRACT_SYNTAX}
@@ -313,8 +312,6 @@ createWarningsMenu() ->
 		 "Functions of no return"),
 addCheckedItem(WarningsMenu, ?menuID_WARN_UNEXPORTED_FUN,
 		 "Call to unexported function"),
- _ = wxMenu:appendCheckItem(WarningsMenu, ?menuID_WARN_RACE_CONDITIONS,
-			 "Possible race conditions"),
 addCheckedItem(WarningsMenu, ?menuID_WARN_WRONG_CONTRACTS, "Wrong contracts"),
 addCheckedItem(WarningsMenu, ?menuID_WARN_CONTRACT_SYNTAX,
 		 "Wrong contract syntax"),
diff --git a/lib/dialyzer/src/dialyzer_gui_wx.hrl b/lib/dialyzer/src/dialyzer_gui_wx.hrl
index fe763a9abc..0a6ca9e8b2 100644
--- a/lib/dialyzer/src/dialyzer_gui_wx.hrl
+++ b/lib/dialyzer/src/dialyzer_gui_wx.hrl
@@ -31,9 +31,8 @@
 -define(menuID_WARN_ERROR_HANDLING_FUN, 206).
 -define(menuID_WARN_NO_RETURN_FUN, 207).
 -define(menuID_WARN_UNEXPORTED_FUN, 208).
--define(menuID_WARN_RACE_CONDITIONS, 209).
--define(menuID_WARN_WRONG_CONTRACTS, 210).
--define(menuID_WARN_CONTRACT_SYNTAX, 211).
+-define(menuID_WARN_WRONG_CONTRACTS, 209).
+-define(menuID_WARN_CONTRACT_SYNTAX, 210).
 
 -define(menuID_PLT_INIT_EMPTY, 300).
 -define(menuID_PLT_SHOW_CONTENTS, 301).
diff --git a/lib/dialyzer/src/dialyzer_options.erl b/lib/dialyzer/src/dialyzer_options.erl
index dd90630b4b..5cd7523cec 100644
--- a/lib/dialyzer/src/dialyzer_options.erl
+++ b/lib/dialyzer/src/dialyzer_options.erl
@@ -333,8 +333,6 @@ build_warnings([Opt|Opts], Warnings) ->
 	ordsets:add_element(?WARN_UNMATCHED_RETURN, Warnings);
 error_handling ->
 	ordsets:add_element(?WARN_RETURN_ONLY_EXIT, Warnings);
- race_conditions ->
-	ordsets:add_element(?WARN_RACE_CONDITION, Warnings);
 no_missing_calls ->
 ordsets:del_element(?WARN_CALLGRAPH, Warnings);
 specdiffs ->
diff --git a/lib/dialyzer/src/dialyzer_race_data_server.erl b/lib/dialyzer/src/dialyzer_race_data_server.erl
deleted file mode 100644
index 953cebfdf1..0000000000
--- a/lib/dialyzer/src/dialyzer_race_data_server.erl
+++ /dev/null
@@ -1,127 +0,0 @@
-%% -*- erlang-indent-level: 2 -*-
-%%
-%% Licensed under the Apache License, Version 2.0 (the "License");
-%% you may not use this file except in compliance with the License.
-%% You may obtain a copy of the License at
-%%
-%% http://www.apache.org/licenses/LICENSE-2.0
-%%
-%% Unless required by applicable law or agreed to in writing, software
-%% distributed under the License is distributed on an "AS IS" BASIS,
-%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-%% See the License for the specific language governing permissions and
-%% limitations under the License.
-
-%%%-------------------------------------------------------------------
-%%% File : dialyzer_race_data_server.erl
-%%% Author : Tobias Lindahl <tobiasl@it.uu.se>
-%%% Description : 
-%%%
-%%% Created : 18 Sep 2015 by Luca Favatella <luca.favatella@erlang-solutions.com>
-%%%-------------------------------------------------------------------
--module(dialyzer_race_data_server).
-
--export([new/0,
- duplicate/1,
- stop/1,
- call/2,
- cast/2]).
-
--include("dialyzer.hrl").
-
-%%----------------------------------------------------------------------
-
--record(state, {race_code = dict:new() :: dict:dict(),
- public_tables = [] :: [label()],
- named_tables = [] :: [string()],
- beh_api_calls = [] :: [{mfa(), mfa()}]}).
-
-%%----------------------------------------------------------------------
-
--spec new() -> pid().
-
-new() ->
- spawn_link(fun() -> loop(#state{}) end).
-
--spec duplicate(pid()) -> pid().
-
-duplicate(Server) ->
- call(dup, Server).
-
--spec stop(pid()) -> ok.
-
-stop(Server) ->
- cast(stop, Server).
-
--spec call(atom(), pid()) -> term().
-
-call(Query, Server) ->
- Ref = make_ref(),
- Server ! {call, self(), Ref, Query},
- receive
- {Ref, Reply} -> Reply
- end.
-
--spec cast(atom() | {atom(), term()}, pid()) -> ok.
-
-cast(Message, Server) ->
- Server ! {cast, Message},
- ok.
-
-%%----------------------------------------------------------------------
-
-loop(State) ->
- receive
- {call, From, Ref, Query} ->
- Reply = handle_call(Query, State),
- From ! {Ref, Reply},
- loop(State);
- {cast, stop} ->
- ok;
- {cast, Message} ->
- NewState = handle_cast(Message, State),
- loop(NewState)
- end.
-
-handle_cast(race_code_new, State) ->
- State#state{race_code = dict:new()};
-handle_cast({Tag, Data}, State) ->
- case Tag of
- renew_race_info -> renew_race_info_handler(Data, State);
- renew_race_code -> renew_race_code_handler(Data, State);
- renew_race_public_tables -> renew_race_public_tables_handler(Data, State);
- put_race_code -> State#state{race_code = Data};
- put_public_tables -> State#state{public_tables = Data};
- put_named_tables -> State#state{named_tables = Data};
- put_behaviour_api_calls -> State#state{beh_api_calls = Data}
- end.
-
-handle_call(Query,
- #state{race_code = RaceCode,
- public_tables = PublicTables,
- named_tables = NamedTables,
- beh_api_calls = BehApiCalls}
- = State) ->
- case Query of
- dup -> spawn_link(fun() -> loop(State) end);
- get_race_code -> RaceCode;
- get_public_tables -> PublicTables;
- get_named_tables -> NamedTables;
- get_behaviour_api_calls -> BehApiCalls
- end.
-
-%%----------------------------------------------------------------------
-
-renew_race_info_handler({RaceCode, PublicTables, NamedTables},
- #state{} = State) ->
- State#state{race_code = RaceCode,
- public_tables = PublicTables,
- named_tables = NamedTables}.
-
-renew_race_code_handler({Fun, FunArgs, Code},
- #state{race_code = RaceCode} = State) ->
- State#state{race_code = dict:store(Fun, [FunArgs, Code], RaceCode)}.
-
-renew_race_public_tables_handler(VarLabel,
- #state{public_tables = PT} = State) ->
- State#state{public_tables = ordsets:add_element(VarLabel, PT)}.
diff --git a/lib/dialyzer/src/dialyzer_races.erl b/lib/dialyzer/src/dialyzer_races.erl
deleted file mode 100644
index adefc16f99..0000000000
--- a/lib/dialyzer/src/dialyzer_races.erl
+++ /dev/null
@@ -1,2483 +0,0 @@
-%% -*- erlang-indent-level: 2 -*-
-%%
-%% Licensed under the Apache License, Version 2.0 (the "License");
-%% you may not use this file except in compliance with the License.
-%% You may obtain a copy of the License at
-%%
-%% http://www.apache.org/licenses/LICENSE-2.0
-%%
-%% Unless required by applicable law or agreed to in writing, software
-%% distributed under the License is distributed on an "AS IS" BASIS,
-%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-%% See the License for the specific language governing permissions and
-%% limitations under the License.
-
-%%%----------------------------------------------------------------------
-%%% File : dialyzer_races.erl
-%%% Author : Maria Christakis <christakismaria@gmail.com>
-%%% Description : Utility functions for race condition detection
-%%%
-%%% Created : 21 Nov 2008 by Maria Christakis <christakismaria@gmail.com>
-%%%----------------------------------------------------------------------
--module(dialyzer_races).
-
-%% Race Analysis
-
--export([store_race_call/5, race/1, get_race_warnings/2, format_args/4]).
-
-%% Record Interfaces
-
--export([beg_clause_new/3, cleanup/1, end_case_new/1, end_clause_new/3,
- get_curr_fun/1, get_curr_fun_args/1, get_new_table/1,
- get_race_analysis/1, get_race_list/1, get_race_list_size/1,
-	 get_race_list_and_size/1,
- let_tag_new/2, new/0, put_curr_fun/3, put_fun_args/2,
- put_race_analysis/2, put_race_list/3]).
-
--export_type([races/0, core_vars/0]).
-
--include("dialyzer.hrl").
-
-%%% ===========================================================================
-%%%
-%%% Definitions
-%%%
-%%% ===========================================================================
-
--define(local, 5).
--define(no_arg, no_arg).
--define(no_label, no_label).
--define(bypassed, bypassed).
-
--define(WARN_WHEREIS_REGISTER, warn_whereis_register).
--define(WARN_WHEREIS_UNREGISTER, warn_whereis_unregister).
--define(WARN_ETS_LOOKUP_INSERT, warn_ets_lookup_insert).
--define(WARN_MNESIA_DIRTY_READ_WRITE, warn_mnesia_dirty_read_write).
--define(WARN_NO_WARN, warn_no_warn).
-
-%%% ===========================================================================
-%%%
-%%% Local Types
-%%%
-%%% ===========================================================================
-
--type label_type() :: label() | [label()] | {label()} | ?no_label.
--type args() :: [label_type() | [string()]].
--type core_vars() :: cerl:cerl() | ?no_arg | ?bypassed.
--type var_to_map1() :: core_vars() | [cerl:cerl()].
--type var_to_map2() :: cerl:cerl() | [cerl:cerl()] | ?bypassed.
--type core_args() :: [core_vars()] | 'empty'.
--type op() :: 'bind' | 'unbind'.
-
--type dep_calls() :: 'whereis' | 'ets_lookup' | 'mnesia_dirty_read'.
--type warn_calls() :: 'register' | 'unregister' | 'ets_insert'
- | 'mnesia_dirty_write'.
--type call() :: 'whereis' | 'register' | 'unregister' | 'ets_new'
- | 'ets_lookup' | 'ets_insert' | 'mnesia_dirty_read1'
- | 'mnesia_dirty_read2' | 'mnesia_dirty_write1'
- | 'mnesia_dirty_write2' | 'function_call'.
--type race_tag() :: 'whereis_register' | 'whereis_unregister'
- | 'ets_lookup_insert' | 'mnesia_dirty_read_write'.
-
-%% The following type is similar to the raw_warning() type but has a
-%% tag which is local to this module and is not propagated to outside
--type dial_race_warning() :: {race_warn_tag(), warning_info(), {atom(), [term()]}}.
--type race_warn_tag() :: ?WARN_WHEREIS_REGISTER | ?WARN_WHEREIS_UNREGISTER
- | ?WARN_ETS_LOOKUP_INSERT | ?WARN_MNESIA_DIRTY_READ_WRITE.
-
--record(beg_clause, {arg :: var_to_map1() | 'undefined',
- pats :: var_to_map1() | 'undefined',
- guard :: cerl:cerl() | 'undefined'}).
--record(end_clause, {arg :: var_to_map1() | 'undefined',
- pats :: var_to_map1() | 'undefined',
- guard :: cerl:cerl() | 'undefined'}).
--record(end_case, {clauses :: [#end_clause{}]}).
--record(curr_fun, {status :: 'in' | 'out' | 'undefined',
- mfa :: dialyzer_callgraph:mfa_or_funlbl()
- | 'undefined',
- label :: label() | 'undefined',
- def_vars :: [core_vars()] | 'undefined',
- arg_types :: [erl_types:erl_type()] | 'undefined',
- call_vars :: [core_vars()] | 'undefined',
- var_map :: dict:dict() | 'undefined'}).
--record(dep_call, {call_name :: dep_calls(),
- args :: args() | 'undefined',
- arg_types :: [erl_types:erl_type()],
- vars :: [core_vars()],
- state :: dialyzer_dataflow:state(),
- file_loc :: file_location(),
- var_map :: dict:dict() | 'undefined'}).
--record(fun_call, {caller :: dialyzer_callgraph:mfa_or_funlbl(),
- callee :: dialyzer_callgraph:mfa_or_funlbl(),
- arg_types :: [erl_types:erl_type()],
- vars :: [core_vars()]}).
--record(let_tag, {var :: var_to_map1(),
- arg :: var_to_map1()}).
--record(warn_call, {call_name :: warn_calls(),
- args :: args(),
- var_map :: dict:dict() | 'undefined'}).
-
--type case_tags() :: 'beg_case' | #beg_clause{} | #end_clause{} | #end_case{}.
--type code() :: [#dep_call{} | #fun_call{} | #warn_call{} |
- #curr_fun{} | #let_tag{} | case_tags() | race_tag()].
-
--type table_var() :: label() | ?no_label.
--type table() :: {'named', table_var(), [string()]} | 'other' | 'no_t'.
-
--record(race_fun, {mfa :: mfa(),
- args :: args(),
- arg_types :: [erl_types:erl_type()],
- vars :: [core_vars()],
- file_loc :: file_location(),
- index :: non_neg_integer(),
- fun_mfa :: dialyzer_callgraph:mfa_or_funlbl(),
- fun_label :: label()}).
-
--record(races, {curr_fun :: dialyzer_callgraph:mfa_or_funlbl()
- | 'undefined',
- curr_fun_label :: label() | 'undefined',
- curr_fun_args = 'empty' :: core_args(),
- new_table = 'no_t' :: table(),
- race_list = [] :: code(),
- race_list_size = 0 :: non_neg_integer(),
- race_tags = [] :: [#race_fun{}],
- %% true for fun types and warning mode
- race_analysis = false :: boolean(),
- race_warnings = [] :: [dial_race_warning()]}).
-
-%%% ===========================================================================
-%%%
-%%% Exported Types
-%%%
-%%% ===========================================================================
-
--opaque races() :: #races{}.
-
-%%% ===========================================================================
-%%%
-%%% Race Analysis
-%%%
-%%% ===========================================================================
-
--spec store_race_call(dialyzer_callgraph:mfa_or_funlbl(),
-		 [erl_types:erl_type()], [core_vars()],
- file_location(), dialyzer_dataflow:state()) ->
- dialyzer_dataflow:state().
-
-store_race_call(Fun, ArgTypes, Args, FileLocation, State) ->
- Races = dialyzer_dataflow:state__get_races(State),
- CurrFun = Races#races.curr_fun,
- CurrFunLabel = Races#races.curr_fun_label,
- RaceTags = Races#races.race_tags,
- CleanState = dialyzer_dataflow:state__records_only(State),
- {NewRaceList, NewRaceListSize, NewRaceTags, NewTable} =
- case CurrFun of
- {_Module, module_info, A} when A =:= 0 orelse A =:= 1 ->
- {[], 0, RaceTags, no_t};
- _Thing ->
- RaceList = Races#races.race_list,
- RaceListSize = Races#races.race_list_size,
- case Fun of
- {erlang, get_module_info, A} when A =:= 1 orelse A =:= 2 ->
- {[], 0, RaceTags, no_t};
- {erlang, register, 2} ->
- VarArgs = format_args(Args, ArgTypes, CleanState, register),
- RaceFun = #race_fun{mfa = Fun, args = VarArgs,
- arg_types = ArgTypes, vars = Args,
- file_loc = FileLocation, index = RaceListSize,
- fun_mfa = CurrFun, fun_label = CurrFunLabel},
- {[#warn_call{call_name = register, args = VarArgs}|
- RaceList], RaceListSize + 1, [RaceFun|RaceTags], no_t};
- {erlang, unregister, 1} ->
- VarArgs = format_args(Args, ArgTypes, CleanState, unregister),
- RaceFun = #race_fun{mfa = Fun, args = VarArgs,
- arg_types = ArgTypes, vars = Args,
- file_loc = FileLocation, index = RaceListSize,
- fun_mfa = CurrFun, fun_label = CurrFunLabel},
- {[#warn_call{call_name = unregister, args = VarArgs}|
- RaceList], RaceListSize + 1, [RaceFun|RaceTags], no_t};
-	 {erlang, whereis, 1} ->
- VarArgs = format_args(Args, ArgTypes, CleanState, whereis),
-	 {[#dep_call{call_name = whereis, args = VarArgs,
- arg_types = ArgTypes, vars = Args,
- state = CleanState, file_loc = FileLocation}|
- RaceList], RaceListSize + 1, RaceTags, no_t};
-	 {ets, insert, 2} ->
- VarArgs = format_args(Args, ArgTypes, CleanState, ets_insert),
- RaceFun = #race_fun{mfa = Fun, args = VarArgs,
- arg_types = ArgTypes, vars = Args,
- file_loc = FileLocation, index = RaceListSize,
- fun_mfa = CurrFun, fun_label = CurrFunLabel},
- {[#warn_call{call_name = ets_insert, args = VarArgs}|
- RaceList], RaceListSize + 1, [RaceFun|RaceTags], no_t};
- {ets, lookup, 2} ->
- VarArgs = format_args(Args, ArgTypes, CleanState, ets_lookup),
- {[#dep_call{call_name = ets_lookup, args = VarArgs,
- arg_types = ArgTypes, vars = Args,
- state = CleanState, file_loc = FileLocation}|
- RaceList], RaceListSize + 1, RaceTags, no_t};
-	 {ets, new, 2} ->
-	 VarArgs = format_args(Args, ArgTypes, CleanState, ets_new),
- [VarArgs1, VarArgs2, _, Options] = VarArgs,
- NewTable1 =
- case lists:member("'public'", Options) of
- true ->
- case lists:member("'named_table'", Options) of
- true ->
- {named, VarArgs1, VarArgs2};
- false -> other
- end;
- false -> no_t
- end,
-	 {RaceList, RaceListSize, RaceTags, NewTable1};
-	 {mnesia, dirty_read, A} when A =:= 1 orelse A =:= 2 ->
- VarArgs =
- case A of
- 1 ->
- format_args(Args, ArgTypes, CleanState, mnesia_dirty_read1);
- 2 ->
- format_args(Args, ArgTypes, CleanState, mnesia_dirty_read2)
- end,
- {[#dep_call{call_name = mnesia_dirty_read, args = VarArgs,
- arg_types = ArgTypes, vars = Args,
- state = CleanState, file_loc = FileLocation}|RaceList],
-	 RaceListSize + 1, RaceTags, no_t};
- {mnesia, dirty_write, A} when A =:= 1 orelse A =:= 2 ->
- VarArgs =
- case A of
- 1 ->
- format_args(Args, ArgTypes, CleanState, mnesia_dirty_write1);
- 2 ->
- format_args(Args, ArgTypes, CleanState, mnesia_dirty_write2)
- end,
- RaceFun = #race_fun{mfa = Fun, args = VarArgs,
- arg_types = ArgTypes, vars = Args,
- file_loc = FileLocation, index = RaceListSize,
- fun_mfa = CurrFun, fun_label = CurrFunLabel},
- {[#warn_call{call_name = mnesia_dirty_write,
-			 args = VarArgs}|RaceList],
-	 RaceListSize + 1, [RaceFun|RaceTags], no_t};
- Int when is_integer(Int) ->
- {[#fun_call{caller = CurrFun, callee = Int, arg_types = ArgTypes,
- vars = Args}|RaceList],
-	 RaceListSize + 1, RaceTags, no_t};
- _Other ->
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- case digraph:vertex(dialyzer_callgraph:get_digraph(Callgraph),
- Fun) of
- {Fun, confirmed} ->
- {[#fun_call{caller = CurrFun, callee = Fun,
- arg_types = ArgTypes, vars = Args}|RaceList],
-		 RaceListSize + 1, RaceTags, no_t};
- false ->
- {RaceList, RaceListSize, RaceTags, no_t}
- end
- end
- end,
- state__renew_info(NewRaceList, NewRaceListSize, NewRaceTags, NewTable, State).
-
--spec race(dialyzer_dataflow:state()) -> dialyzer_dataflow:state().
-
-race(State) ->
- Races = dialyzer_dataflow:state__get_races(State),
- RaceTags = Races#races.race_tags,
- RetState =
- case RaceTags of
- [] -> State;
- [#race_fun{mfa = Fun,
- args = VarArgs, arg_types = ArgTypes,
- vars = Args, file_loc = FileLocation,
- index = Index, fun_mfa = CurrFun,
- fun_label = CurrFunLabel}|T] ->
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- {ok, [_Args, Code]} =
- dict:find(CurrFun, dialyzer_callgraph:get_race_code(Callgraph)),
- RaceList = lists:reverse(Code),
- RaceWarnTag =
- case Fun of
- {erlang, register, 2} -> ?WARN_WHEREIS_REGISTER;
- {erlang, unregister, 1} -> ?WARN_WHEREIS_UNREGISTER;
- {ets, insert, 2} -> ?WARN_ETS_LOOKUP_INSERT;
- {mnesia, dirty_write, _A} -> ?WARN_MNESIA_DIRTY_READ_WRITE
- end,
- State1 =
- state__renew_curr_fun(CurrFun,
- state__renew_curr_fun_label(CurrFunLabel,
- state__renew_race_list(lists:nthtail(length(RaceList) - Index,
-					 RaceList), State))),
- DepList = fixup_race_list(RaceWarnTag, VarArgs, State1),
- {State2, RaceWarn} =
- get_race_warn(Fun, Args, ArgTypes, DepList, State),
- {File, Location} = FileLocation,
- CurrMFA = dialyzer_dataflow:state__find_function(CurrFun, State),
- WarningInfo = {File, Location, CurrMFA},
- race(
- state__add_race_warning(
- state__renew_race_tags(T, State2), RaceWarn, RaceWarnTag,
- WarningInfo))
- end,
- state__renew_race_tags([], RetState).
-
-fixup_race_list(RaceWarnTag, WarnVarArgs, State) ->
- Races = dialyzer_dataflow:state__get_races(State),
- CurrFun = Races#races.curr_fun,
- CurrFunLabel = Races#races.curr_fun_label,
- RaceList = Races#races.race_list,
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- Digraph = dialyzer_callgraph:get_digraph(Callgraph),
- Calls = digraph:edges(Digraph),
- RaceTag =
- case RaceWarnTag of
- ?WARN_WHEREIS_REGISTER -> whereis_register;
- ?WARN_WHEREIS_UNREGISTER -> whereis_unregister;
- ?WARN_ETS_LOOKUP_INSERT -> ets_lookup_insert;
- ?WARN_MNESIA_DIRTY_READ_WRITE -> mnesia_dirty_read_write
- end,
- NewRaceList = [RaceTag|RaceList],
- CleanState = dialyzer_dataflow:state__cleanup(State),
- NewState = state__renew_race_list(NewRaceList, CleanState),
- DepList1 =
- fixup_race_forward_pullout(CurrFun, CurrFunLabel, Calls,
- lists:reverse(NewRaceList), [], CurrFun,
- WarnVarArgs, RaceWarnTag, dict:new(),
- [], [], [], 2 * ?local, NewState),
- Parents = fixup_race_backward(CurrFun, Calls, Calls, [], ?local),
- UParents = lists:usort(Parents),
- Filtered = filter_parents(UParents, UParents, Digraph),
- NewParents =
- case lists:member(CurrFun, Filtered) of
- true -> Filtered;
- false -> [CurrFun|Filtered]
- end,
- DepList2 =
- fixup_race_list_helper(NewParents, Calls, CurrFun, WarnVarArgs,
- RaceWarnTag, NewState),
- dialyzer_dataflow:dispose_state(CleanState),
- lists:usort(cleanup_dep_calls(DepList1 ++ DepList2)).
-
-fixup_race_list_helper(Parents, Calls, CurrFun, WarnVarArgs, RaceWarnTag,
-		 State) ->
- case Parents of
- [] -> [];
- [Head|Tail] ->
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- Code =
- case dict:find(Head, dialyzer_callgraph:get_race_code(Callgraph)) of
- error -> [];
- {ok, [_A, C]} -> C
- end,
- {ok, FunLabel} = dialyzer_callgraph:lookup_label(Head, Callgraph),
- DepList1 =
- fixup_race_forward_pullout(Head, FunLabel, Calls, Code, [], CurrFun,
- WarnVarArgs, RaceWarnTag, dict:new(),
- [], [], [], 2 * ?local, State),
- DepList2 =
- fixup_race_list_helper(Tail, Calls, CurrFun, WarnVarArgs,
-			 RaceWarnTag, State),
- DepList1 ++ DepList2
- end.
-
-%%% ===========================================================================
-%%%
-%%% Forward Analysis
-%%%
-%%% ===========================================================================
-
-fixup_race_forward_pullout(CurrFun, CurrFunLabel, Calls, Code, RaceList,
- InitFun, WarnVarArgs, RaceWarnTag, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NestingLevel,
- State) ->
- TState = dialyzer_dataflow:state__duplicate(State),
- {DepList, NewCurrFun, NewCurrFunLabel, NewCalls,
- NewCode, NewRaceList, NewRaceVarMap, NewFunDefVars,
- NewFunCallVars, NewFunArgTypes, NewNestingLevel} =
- fixup_race_forward(CurrFun, CurrFunLabel, Calls, Code, RaceList,
- InitFun, WarnVarArgs, RaceWarnTag, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NestingLevel,
- cleanup_race_code(TState)),
- dialyzer_dataflow:dispose_state(TState),
- case NewCode of
- [] -> DepList;
- [#fun_call{caller = NewCurrFun, callee = Call, arg_types = FunTypes,
- vars = FunArgs}|Tail] ->
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- OkCall = {ok, Call},
- {Name, Label} =
- case is_integer(Call) of
- true ->
- case dialyzer_callgraph:lookup_name(Call, Callgraph) of
- error -> {OkCall, OkCall};
- N -> {N, OkCall}
- end;
- false ->
- {OkCall, dialyzer_callgraph:lookup_label(Call, Callgraph)}
- end,
- {NewCurrFun1, NewCurrFunLabel1, NewCalls1, NewCode1, NewRaceList1,
- NewRaceVarMap1, NewFunDefVars1, NewFunCallVars1, NewFunArgTypes1,
- NewNestingLevel1} =
- case Label =:= error of
- true ->
- {NewCurrFun, NewCurrFunLabel, NewCalls, Tail, NewRaceList,
- NewRaceVarMap, NewFunDefVars, NewFunCallVars, NewFunArgTypes,
- NewNestingLevel};
- false ->
- {ok, Fun} = Name,
- {ok, Int} = Label,
- case dict:find(Fun, dialyzer_callgraph:get_race_code(Callgraph)) of
- error ->
- {NewCurrFun, NewCurrFunLabel, NewCalls, Tail, NewRaceList,
- NewRaceVarMap, NewFunDefVars, NewFunCallVars, NewFunArgTypes,
- NewNestingLevel};
- {ok, [Args, CodeB]} ->
- Races = dialyzer_dataflow:state__get_races(State),
- {RetCurrFun, RetCurrFunLabel, RetCalls, RetCode,
- RetRaceList, RetRaceVarMap, RetFunDefVars, RetFunCallVars,
- RetFunArgTypes, RetNestingLevel} =
- fixup_race_forward_helper(NewCurrFun,
- NewCurrFunLabel, Fun, Int, NewCalls, NewCalls,
- [#curr_fun{status = out, mfa = NewCurrFun,
- label = NewCurrFunLabel,
- var_map = NewRaceVarMap,
- def_vars = NewFunDefVars,
- call_vars = NewFunCallVars,
- arg_types = NewFunArgTypes}|
- Tail],
- NewRaceList, InitFun, FunArgs, FunTypes, RaceWarnTag,
- NewRaceVarMap, NewFunDefVars, NewFunCallVars,
- NewFunArgTypes, NewNestingLevel, Args, CodeB,
- Races#races.race_list),
- case RetCode of
- [#curr_fun{}|_CodeTail] ->
- {NewCurrFun, NewCurrFunLabel, RetCalls, RetCode,
- RetRaceList, NewRaceVarMap, NewFunDefVars,
- NewFunCallVars, NewFunArgTypes, RetNestingLevel};
- _Else ->
- {RetCurrFun, RetCurrFunLabel, RetCalls, RetCode,
- RetRaceList, RetRaceVarMap, RetFunDefVars,
- RetFunCallVars, RetFunArgTypes, RetNestingLevel}
- end
- end
- end,
- DepList ++
- fixup_race_forward_pullout(NewCurrFun1, NewCurrFunLabel1, NewCalls1,
- NewCode1, NewRaceList1, InitFun, WarnVarArgs,
- RaceWarnTag, NewRaceVarMap1, NewFunDefVars1,
- NewFunCallVars1, NewFunArgTypes1,
- NewNestingLevel1, State)
- end.
-
-fixup_race_forward(CurrFun, CurrFunLabel, Calls, Code, RaceList,
- InitFun, WarnVarArgs, RaceWarnTag, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NestingLevel,
- State) ->
- case Code of
- [] ->
- {[], CurrFun, CurrFunLabel, Calls, Code, RaceList, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NestingLevel};
- [Head|Tail] ->
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- {NewRL, DepList, NewNL, Return} =
- case Head of
- #dep_call{call_name = whereis} ->
- case RaceWarnTag of
- WarnWhereis when WarnWhereis =:= ?WARN_WHEREIS_REGISTER orelse
- WarnWhereis =:= ?WARN_WHEREIS_UNREGISTER ->
- 	 {[Head#dep_call{var_map = RaceVarMap}|RaceList],
- [], NestingLevel, false};
- _Other ->
- {RaceList, [], NestingLevel, false}
- end;
- #dep_call{call_name = ets_lookup} ->
- case RaceWarnTag of
- ?WARN_ETS_LOOKUP_INSERT ->
- {[Head#dep_call{var_map = RaceVarMap}|RaceList],
- [], NestingLevel, false};
- _Other ->
- {RaceList, [], NestingLevel, false}
- end;
- #dep_call{call_name = mnesia_dirty_read} ->
- case RaceWarnTag of
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- 	 {[Head#dep_call{var_map = RaceVarMap}|RaceList],
- [], NestingLevel, false};
- _Other ->
- {RaceList, [], NestingLevel, false}
- end;
-	 #warn_call{call_name = RegCall} when RegCall =:= register orelse
- RegCall =:= unregister ->
- case RaceWarnTag of
- WarnWhereis when WarnWhereis =:= ?WARN_WHEREIS_REGISTER orelse
- WarnWhereis =:= ?WARN_WHEREIS_UNREGISTER ->
- 	 {[Head#warn_call{var_map = RaceVarMap}|RaceList],
- [], NestingLevel, false};
- _Other ->
- {RaceList, [], NestingLevel, false}
- end;
- 	 #warn_call{call_name = ets_insert} ->
- case RaceWarnTag of
- ?WARN_ETS_LOOKUP_INSERT ->
- {[Head#warn_call{var_map = RaceVarMap}|RaceList],
- [], NestingLevel, false};
- _Other ->
- {RaceList, [], NestingLevel, false}
- end;
- 	 #warn_call{call_name = mnesia_dirty_write} ->
- case RaceWarnTag of
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- 	 {[Head#warn_call{var_map = RaceVarMap}|RaceList],
- [], NestingLevel, false};
- _Other ->
- {RaceList, [], NestingLevel, false}
- end;
- #fun_call{caller = CurrFun, callee = InitFun} ->
- {RaceList, [], NestingLevel, false};
-	 #fun_call{caller = CurrFun} ->
- {RaceList, [], NestingLevel - 1, false};
- beg_case ->
- {[Head|RaceList], [], NestingLevel, false};
- #beg_clause{} ->
- {[#beg_clause{}|RaceList], [], NestingLevel, false};
- #end_clause{} ->
- {[#end_clause{}|RaceList], [], NestingLevel, false};
- #end_case{} ->
- {[Head|RaceList], [], NestingLevel, false};
- #let_tag{} ->
- {RaceList, [], NestingLevel, false};
- #curr_fun{status = in, mfa = InitFun,
- label = _InitFunLabel, var_map = _NewRVM,
- def_vars = NewFDV, call_vars = NewFCV,
- arg_types = _NewFAT} ->
- {[#curr_fun{status = out, var_map = RaceVarMap,
- def_vars = NewFDV, call_vars = NewFCV}|
- RaceList], [], NestingLevel - 1, false};
- #curr_fun{status = in, def_vars = NewFDV,
- call_vars = NewFCV} ->
- {[#curr_fun{status = out, var_map = RaceVarMap,
- def_vars = NewFDV, call_vars = NewFCV}|
- RaceList],
- [], NestingLevel - 1, false};
- #curr_fun{status = out} ->
- {[#curr_fun{status = in, var_map = RaceVarMap}|RaceList], [],
- NestingLevel + 1, false};
- RaceTag ->
- PublicTables = dialyzer_callgraph:get_public_tables(Callgraph),
- NamedTables = dialyzer_callgraph:get_named_tables(Callgraph),
- WarnVarArgs1 =
- var_type_analysis(FunDefVars, FunArgTypes, WarnVarArgs,
- RaceWarnTag, RaceVarMap,
- dialyzer_dataflow:state__records_only(State)),
- {NewDepList, IsPublic, _Return} =
- get_deplist_paths(RaceList, WarnVarArgs1, RaceWarnTag,
- RaceVarMap, 0, PublicTables, NamedTables),
- {NewHead, NewDepList1} =
- case RaceTag of
- whereis_register ->
- {[#warn_call{call_name = register, args = WarnVarArgs,
- var_map = RaceVarMap}],
- NewDepList};
- whereis_unregister ->
- {[#warn_call{call_name = unregister, args = WarnVarArgs,
- var_map = RaceVarMap}],
- NewDepList};
- ets_lookup_insert ->
- NewWarnCall =
- [#warn_call{call_name = ets_insert, args = WarnVarArgs,
- var_map = RaceVarMap}],
- [Tab, Names, _, _] = WarnVarArgs,
- case IsPublic orelse
- compare_var_list(Tab, PublicTables, RaceVarMap)
- orelse
- length(Names -- NamedTables) < length(Names) of
- true ->
- {NewWarnCall, NewDepList};
- false -> {NewWarnCall, []}
- end;
- mnesia_dirty_read_write ->
- {[#warn_call{call_name = mnesia_dirty_write,
- args = WarnVarArgs, var_map = RaceVarMap}],
- NewDepList}
- end,
- {NewHead ++ RaceList, NewDepList1, NestingLevel,
- is_last_race(RaceTag, InitFun, Tail, Callgraph)}
- end,
- {NewCurrFun, NewCurrFunLabel, NewCode, NewRaceList, NewRaceVarMap,
- NewFunDefVars, NewFunCallVars, NewFunArgTypes, NewNestingLevel,
- PullOut} =
- case Head of
- #fun_call{caller = CurrFun} ->
- case NewNL =:= 0 of
- true ->
- {CurrFun, CurrFunLabel, Tail, NewRL, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NewNL, false};
- false ->
- {CurrFun, CurrFunLabel, Code, NewRL, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NewNL, true}
- end;
- #beg_clause{arg = Arg, pats = Pats, guard = Guard} ->
- {RaceVarMap1, RemoveClause} =
- race_var_map_guard(Arg, Pats, Guard, RaceVarMap, bind),
- case RemoveClause of
- true ->
- {RaceList2,
- #curr_fun{mfa = CurrFun2, label = CurrFunLabel2,
- var_map = RaceVarMap2, def_vars = FunDefVars2,
- call_vars = FunCallVars2, arg_types = FunArgTypes2},
- Code2, NestingLevel2} =
- remove_clause(NewRL,
- #curr_fun{mfa = CurrFun, label = CurrFunLabel,
- var_map = RaceVarMap1,
- def_vars = FunDefVars,
- call_vars = FunCallVars,
- arg_types = FunArgTypes},
- Tail, NewNL),
- {CurrFun2, CurrFunLabel2, Code2, RaceList2,
- RaceVarMap2, FunDefVars2, FunCallVars2, FunArgTypes2,
- NestingLevel2, false};
- false ->
- {CurrFun, CurrFunLabel, Tail, NewRL, RaceVarMap1,
- FunDefVars, FunCallVars, FunArgTypes, NewNL, false}
- end;
- #end_clause{arg = Arg, pats = Pats, guard = Guard} ->
- {RaceVarMap1, _RemoveClause} =
- race_var_map_guard(Arg, Pats, Guard, RaceVarMap, unbind),
- {CurrFun, CurrFunLabel, Tail, NewRL, RaceVarMap1,
- FunDefVars, FunCallVars, FunArgTypes, NewNL,
- false};
- #end_case{clauses = Clauses} ->
- RaceVarMap1 =
- race_var_map_clauses(Clauses, RaceVarMap),
- {CurrFun, CurrFunLabel, Tail, NewRL, RaceVarMap1,
- FunDefVars, FunCallVars, FunArgTypes, NewNL,
- false};
- #let_tag{var = Var, arg = Arg} ->
- {CurrFun, CurrFunLabel, Tail, NewRL,
- race_var_map(Var, Arg, RaceVarMap, bind), FunDefVars,
- FunCallVars, FunArgTypes, NewNL, false};
- #curr_fun{mfa = CurrFun1, label = CurrFunLabel1,
- var_map = RaceVarMap1, def_vars = FunDefVars1,
- call_vars = FunCallVars1, arg_types = FunArgTypes1} ->
- case NewNL =:= 0 of
- true ->
- {CurrFun, CurrFunLabel,
- remove_nonlocal_functions(Tail, 1), NewRL, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NewNL, false};
- false ->
- {CurrFun1, CurrFunLabel1, Tail, NewRL, RaceVarMap1,
- FunDefVars1, FunCallVars1, FunArgTypes1, NewNL, false}
- end;
- _Thing ->
- {CurrFun, CurrFunLabel, Tail, NewRL, RaceVarMap,
- FunDefVars, FunCallVars, FunArgTypes, NewNL, false}
- end,
- case Return of
- true ->
- {DepList, NewCurrFun, NewCurrFunLabel, Calls,
- [], NewRaceList, NewRaceVarMap, NewFunDefVars,
- NewFunCallVars, NewFunArgTypes, NewNestingLevel};
- false ->
- NewNestingLevel1 =
- case NewNestingLevel =:= 0 of
- true -> NewNestingLevel + 1;
- false -> NewNestingLevel
- end,
- case PullOut of
- true ->
- {DepList, NewCurrFun, NewCurrFunLabel, Calls,
- NewCode, NewRaceList, NewRaceVarMap, NewFunDefVars,
- NewFunCallVars, NewFunArgTypes, NewNestingLevel1};
- false ->
- {RetDepList, NewCurrFun1, NewCurrFunLabel1, NewCalls1,
- NewCode1, NewRaceList1, NewRaceVarMap1, NewFunDefVars1,
- NewFunCallVars1, NewFunArgTypes1, NewNestingLevel2} =
- fixup_race_forward(NewCurrFun, NewCurrFunLabel, Calls,
- NewCode, NewRaceList, InitFun, WarnVarArgs,
- RaceWarnTag, NewRaceVarMap, NewFunDefVars,
- NewFunCallVars, NewFunArgTypes,
- NewNestingLevel1, State),
- {DepList ++ RetDepList, NewCurrFun1, NewCurrFunLabel1,
- NewCalls1, NewCode1, NewRaceList1, NewRaceVarMap1,
- NewFunDefVars1, NewFunCallVars1, NewFunArgTypes1,
- NewNestingLevel2}
- end
- end
- end.
-
-get_deplist_paths(RaceList, WarnVarArgs, RaceWarnTag, RaceVarMap, CurrLevel,
- PublicTables, NamedTables) ->
- case RaceList of
- [] -> {[], false, true};
- [Head|Tail] ->
- case Head of
- #end_case{} ->
- {RaceList1, DepList1, IsPublic1, Continue1} =
- handle_case(Tail, WarnVarArgs, RaceWarnTag, RaceVarMap, CurrLevel,
- PublicTables, NamedTables),
- case Continue1 of
- true ->
- {DepList2, IsPublic2, Continue2} =
- get_deplist_paths(RaceList1, WarnVarArgs, RaceWarnTag,
- RaceVarMap, CurrLevel, PublicTables,
- NamedTables),
- {DepList1 ++ DepList2, IsPublic1 orelse IsPublic2, Continue2};
- false -> {DepList1, IsPublic1, false}
- end;
- #beg_clause{} ->
- get_deplist_paths(fixup_before_case_path(Tail), WarnVarArgs,
- RaceWarnTag, RaceVarMap, CurrLevel, PublicTables,
- NamedTables);
- #curr_fun{status = in, var_map = RaceVarMap1} ->
- {DepList, IsPublic, Continue} =
- get_deplist_paths(Tail, WarnVarArgs, RaceWarnTag, RaceVarMap,
- CurrLevel + 1, PublicTables, NamedTables),
- IsPublic1 =
- case RaceWarnTag of
- ?WARN_ETS_LOOKUP_INSERT ->
- [Tabs, Names, _, _] = WarnVarArgs,
- IsPublic orelse
- lists:any(
- fun (T) ->
- compare_var_list(T, PublicTables, RaceVarMap1)
- end, Tabs)
- orelse
- length(Names -- NamedTables) < length(Names);
- _ -> true
- end,
- {DepList, IsPublic1, Continue};
- #curr_fun{status = out, var_map = RaceVarMap1, def_vars = FunDefVars,
- call_vars = FunCallVars} ->
- WarnVarArgs1 =
- var_analysis([format_arg(DefVar) || DefVar <- FunDefVars],
- [format_arg(CallVar) || CallVar <- FunCallVars],
- WarnVarArgs, RaceWarnTag),
- {WarnVarArgs2, Stop} =
- case RaceWarnTag of
- ?WARN_WHEREIS_REGISTER ->
- [WVA1, WVA2, WVA3, WVA4] = WarnVarArgs1,
- Vars =
- lists:flatten(
- [find_all_bound_vars(V, RaceVarMap1) || V <- WVA1]),
- case {Vars, CurrLevel} of
- {[], 0} ->
- {WarnVarArgs, true};
- {[], _} ->
- {WarnVarArgs, false};
- _ ->
- {[Vars, WVA2, WVA3, WVA4], false}
- end;
- ?WARN_WHEREIS_UNREGISTER ->
- [WVA1, WVA2] = WarnVarArgs1,
- Vars =
- lists:flatten(
- [find_all_bound_vars(V, RaceVarMap1) || V <- WVA1]),
- case {Vars, CurrLevel} of
- {[], 0} ->
- {WarnVarArgs, true};
- {[], _} ->
- {WarnVarArgs, false};
- _ ->
- {[Vars, WVA2], false}
- end;
- ?WARN_ETS_LOOKUP_INSERT ->
- [WVA1, WVA2, WVA3, WVA4] = WarnVarArgs1,
- Vars1 =
- lists:flatten(
- [find_all_bound_vars(V1, RaceVarMap1) || V1 <- WVA1]),
- Vars2 =
- lists:flatten(
- [find_all_bound_vars(V2, RaceVarMap1) || V2 <- WVA3]),
- case {Vars1, Vars2, CurrLevel} of
- {[], _, 0} ->
- {WarnVarArgs, true};
- {[], _, _} ->
- {WarnVarArgs, false};
- {_, [], 0} ->
- {WarnVarArgs, true};
- {_, [], _} ->
- {WarnVarArgs, false};
- _ ->
- {[Vars1, WVA2, Vars2, WVA4], false}
- end;
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- [WVA1, WVA2|T] = WarnVarArgs1,
- Vars =
- lists:flatten(
- [find_all_bound_vars(V, RaceVarMap1) || V <- WVA1]),
- case {Vars, CurrLevel} of
- {[], 0} ->
- {WarnVarArgs, true};
- {[], _} ->
- {WarnVarArgs, false};
- _ ->
- {[Vars, WVA2|T], false}
- end
- end,
- case Stop of
- true -> {[], false, false};
- false ->
- CurrLevel1 =
- case CurrLevel of
- 0 -> CurrLevel;
- _ -> CurrLevel - 1
- end,
- get_deplist_paths(Tail, WarnVarArgs2, RaceWarnTag, RaceVarMap1,
- CurrLevel1, PublicTables, NamedTables)
- end;
- #warn_call{call_name = RegCall, args = WarnVarArgs1,
- var_map = RaceVarMap1} when RegCall =:= register orelse
- RegCall =:= unregister ->
- case compare_first_arg(WarnVarArgs, WarnVarArgs1, RaceVarMap1) of
- true -> {[], false, false};
- NewWarnVarArgs ->
- get_deplist_paths(Tail, NewWarnVarArgs, RaceWarnTag, RaceVarMap,
- CurrLevel, PublicTables, NamedTables)
- end;
- #warn_call{call_name = ets_insert, args = WarnVarArgs1,
- var_map = RaceVarMap1} ->
- case compare_ets_insert(WarnVarArgs, WarnVarArgs1, RaceVarMap1) of
- true -> {[], false, false};
- NewWarnVarArgs ->
- get_deplist_paths(Tail, NewWarnVarArgs, RaceWarnTag, RaceVarMap,
- CurrLevel, PublicTables, NamedTables)
- end;
- #warn_call{call_name = mnesia_dirty_write, args = WarnVarArgs1,
- var_map = RaceVarMap1} ->
- case compare_first_arg(WarnVarArgs, WarnVarArgs1, RaceVarMap1) of
- true -> {[], false, false};
- NewWarnVarArgs ->
- get_deplist_paths(Tail, NewWarnVarArgs, RaceWarnTag, RaceVarMap,
- CurrLevel, PublicTables, NamedTables)
- end;
- #dep_call{var_map = RaceVarMap1} ->
- {DepList, IsPublic, Continue} =
- get_deplist_paths(Tail, WarnVarArgs, RaceWarnTag, RaceVarMap,
- CurrLevel, PublicTables, NamedTables),
- {refine_race(Head, WarnVarArgs, RaceWarnTag, DepList, RaceVarMap1),
-	 IsPublic, Continue}
- end
- end.
-
-handle_case(RaceList, WarnVarArgs, RaceWarnTag, RaceVarMap, CurrLevel,
- PublicTables, NamedTables) ->
- case RaceList of
- [] -> {[], [], false, true};
- [Head|Tail] ->
- case Head of
- #end_clause{} ->
- {RestRaceList, DepList1, IsPublic1, Continue1} =
- do_clause(Tail, WarnVarArgs, RaceWarnTag, RaceVarMap, CurrLevel,
- PublicTables, NamedTables),
- {RetRaceList, DepList2, IsPublic2, Continue2} =
- handle_case(RestRaceList, WarnVarArgs, RaceWarnTag, RaceVarMap,
- CurrLevel, PublicTables, NamedTables),
- {RetRaceList, DepList1 ++ DepList2, IsPublic1 orelse IsPublic2,
- Continue1 orelse Continue2};
- beg_case -> {Tail, [], false, false}
- end
- end.
-
-do_clause(RaceList, WarnVarArgs, RaceWarnTag, RaceVarMap, CurrLevel,
- PublicTables, NamedTables) ->
- {DepList, IsPublic, Continue} =
- get_deplist_paths(fixup_case_path(RaceList, 0), WarnVarArgs,
-		 RaceWarnTag, RaceVarMap, CurrLevel,
- PublicTables, NamedTables),
- {fixup_case_rest_paths(RaceList, 0), DepList, IsPublic, Continue}.
-
-fixup_case_path(RaceList, NestingLevel) ->
- case RaceList of
- [] -> [];
- [Head|Tail] ->
- {NewNestingLevel, Return} =
- case Head of
- beg_case -> {NestingLevel - 1, false};
- #end_case{} -> {NestingLevel + 1, false};
- #beg_clause{} ->
- case NestingLevel =:= 0 of
- true -> {NestingLevel, true};
- false -> {NestingLevel, false}
- end;
- _Other -> {NestingLevel, false}
- end,
- case Return of
- true -> [];
- false -> [Head|fixup_case_path(Tail, NewNestingLevel)]
- end
- end.
-
-%% Gets the race list before a case clause.
-fixup_before_case_path(RaceList) ->
- case RaceList of
- [] -> [];
- [Head|Tail] ->
- case Head of
- #end_clause{} ->
- fixup_before_case_path(fixup_case_rest_paths(Tail, 0));
- beg_case -> Tail
- end
- end.
-
-fixup_case_rest_paths(RaceList, NestingLevel) ->
- case RaceList of
- [] -> [];
- [Head|Tail] ->
- {NewNestingLevel, Return} =
- case Head of
- beg_case -> {NestingLevel - 1, false};
- #end_case{} -> {NestingLevel + 1, false};
- #beg_clause{} ->
- case NestingLevel =:= 0 of
- true -> {NestingLevel, true};
- false -> {NestingLevel, false}
- end;
- _Other -> {NestingLevel, false}
- end,
- case Return of
- true -> Tail;
- false -> fixup_case_rest_paths(Tail, NewNestingLevel)
- end
- end.
-
-fixup_race_forward_helper(CurrFun, CurrFunLabel, Fun, FunLabel,
- Calls, CallsToAnalyze, Code, RaceList,
- InitFun, NewFunArgs, NewFunTypes,
- RaceWarnTag, RaceVarMap, FunDefVars,
- FunCallVars, FunArgTypes, NestingLevel,
- Args, CodeB, StateRaceList) ->
- case Calls of
- [] ->
- {NewRaceList,
- #curr_fun{mfa = NewCurrFun, label = NewCurrFunLabel,
- var_map = NewRaceVarMap, def_vars = NewFunDefVars,
- call_vars = NewFunCallVars, arg_types = NewFunArgTypes},
- NewCode, NewNestingLevel} =
- remove_clause(RaceList,
- #curr_fun{mfa = CurrFun, label = CurrFunLabel, var_map = RaceVarMap,
- def_vars = FunDefVars, call_vars = FunCallVars,
- arg_types = FunArgTypes},
- Code, NestingLevel),
- {NewCurrFun, NewCurrFunLabel, CallsToAnalyze, NewCode, NewRaceList,
- NewRaceVarMap, NewFunDefVars, NewFunCallVars, NewFunArgTypes,
- NewNestingLevel};
- [Head|Tail] ->
- case Head of
- {InitFun, InitFun} when CurrFun =:= InitFun, Fun =:= InitFun ->
- NewCallsToAnalyze = lists:delete(Head, CallsToAnalyze),
- NewRaceVarMap =
- race_var_map(Args, NewFunArgs, RaceVarMap, bind),
- RetC =
- fixup_all_calls(InitFun, InitFun, FunLabel, Args,
- CodeB ++
- [#curr_fun{status = out, mfa = InitFun,
- label = CurrFunLabel, var_map = RaceVarMap,
- def_vars = FunDefVars, call_vars = FunCallVars,
- arg_types = FunArgTypes}],
- Code, RaceVarMap),
- NewCode =
- fixup_all_calls(InitFun, InitFun, FunLabel, Args,
- CodeB ++
- [#curr_fun{status = out, mfa = InitFun,
- label = CurrFunLabel, var_map = NewRaceVarMap,
- def_vars = Args, call_vars = NewFunArgs,
- arg_types = NewFunTypes}],
- [#curr_fun{status = in, mfa = Fun,
- label = FunLabel, var_map = NewRaceVarMap,
- def_vars = Args, call_vars = NewFunArgs,
- arg_types = NewFunTypes}|
- lists:reverse(StateRaceList)] ++
- RetC, NewRaceVarMap),
- {InitFun, FunLabel, NewCallsToAnalyze, NewCode, RaceList,
- NewRaceVarMap, Args, NewFunArgs, NewFunTypes, NestingLevel};
- {CurrFun, Fun} ->
- NewCallsToAnalyze = lists:delete(Head, CallsToAnalyze),
- NewRaceVarMap = race_var_map(Args, NewFunArgs, RaceVarMap, bind),
- RetC =
- case Fun of
- InitFun ->
- fixup_all_calls(CurrFun, Fun, FunLabel, Args,
- lists:reverse(StateRaceList) ++
- [#curr_fun{status = out, mfa = CurrFun,
- label = CurrFunLabel, var_map = RaceVarMap,
- def_vars = FunDefVars, call_vars = FunCallVars,
- arg_types = FunArgTypes}],
- Code, RaceVarMap);
- _Other1 ->
- fixup_all_calls(CurrFun, Fun, FunLabel, Args,
- CodeB ++
- [#curr_fun{status = out, mfa = CurrFun,
- label = CurrFunLabel, var_map = RaceVarMap,
- def_vars = FunDefVars, call_vars = FunCallVars,
- arg_types = FunArgTypes}],
- Code, RaceVarMap)
- end,
- NewCode =
- case Fun of
- InitFun ->
- [#curr_fun{status = in, mfa = Fun,
- label = FunLabel, var_map = NewRaceVarMap,
- def_vars = Args, call_vars = NewFunArgs,
- arg_types = NewFunTypes}|
- lists:reverse(StateRaceList)] ++ RetC;
- _ ->
- [#curr_fun{status = in, mfa = Fun,
- label = FunLabel, var_map = NewRaceVarMap,
- def_vars = Args, call_vars = NewFunArgs,
- arg_types = NewFunTypes}|CodeB] ++
- RetC
- end,
- {Fun, FunLabel, NewCallsToAnalyze, NewCode, RaceList, NewRaceVarMap,
- Args, NewFunArgs, NewFunTypes, NestingLevel};
-	{_TupleA, _TupleB} ->
-	 fixup_race_forward_helper(CurrFun, CurrFunLabel, Fun, FunLabel,
- Tail, CallsToAnalyze, Code, RaceList, InitFun, NewFunArgs,
- NewFunTypes, RaceWarnTag, RaceVarMap, FunDefVars, FunCallVars,
- FunArgTypes, NestingLevel, Args, CodeB, StateRaceList)
- end
- end.
-
-%%% ===========================================================================
-%%%
-%%% Backward Analysis
-%%%
-%%% ===========================================================================
-
-fixup_race_backward(CurrFun, Calls, CallsToAnalyze, Parents, Height) ->
- case Height =:= 0 of
- true -> Parents;
- false ->
- case Calls of
- [] ->
- case is_integer(CurrFun) orelse lists:member(CurrFun, Parents) of
- true -> Parents;
- false -> [CurrFun|Parents]
- end;
- [Head|Tail] ->
-	 {Parent, TupleB} = Head,
-	 case TupleB =:= CurrFun of
- true -> % more paths are needed
- NewCallsToAnalyze = lists:delete(Head, CallsToAnalyze),
- NewParents =
- fixup_race_backward(Parent, NewCallsToAnalyze,
-				 NewCallsToAnalyze, Parents, Height - 1),
- fixup_race_backward(CurrFun, Tail, NewCallsToAnalyze, NewParents,
-				 Height);
- false ->
- fixup_race_backward(CurrFun, Tail, CallsToAnalyze, Parents,
- Height)
- end
- end
- end.
-
-%%% ===========================================================================
-%%%
-%%% Utilities
-%%%
-%%% ===========================================================================
-
-are_bound_labels(Label1, Label2, RaceVarMap) ->
- case dict:find(Label1, RaceVarMap) of
- error -> false;
- {ok, Labels} ->
- lists:member(Label2, Labels) orelse
- are_bound_labels_helper(Labels, Label1, Label2, RaceVarMap)
- end.
-
-are_bound_labels_helper(Labels, OldLabel, CompLabel, RaceVarMap) ->
- case dict:size(RaceVarMap) of
- 0 -> false;
- _ ->
- case Labels of
- [] -> false;
- [Head|Tail] ->
- NewRaceVarMap = dict:erase(OldLabel, RaceVarMap),
- are_bound_labels(Head, CompLabel, NewRaceVarMap) orelse
-	 are_bound_labels_helper(Tail, Head, CompLabel, NewRaceVarMap)
- end
- end.
-
-are_bound_vars(Vars1, Vars2, RaceVarMap) ->
- case is_list(Vars1) andalso is_list(Vars2) of
- true ->
- case Vars1 of
-	[] -> false;
-	[AHead|ATail] ->
-	 case Vars2 of
-	 [] -> false;
-	 [PHead|PTail] ->
-	 are_bound_vars(AHead, PHead, RaceVarMap) andalso
-		are_bound_vars(ATail, PTail, RaceVarMap)
-	 end
- end;
- false ->
- {NewVars1, NewVars2, IsList} =
-	case is_list(Vars1) of
-	 true ->
-	 case Vars1 of
-	 [Var1] -> {Var1, Vars2, true};
-	 _Thing -> {Vars1, Vars2, false}
-	 end;
-	 false ->
-	 case is_list(Vars2) of
-	 true ->
-		case Vars2 of
-		 [Var2] -> {Vars1, Var2, true};
-		 _Thing -> {Vars1, Vars2, false}
-		end;
-	 false -> {Vars1, Vars2, true}
-	 end
-	end,
- case IsList of
-	true ->
-	 case cerl:type(NewVars1) of
-	 var ->
-	 case cerl:type(NewVars2) of
-		var ->
-		 ALabel = cerl_trees:get_label(NewVars1),
-		 PLabel = cerl_trees:get_label(NewVars2),
-		 are_bound_labels(ALabel, PLabel, RaceVarMap) orelse
-		 are_bound_labels(PLabel, ALabel, RaceVarMap);
-		alias ->
-		 are_bound_vars(NewVars1, cerl:alias_var(NewVars2),
-				 RaceVarMap);
-		values ->
-		 are_bound_vars(NewVars1, cerl:values_es(NewVars2),
-				 RaceVarMap);
-		_Other -> false
-	 end;
-	 tuple ->
-	 case cerl:type(NewVars2) of
-		tuple ->
-		 are_bound_vars(cerl:tuple_es(NewVars1),
-				 cerl:tuple_es(NewVars2), RaceVarMap);
-		alias ->
-		 are_bound_vars(NewVars1, cerl:alias_var(NewVars2),
-				 RaceVarMap);
-		values ->
-		 are_bound_vars(NewVars1, cerl:values_es(NewVars2),
-				 RaceVarMap);
-		_Other -> false
-	 end;
-	 cons ->
-	 case cerl:type(NewVars2) of
-		cons ->
-		 are_bound_vars(cerl:cons_hd(NewVars1),
-				 cerl:cons_hd(NewVars2), RaceVarMap)
-		 andalso
-		 are_bound_vars(cerl:cons_tl(NewVars1),
-				 cerl:cons_tl(NewVars2), RaceVarMap);
-		alias ->
-		 are_bound_vars(NewVars1, cerl:alias_var(NewVars2),
-				 RaceVarMap);
-		values ->
-		 are_bound_vars(NewVars1, cerl:values_es(NewVars2),
-				 RaceVarMap);
-		_Other -> false
-	 end;
-	 alias ->
-	 case cerl:type(NewVars2) of
-		alias ->
-		 are_bound_vars(cerl:alias_var(NewVars1),
-				 cerl:alias_var(NewVars2), RaceVarMap);
-		_Other ->
-		 are_bound_vars(cerl:alias_var(NewVars1),
-				 NewVars2, RaceVarMap)
-	 end;
-	 values ->
-	 case cerl:type(NewVars2) of
-		values ->
-		 are_bound_vars(cerl:values_es(NewVars1),
-				 cerl:values_es(NewVars2), RaceVarMap);
-		_Other ->
-		 are_bound_vars(cerl:values_es(NewVars1),
-				 NewVars2, RaceVarMap)
-	 end;
-	 _Other -> false
-	 end;
-	false -> false
- end
- end.
-
-callgraph__renew_tables(Table, Callgraph) ->
- case Table of
- {named, NameLabel, Names} ->
- PTablesToAdd =
- case NameLabel of
- ?no_label -> [];
- _Other -> [NameLabel]
- end,
- NamesToAdd = filter_named_tables(Names),
- PTables = dialyzer_callgraph:get_public_tables(Callgraph),
- NTables = dialyzer_callgraph:get_named_tables(Callgraph),
- dialyzer_callgraph:put_public_tables(
- lists:usort(PTablesToAdd ++ PTables),
- dialyzer_callgraph:put_named_tables(
- NamesToAdd ++ NTables, Callgraph));
- _Other ->
- Callgraph
- end.
-
-cleanup_clause_code(#curr_fun{mfa = CurrFun} = CurrTuple, Code,
- NestingLevel, LocalNestingLevel) ->
- case Code of
- [] -> {CurrTuple, []};
- [Head|Tail] ->
- {NewLocalNestingLevel, NewNestingLevel, NewCurrTuple, Return} =
- case Head of
- beg_case ->
- {LocalNestingLevel, NestingLevel + 1, CurrTuple, false};
- #end_case{} ->
- {LocalNestingLevel, NestingLevel - 1, CurrTuple, false};
- #end_clause{} ->
- case NestingLevel =:= 0 of
- true ->
- {LocalNestingLevel, NestingLevel, CurrTuple, true};
- false ->
- {LocalNestingLevel, NestingLevel, CurrTuple, false}
- end;
- #fun_call{caller = CurrFun} ->
- {LocalNestingLevel - 1, NestingLevel, CurrTuple, false};
- #curr_fun{status = in} ->
- {LocalNestingLevel - 1, NestingLevel, Head, false};
- #curr_fun{status = out} ->
- {LocalNestingLevel + 1, NestingLevel, Head, false};
- Other when Other =/= #fun_call{} ->
- {LocalNestingLevel, NestingLevel, CurrTuple, false}
- end,
- case Return of
- true -> {NewCurrTuple, Tail};
- false ->
- cleanup_clause_code(NewCurrTuple, Tail, NewNestingLevel,
- NewLocalNestingLevel)
- end
- end.
-
-cleanup_dep_calls(DepList) ->
- case DepList of
- [] -> [];
- [#dep_call{call_name = CallName, arg_types = ArgTypes,
- vars = Vars, state = State, file_loc = FileLocation}|T] ->
- [#dep_call{call_name = CallName, arg_types = ArgTypes,
- vars = Vars, state = State, file_loc = FileLocation}|
- cleanup_dep_calls(T)]
- end.
-
-cleanup_race_code(State) ->
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- dialyzer_dataflow:state__put_callgraph(
- dialyzer_callgraph:race_code_new(Callgraph), State).
-
-filter_named_tables(NamesList) ->
- case NamesList of
- [] -> [];
- [Head|Tail] ->
- NewHead =
- case string:find(Head, "()", trailing) of
- nomatch -> [Head];
- _Other -> []
- end,
- NewHead ++ filter_named_tables(Tail)
- end.
-
-filter_parents(Parents, NewParents, Digraph) ->
- case Parents of
- [] -> NewParents;
- [Head|Tail] ->
- NewParents1 = filter_parents_helper1(Head, Tail, NewParents, Digraph),
- filter_parents(Tail, NewParents1, Digraph)
- end.
-
-filter_parents_helper1(First, Rest, NewParents, Digraph) ->
- case Rest of
- [] -> NewParents;
- [Head|Tail] ->
- NewParents1 = filter_parents_helper2(First, Head, NewParents, Digraph),
- filter_parents_helper1(First, Tail, NewParents1, Digraph)
- end.
-
-filter_parents_helper2(Parent1, Parent2, NewParents, Digraph) ->
- case digraph:get_path(Digraph, Parent1, Parent2) of
- false ->
- case digraph:get_path(Digraph, Parent2, Parent1) of
- false -> NewParents;
- _Vertices -> NewParents -- [Parent1]
- end;
- _Vertices -> NewParents -- [Parent2]
- end.
-
-find_all_bound_vars(Label, RaceVarMap) ->
- case dict:find(Label, RaceVarMap) of
- error -> [Label];
- {ok, Labels} ->
- lists:usort(Labels ++
- find_all_bound_vars_helper(Labels, Label, RaceVarMap))
- end.
-
-find_all_bound_vars_helper(Labels, Label, RaceVarMap) ->
- case dict:size(RaceVarMap) of
- 0 -> [];
- _ ->
- case Labels of
- [] -> [];
- [Head|Tail] ->
- NewRaceVarMap = dict:erase(Label, RaceVarMap),
- find_all_bound_vars(Head, NewRaceVarMap) ++
-	 find_all_bound_vars_helper(Tail, Head, NewRaceVarMap)
- end
- end.
-
-fixup_all_calls(CurrFun, NextFun, NextFunLabel, Args, CodeToReplace,
- Code, RaceVarMap) ->
- case Code of
- [] -> [];
- [Head|Tail] ->
- NewCode =
- case Head of
- #fun_call{caller = CurrFun, callee = Callee,
- arg_types = FunArgTypes, vars = FunArgs}
- when Callee =:= NextFun orelse Callee =:= NextFunLabel ->
- RaceVarMap1 = race_var_map(Args, FunArgs, RaceVarMap, bind),
- [#curr_fun{status = in, mfa = NextFun, label = NextFunLabel,
- var_map = RaceVarMap1, def_vars = Args,
- call_vars = FunArgs, arg_types = FunArgTypes}|
- CodeToReplace];
- _Other -> [Head]
- end,
- RetCode =
- fixup_all_calls(CurrFun, NextFun, NextFunLabel, Args, CodeToReplace,
- Tail, RaceVarMap),
- NewCode ++ RetCode
- end.
-
-is_last_race(RaceTag, InitFun, Code, Callgraph) ->
- case Code of
- [] -> true;
- [Head|Tail] ->
- case Head of
- RaceTag -> false;
- #fun_call{callee = Fun} ->
- FunName =
- case is_integer(Fun) of
- true ->
- case dialyzer_callgraph:lookup_name(Fun, Callgraph) of
- error -> Fun;
- {ok, Name} -> Name
- end;
- false -> Fun
- end,
- Digraph = dialyzer_callgraph:get_digraph(Callgraph),
- case FunName =:= InitFun orelse
- digraph:get_path(Digraph, FunName, InitFun) of
- false -> is_last_race(RaceTag, InitFun, Tail, Callgraph);
- _Vertices -> false
- end;
- _Other -> is_last_race(RaceTag, InitFun, Tail, Callgraph)
- end
- end.
-
-lists_key_member(Member, List, N) when is_integer(Member) ->
- case List of
- [] -> 0;
- [Head|Tail] ->
- NewN = N + 1,
- case Head of
- Member -> NewN;
- _Other -> lists_key_member(Member, Tail, NewN)
- end
- end;
-lists_key_member(_M, _L, _N) ->
- 0.
-
-lists_key_member_lists(MemberList, List) ->
- case MemberList of
- [] -> 0;
- [Head|Tail] ->
- case lists_key_member(Head, List, 0) of
- 0 -> lists_key_member_lists(Tail, List);
- Other -> Other
- end
- end.
-
-lists_key_members_lists(MemberList, List) ->
- case MemberList of
- [] -> [];
- [Head|Tail] ->
- lists:usort(
- lists_key_members_lists_helper(Head, List, 1) ++
- lists_key_members_lists(Tail, List))
- end.
-
-lists_key_members_lists_helper(Elem, List, N) when is_integer(Elem) ->
- case List of
- [] -> [];
- [Head|Tail] ->
- NewHead =
- case Head =:= Elem of
- true -> [N];
- false -> []
- end,
- NewHead ++ lists_key_members_lists_helper(Elem, Tail, N + 1)
- end;
-lists_key_members_lists_helper(_Elem, _List, _N) ->
- [0].
-
-lists_key_replace(N, List, NewMember) ->
- {Before, [_|After]} = lists:split(N - 1, List),
- Before ++ [NewMember|After].
-
-lists_get(0, _List) -> ?no_label;
-lists_get(N, List) -> lists:nth(N, List).
-
-refine_race(RaceCall, WarnVarArgs, RaceWarnTag, DependencyList, RaceVarMap) ->
- case RaceWarnTag of
- WarnWhereis when WarnWhereis =:= ?WARN_WHEREIS_REGISTER orelse
- WarnWhereis =:= ?WARN_WHEREIS_UNREGISTER ->
- case RaceCall of
- #dep_call{call_name = ets_lookup} ->
- DependencyList;
- #dep_call{call_name = mnesia_dirty_read} ->
- DependencyList;
- #dep_call{call_name = whereis, args = VarArgs} ->
- refine_race_helper(RaceCall, VarArgs, WarnVarArgs, RaceWarnTag,
- DependencyList, RaceVarMap)
- end;
- ?WARN_ETS_LOOKUP_INSERT ->
- case RaceCall of
- #dep_call{call_name = whereis} ->
- DependencyList;
- #dep_call{call_name = mnesia_dirty_read} ->
- DependencyList;
- #dep_call{call_name = ets_lookup, args = VarArgs} ->
- refine_race_helper(RaceCall, VarArgs, WarnVarArgs, RaceWarnTag,
- DependencyList, RaceVarMap)
- end;
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- case RaceCall of
- #dep_call{call_name = whereis} ->
- DependencyList;
- #dep_call{call_name = ets_lookup} ->
- DependencyList;
- #dep_call{call_name = mnesia_dirty_read, args = VarArgs} ->
- refine_race_helper(RaceCall, VarArgs, WarnVarArgs, RaceWarnTag,
- DependencyList, RaceVarMap)
- end
- end.
-
-refine_race_helper(RaceCall, VarArgs, WarnVarArgs, RaceWarnTag, DependencyList,
- RaceVarMap) ->
- case compare_types(VarArgs, WarnVarArgs, RaceWarnTag, RaceVarMap) of
- true -> [RaceCall|DependencyList];
- false -> DependencyList
- end.
-
-remove_clause(RaceList, CurrTuple, Code, NestingLevel) ->
- NewRaceList = fixup_case_rest_paths(RaceList, 0),
- {NewCurrTuple, NewCode} =
- cleanup_clause_code(CurrTuple, Code, 0, NestingLevel),
- ReturnTuple = {NewRaceList, NewCurrTuple, NewCode, NestingLevel},
- case NewRaceList of
- [beg_case|RTail] ->
- case NewCode of
- [#end_case{}|CTail] ->
- remove_clause(RTail, NewCurrTuple, CTail, NestingLevel);
- _Other -> ReturnTuple
- end;
- _Else -> ReturnTuple
- end.
-
-remove_nonlocal_functions(Code, NestingLevel) ->
- case Code of
- [] -> [];
- [H|T] ->
- NewNL =
- case H of
- #curr_fun{status = in} ->
- NestingLevel + 1;
- #curr_fun{status = out} ->
- NestingLevel - 1;
- _Other ->
- NestingLevel
- end,
- case NewNL =:= 0 of
- true -> T;
- false -> remove_nonlocal_functions(T, NewNL)
- end
- end.
-
-renew_curr_fun(CurrFun, Races) ->
- Races#races{curr_fun = CurrFun}.
-
-renew_curr_fun_label(CurrFunLabel, Races) ->
- Races#races{curr_fun_label = CurrFunLabel}.
-
-renew_race_list(RaceList, Races) ->
- Races#races{race_list = RaceList}.
-
-renew_race_list_size(RaceListSize, Races) ->
- Races#races{race_list_size = RaceListSize}.
-
-renew_race_tags(RaceTags, Races) ->
- Races#races{race_tags = RaceTags}.
-
-renew_table(Table, Races) ->
- Races#races{new_table = Table}.
-
-state__renew_curr_fun(CurrFun, State) ->
- Races = dialyzer_dataflow:state__get_races(State),
- dialyzer_dataflow:state__put_races(renew_curr_fun(CurrFun, Races), State).
-
-state__renew_curr_fun_label(CurrFunLabel, State) ->
- Races = dialyzer_dataflow:state__get_races(State),
- dialyzer_dataflow:state__put_races(
- renew_curr_fun_label(CurrFunLabel, Races), State).
-
-state__renew_race_list(RaceList, State) ->
- Races = dialyzer_dataflow:state__get_races(State),
- dialyzer_dataflow:state__put_races(renew_race_list(RaceList, Races), State).
-
-state__renew_race_tags(RaceTags, State) ->
- Races = dialyzer_dataflow:state__get_races(State),
- dialyzer_dataflow:state__put_races(renew_race_tags(RaceTags, Races), State).
-
-state__renew_info(RaceList, RaceListSize, RaceTags, Table, State) ->
- Callgraph = dialyzer_dataflow:state__get_callgraph(State),
- Races = dialyzer_dataflow:state__get_races(State),
- dialyzer_dataflow:state__put_callgraph(
- callgraph__renew_tables(Table, Callgraph),
- dialyzer_dataflow:state__put_races(
- renew_table(Table,
- renew_race_list(RaceList,
- renew_race_list_size(RaceListSize,
- renew_race_tags(RaceTags, Races)))), State)).
-
-%%% ===========================================================================
-%%%
-%%% Variable and Type Utilities
-%%%
-%%% ===========================================================================
-
-any_args(StrList) ->
- case StrList of
- [] -> false;
- [Head|Tail] ->
- case string:find(Head, "()", trailing) of
- nomatch -> any_args(Tail);
- _Other -> true
- end
- end.
-
--spec bind_dict_vars(label(), label(), dict:dict()) -> dict:dict().
-
-bind_dict_vars(Key, Label, RaceVarMap) ->
- case Key =:= Label of
- true -> RaceVarMap;
- false ->
- case dict:find(Key, RaceVarMap) of
-	error -> dict:store(Key, [Label], RaceVarMap);
-	{ok, Labels} ->
-	 case lists:member(Label, Labels) of
-	 true -> RaceVarMap;
-	 false -> dict:store(Key, [Label|Labels], RaceVarMap)
-	 end
- end
- end.
-
-bind_dict_vars_list(Key, Labels, RaceVarMap) ->
- case Labels of
- [] -> RaceVarMap;
- [Head|Tail] ->
- bind_dict_vars_list(Key, Tail, bind_dict_vars(Key, Head, RaceVarMap))
- end.
-
-compare_ets_insert(OldWarnVarArgs, NewWarnVarArgs, RaceVarMap) ->
- [Old1, Old2, Old3, Old4] = OldWarnVarArgs,
- [New1, New2, New3, New4] = NewWarnVarArgs,
- Bool =
- case any_args(Old2) of
- true -> compare_var_list(New1, Old1, RaceVarMap);
- false ->
- case any_args(New2) of
- true -> compare_var_list(New1, Old1, RaceVarMap);
- false -> compare_var_list(New1, Old1, RaceVarMap)
- orelse (Old2 =:= New2)
- end
- end,
- case Bool of
- true ->
- case any_args(Old4) of
- true ->
- case compare_list_vars(Old3, ets_list_args(New3), [], RaceVarMap) of
- true -> true;
- Args3 -> lists_key_replace(3, OldWarnVarArgs, Args3)
- end;
- false ->
- case any_args(New4) of
- true ->
- case compare_list_vars(Old3, ets_list_args(New3), [],
- RaceVarMap) of
- true -> true;
- Args3 -> lists_key_replace(3, OldWarnVarArgs, Args3)
- end;
- false ->
- case compare_list_vars(Old3, ets_list_args(New3), [],
- RaceVarMap) of
- true -> true;
- Args3 ->
- lists_key_replace(4,
- lists_key_replace(3, OldWarnVarArgs, Args3), Old4 -- New4)
- end
- end
- end;
- false -> OldWarnVarArgs
- end.
-
-compare_first_arg(OldWarnVarArgs, NewWarnVarArgs, RaceVarMap) ->
- [Old1, Old2|_OldT] = OldWarnVarArgs,
- [New1, New2|_NewT] = NewWarnVarArgs,
- case any_args(Old2) of
- true ->
- case compare_var_list(New1, Old1, RaceVarMap) of
- true -> true;
- false -> OldWarnVarArgs
- end;
- false ->
- case any_args(New2) of
- true ->
- case compare_var_list(New1, Old1, RaceVarMap) of
- true -> true;
- false -> OldWarnVarArgs
- end;
- false ->
- case compare_var_list(New1, Old1, RaceVarMap) of
- true -> true;
- false -> lists_key_replace(2, OldWarnVarArgs, Old2 -- New2)
- end
- end
- end.
-
-compare_argtypes(ArgTypes, WarnArgTypes) ->
- lists:any(fun (X) -> lists:member(X, WarnArgTypes) end, ArgTypes).
-
-%% Compares the argument types of the two suspicious calls.
-compare_types(VarArgs, WarnVarArgs, RaceWarnTag, RaceVarMap) ->
- case RaceWarnTag of
- ?WARN_WHEREIS_REGISTER ->
- [VA1, VA2] = VarArgs,
- [WVA1, WVA2, _, _] = WarnVarArgs,
- case any_args(VA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- case any_args(WVA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- compare_var_list(VA1, WVA1, RaceVarMap) orelse
- compare_argtypes(VA2, WVA2)
- end
- end;
- ?WARN_WHEREIS_UNREGISTER ->
- [VA1, VA2] = VarArgs,
- [WVA1, WVA2] = WarnVarArgs,
- case any_args(VA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- case any_args(WVA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- compare_var_list(VA1, WVA1, RaceVarMap) orelse
- compare_argtypes(VA2, WVA2)
- end
- end;
- ?WARN_ETS_LOOKUP_INSERT ->
- [VA1, VA2, VA3, VA4] = VarArgs,
- [WVA1, WVA2, WVA3, WVA4] = WarnVarArgs,
- Bool =
- case any_args(VA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- case any_args(WVA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- compare_var_list(VA1, WVA1, RaceVarMap) orelse
- compare_argtypes(VA2, WVA2)
- end
- end,
- Bool andalso
- (case any_args(VA4) of
- true ->
- compare_var_list(VA3, WVA3, RaceVarMap);
- false ->
- case any_args(WVA4) of
- true ->
- compare_var_list(VA3, WVA3, RaceVarMap);
- false ->
- compare_var_list(VA3, WVA3, RaceVarMap) orelse
- compare_argtypes(VA4, WVA4)
- end
- end);
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- [VA1, VA2|_] = VarArgs, %% Two or four elements
- [WVA1, WVA2|_] = WarnVarArgs,
- case any_args(VA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- case any_args(WVA2) of
- true -> compare_var_list(VA1, WVA1, RaceVarMap);
- false ->
- compare_var_list(VA1, WVA1, RaceVarMap) orelse
- compare_argtypes(VA2, WVA2)
- end
- end
- end.
-
-compare_list_vars(VarList1, VarList2, NewVarList1, RaceVarMap) ->
- case VarList1 of
- [] ->
- case NewVarList1 of
- [] -> true;
- _Other -> NewVarList1
- end;
- [Head|Tail] ->
- NewHead =
- case compare_var_list(Head, VarList2, RaceVarMap) of
- true -> [];
- false -> [Head]
- end,
- compare_list_vars(Tail, VarList2, NewHead ++ NewVarList1, RaceVarMap)
- end.
-
-compare_vars(Var1, Var2, RaceVarMap) when is_integer(Var1), is_integer(Var2) ->
- Var1 =:= Var2 orelse
- are_bound_labels(Var1, Var2, RaceVarMap) orelse
- are_bound_labels(Var2, Var1, RaceVarMap);
-compare_vars(_Var1, _Var2, _RaceVarMap) ->
- false.
-
--spec compare_var_list(label_type(), [label_type()], dict:dict()) -> boolean().
-
-compare_var_list(Var, VarList, RaceVarMap) ->
- lists:any(fun (V) -> compare_vars(Var, V, RaceVarMap) end, VarList).
-
-ets_list_args(MaybeList) ->
- case is_list(MaybeList) of
- true ->
- try [ets_tuple_args(T) || T <- MaybeList]
- catch _:_ -> [?no_label]
- end;
- false -> [ets_tuple_args(MaybeList)]
- end.
-
-ets_list_argtypes(ListStr) ->
- ListStr1 = string:trim(ListStr, leading, "$["),
- string:trim(ListStr1, trailing, "$]$.$,").
-
-ets_tuple_args(MaybeTuple) ->
- case is_tuple(MaybeTuple) of
- true -> element(1, MaybeTuple);
- false -> ?no_label
- end.
-
-ets_tuple_argtypes2(TupleList, ElemList) ->
- case TupleList of
- [] -> ElemList;
- [H|T] ->
- ets_tuple_argtypes2(T,
- ets_tuple_argtypes2_helper(H, [], 0) ++ ElemList)
- end.
-
-ets_tuple_argtypes2_helper(TupleStr, ElemStr, NestingLevel) ->
- case TupleStr of
- [] -> [];
- [H|T] ->
- {NewElemStr, NewNestingLevel, Return} =
- case H of
- ${ when NestingLevel =:= 0 ->
- {ElemStr, NestingLevel + 1, false};
- ${ ->
- {[H|ElemStr], NestingLevel + 1, false};
- $[ ->
- {[H|ElemStr], NestingLevel + 1, false};
- $( ->
- {[H|ElemStr], NestingLevel + 1, false};
- $} ->
- {[H|ElemStr], NestingLevel - 1, false};
- $] ->
- {[H|ElemStr], NestingLevel - 1, false};
- $) ->
- {[H|ElemStr], NestingLevel - 1, false};
- $, when NestingLevel =:= 1 ->
- {lists:reverse(ElemStr), NestingLevel, true};
- _Other ->
- {[H|ElemStr], NestingLevel, false}
- end,
- case Return of
- true -> string:lexemes(NewElemStr, " |");
- false ->
- ets_tuple_argtypes2_helper(T, NewElemStr, NewNestingLevel)
- end
- end.
-
-ets_tuple_argtypes1(Str, Tuple, TupleList, NestingLevel) ->
- case Str of
- [] -> TupleList;
- [H|T] ->
- {NewTuple, NewNestingLevel, Add} =
- case H of
- ${ ->
- {[H|Tuple], NestingLevel + 1, false};
- $} ->
- case NestingLevel of
- 1 ->
- {[H|Tuple], NestingLevel - 1, true};
- _Else ->
- {[H|Tuple], NestingLevel - 1, false}
- end;
- _Other1 when NestingLevel =:= 0 ->
- {Tuple, NestingLevel, false};
- _Other2 ->
- {[H|Tuple], NestingLevel, false}
- end,
- case Add of
- true ->
- ets_tuple_argtypes1(T, [],
- [lists:reverse(NewTuple)|TupleList],
- NewNestingLevel);
- false ->
- ets_tuple_argtypes1(T, NewTuple, TupleList, NewNestingLevel)
- end
- end.
-
-format_arg(?bypassed) -> ?no_label;
-format_arg(Arg0) ->
- Arg = cerl:fold_literal(Arg0),
- case cerl:type(Arg) of
- var -> cerl_trees:get_label(Arg);
- tuple -> list_to_tuple([format_arg(A) || A <- cerl:tuple_es(Arg)]);
- cons -> [format_arg(cerl:cons_hd(Arg))|format_arg(cerl:cons_tl(Arg))];
- alias -> format_arg(cerl:alias_var(Arg));
- literal ->
- case cerl:is_c_nil(Arg) of
- true -> [];
- false -> ?no_label
- end;
- _Other -> ?no_label
- end.
-
--spec format_args([core_vars()], [erl_types:erl_type()],
- dialyzer_dataflow:state(), call()) ->
- args().
-
-format_args([], [], _State, _Call) ->
- [];
-format_args(ArgList, TypeList, CleanState, Call) ->
- format_args_2(format_args_1(ArgList, TypeList, CleanState), Call).
-
-format_args_1([Arg], [Type], CleanState) ->
- [format_arg(Arg), format_type(Type, CleanState)];
-format_args_1([Arg|Args], [Type|Types], CleanState) ->
- List =
- case Arg =:= ?bypassed of
- true -> [?no_label, format_type(Type, CleanState)];
- false ->
- case cerl:is_literal(cerl:fold_literal(Arg)) of
- true -> [?no_label, format_cerl(Arg)];
- false -> [format_arg(Arg), format_type(Type, CleanState)]
- end
- end,
- List ++ format_args_1(Args, Types, CleanState).
-
-format_args_2(StrArgList, Call) ->
- case Call of
- whereis ->
- lists_key_replace(2, StrArgList,
-	string:lexemes(lists:nth(2, StrArgList), " |"));
- register ->
- lists_key_replace(2, StrArgList,
-	string:lexemes(lists:nth(2, StrArgList), " |"));
- unregister ->
- lists_key_replace(2, StrArgList,
-	string:lexemes(lists:nth(2, StrArgList), " |"));
- ets_new ->
- StrArgList1 = lists_key_replace(2, StrArgList,
-	string:lexemes(lists:nth(2, StrArgList), " |")),
- lists_key_replace(4, StrArgList1,
- string:lexemes(ets_list_argtypes(lists:nth(4, StrArgList1)), " |"));
- ets_lookup ->
- StrArgList1 = lists_key_replace(2, StrArgList,
- string:lexemes(lists:nth(2, StrArgList), " |")),
- lists_key_replace(4, StrArgList1,
- string:lexemes(lists:nth(4, StrArgList1), " |"));
- ets_insert ->
- StrArgList1 = lists_key_replace(2, StrArgList,
- string:lexemes(lists:nth(2, StrArgList), " |")),
- lists_key_replace(4, StrArgList1,
- ets_tuple_argtypes2(
- ets_tuple_argtypes1(lists:nth(4, StrArgList1), [], [], 0),
- []));
- mnesia_dirty_read1 ->
- lists_key_replace(2, StrArgList,
- [mnesia_tuple_argtypes(T) || T <- string:lexemes(
- lists:nth(2, StrArgList), " |")]);
- mnesia_dirty_read2 ->
- lists_key_replace(2, StrArgList,
- string:lexemes(lists:nth(2, StrArgList), " |"));
- mnesia_dirty_write1 ->
- lists_key_replace(2, StrArgList,
- [mnesia_record_tab(R) || R <- string:lexemes(
- lists:nth(2, StrArgList), " |")]);
- mnesia_dirty_write2 ->
- lists_key_replace(2, StrArgList,
- string:lexemes(lists:nth(2, StrArgList), " |"));
- function_call -> StrArgList
- end.
-
-format_cerl(Tree) ->
- cerl_prettypr:format(cerl:set_ann(Tree, []),
- [{hook, dialyzer_utils:pp_hook()},
- {noann, true},
- {paper, 100000},
- {ribbon, 100000}
- ]).
-
-format_type(Type, State) ->
- R = dialyzer_dataflow:state__get_records(State),
- erl_types:t_to_string(Type, R).
-
-mnesia_record_tab(RecordStr) ->
- case erl_scan:string(RecordStr) of
- {ok, [{'#', _}, {atom, _, Name}|_], _} ->
- io_lib:write_string(atom_to_list(Name), $');
- _ -> RecordStr
- end.
-
-mnesia_tuple_argtypes(TupleStr) ->
- TupleStr1 = string:trim(TupleStr, leading, "${"),
- [TupleStr2|_T] = string:lexemes(TupleStr1, " ,"),
- lists:flatten(string:lexemes(TupleStr2, " |")).
-
--spec race_var_map(var_to_map1(), var_to_map2(), dict:dict(), op()) ->
- dict:dict().
-
-race_var_map(Vars1, Vars2, RaceVarMap, Op) ->
- case Vars1 =:= ?no_arg orelse Vars1 =:= ?bypassed
- orelse Vars2 =:= ?bypassed of
- true -> RaceVarMap;
- false ->
- case is_list(Vars1) andalso is_list(Vars2) of
- true ->
- case Vars1 of
- [] -> RaceVarMap;
- [AHead|ATail] ->
- case Vars2 of
- [] -> RaceVarMap;
- [PHead|PTail] ->
- NewRaceVarMap = race_var_map(AHead, PHead, RaceVarMap, Op),
- race_var_map(ATail, PTail, NewRaceVarMap, Op)
- end
- end;
- false ->
- {NewVars1, NewVars2, Bool} =
- case is_list(Vars1) of
- true ->
- case Vars1 of
- [Var1] -> {Var1, Vars2, true};
- _Thing -> {Vars1, Vars2, false}
- end;
- false ->
- case is_list(Vars2) of
- true ->
- case Vars2 of
- [Var2] -> {Vars1, Var2, true};
- _Thing -> {Vars1, Vars2, false}
- end;
- false -> {Vars1, Vars2, true}
- end
- end,
- case Bool of
- true ->
- case cerl:type(NewVars1) of
- var ->
- case cerl:type(NewVars2) of
- var ->
- ALabel = cerl_trees:get_label(NewVars1),
- PLabel = cerl_trees:get_label(NewVars2),
- case Op of
- bind ->
- TempRaceVarMap =
- bind_dict_vars(ALabel, PLabel, RaceVarMap),
- bind_dict_vars(PLabel, ALabel, TempRaceVarMap);
- unbind ->
- TempRaceVarMap =
- unbind_dict_vars(ALabel, PLabel, RaceVarMap),
- unbind_dict_vars(PLabel, ALabel, TempRaceVarMap)
- end;
- alias ->
- race_var_map(NewVars1, cerl:alias_var(NewVars2),
-				 RaceVarMap, Op);
- values ->
- race_var_map(NewVars1, cerl:values_es(NewVars2),
-				 RaceVarMap, Op);
- _Other -> RaceVarMap
- end;
- tuple ->
- case cerl:type(NewVars2) of
- tuple ->
- race_var_map(cerl:tuple_es(NewVars1),
-				 cerl:tuple_es(NewVars2), RaceVarMap, Op);
- alias ->
- race_var_map(NewVars1, cerl:alias_var(NewVars2),
-				 RaceVarMap, Op);
- values ->
- race_var_map(NewVars1, cerl:values_es(NewVars2),
-				 RaceVarMap, Op);
- _Other -> RaceVarMap
- end;
- cons ->
- case cerl:type(NewVars2) of
- cons ->
- NewRaceVarMap = race_var_map(cerl:cons_hd(NewVars1),
- cerl:cons_hd(NewVars2), RaceVarMap, Op),
- race_var_map(cerl:cons_tl(NewVars1),
- cerl:cons_tl(NewVars2), NewRaceVarMap, Op);
- alias ->
- race_var_map(NewVars1, cerl:alias_var(NewVars2),
-				 RaceVarMap, Op);
- values ->
- race_var_map(NewVars1, cerl:values_es(NewVars2),
-				 RaceVarMap, Op);
- _Other -> RaceVarMap
- end;
- alias ->
- case cerl:type(NewVars2) of
- alias ->
- race_var_map(cerl:alias_var(NewVars1),
-				 cerl:alias_var(NewVars2), RaceVarMap, Op);
- _Other ->
- race_var_map(cerl:alias_var(NewVars1),
- NewVars2, RaceVarMap, Op)
- end;
- values ->
- case cerl:type(NewVars2) of
- values ->
- race_var_map(cerl:values_es(NewVars1),
-				 cerl:values_es(NewVars2), RaceVarMap, Op);
- _Other ->
- race_var_map(cerl:values_es(NewVars1),
- NewVars2, RaceVarMap, Op)
- end;
- _Other -> RaceVarMap
- end;
- false -> RaceVarMap
- end
- end
- end.
-
-race_var_map_clauses(Clauses, RaceVarMap) ->
- case Clauses of
- [] -> RaceVarMap;
- [#end_clause{arg = Arg, pats = Pats, guard = Guard}|T] ->
- {RaceVarMap1, _RemoveClause} =
- race_var_map_guard(Arg, Pats, Guard, RaceVarMap, bind),
- race_var_map_clauses(T, RaceVarMap1)
- end.
-
-race_var_map_guard(Arg, Pats, Guard, RaceVarMap, Op) ->
- {NewRaceVarMap, RemoveClause} =
- case cerl:type(Guard) of
- call ->
- CallName = cerl:call_name(Guard),
- case cerl:is_literal(CallName) of
- true ->
- case cerl:concrete(CallName) of
- '=:=' ->
- [Arg1, Arg2] = cerl:call_args(Guard),
- {race_var_map(Arg1, Arg2, RaceVarMap, Op), false};
- '==' ->
- [Arg1, Arg2] = cerl:call_args(Guard),
- {race_var_map(Arg1, Arg2, RaceVarMap, Op), false};
- '=/=' ->
- case Op of
- bind ->
- [Arg1, Arg2] = cerl:call_args(Guard),
- {RaceVarMap, are_bound_vars(Arg1, Arg2, RaceVarMap)};
- unbind -> {RaceVarMap, false}
- end;
- _Other -> {RaceVarMap, false}
- end;
- false -> {RaceVarMap, false}
- end;
- _Other -> {RaceVarMap, false}
- end,
- {RaceVarMap1, RemoveClause1} =
- race_var_map_guard_helper1(Arg, Pats,
- race_var_map(Arg, Pats, NewRaceVarMap, Op), Op),
- {RaceVarMap1, RemoveClause orelse RemoveClause1}.
-
-race_var_map_guard_helper1(Arg, Pats, RaceVarMap, Op) ->
- case Arg =:= ?no_arg orelse Arg =:= ?bypassed of
- true -> {RaceVarMap, false};
- false ->
- case cerl:type(Arg) of
- call ->
- case Pats of
- [NewPat] ->
- ModName = cerl:call_module(Arg),
- CallName = cerl:call_name(Arg),
- case cerl:is_literal(ModName) andalso
- cerl:is_literal(CallName) of
- true ->
- case {cerl:concrete(ModName),
- cerl:concrete(CallName)} of
- {erlang, '=:='} ->
- race_var_map_guard_helper2(Arg, NewPat, true,
- RaceVarMap, Op);
- {erlang, '=='} ->
- race_var_map_guard_helper2(Arg, NewPat, true,
- RaceVarMap, Op);
- {erlang, '=/='} ->
- race_var_map_guard_helper2(Arg, NewPat, false,
- RaceVarMap, Op);
- _Else -> {RaceVarMap, false}
- end;
- false -> {RaceVarMap, false}
- end;
- _Other -> {RaceVarMap, false}
- end;
- _Other -> {RaceVarMap, false}
- end
- end.
-
-race_var_map_guard_helper2(Arg, Pat0, Bool, RaceVarMap, Op) ->
- Pat = cerl:fold_literal(Pat0),
- case cerl:type(Pat) of
- literal ->
- [Arg1, Arg2] = cerl:call_args(Arg),
- case cerl:concrete(Pat) of
- Bool ->
- {race_var_map(Arg1, Arg2, RaceVarMap, Op), false};
- _Else ->
- case Op of
- bind ->
- {RaceVarMap, are_bound_vars(Arg1, Arg2, RaceVarMap)};
- unbind -> {RaceVarMap, false}
- end
- end;
- _Else -> {RaceVarMap, false}
- end.
-
-unbind_dict_vars(Var, Var, RaceVarMap) ->
- RaceVarMap;
-unbind_dict_vars(Var1, Var2, RaceVarMap) ->
- case dict:find(Var1, RaceVarMap) of
- error -> RaceVarMap;
- {ok, Labels} ->
- case Labels of
- [] -> dict:erase(Var1, RaceVarMap);
- _Else ->
- case lists:member(Var2, Labels) of
- true ->
- unbind_dict_vars(Var1, Var2,
- bind_dict_vars_list(Var1, Labels -- [Var2],
-				 dict:erase(Var1, RaceVarMap)));
- false ->
- unbind_dict_vars_helper(Labels, Var1, Var2, RaceVarMap)
- end
- end
- end.
-
-unbind_dict_vars_helper(Labels, Key, CompLabel, RaceVarMap) ->
- case dict:size(RaceVarMap) of
- 0 -> RaceVarMap;
- _ ->
- case Labels of
- [] -> RaceVarMap;
- [Head|Tail] ->
- NewRaceVarMap =
- case are_bound_labels(Head, CompLabel, RaceVarMap) orelse
- are_bound_labels(CompLabel, Head, RaceVarMap) of
- true ->
- bind_dict_vars_list(Key, Labels -- [Head],
-				 dict:erase(Key, RaceVarMap));
- false -> RaceVarMap
- end,
- unbind_dict_vars_helper(Tail, Key, CompLabel, NewRaceVarMap)
- end
- end.
-
-var_analysis(FunDefArgs, FunCallArgs, WarnVarArgs, RaceWarnTag) ->
- case RaceWarnTag of
- ?WARN_WHEREIS_REGISTER ->
- [WVA1, WVA2, WVA3, WVA4] = WarnVarArgs,
- ArgNos = lists_key_members_lists(WVA1, FunDefArgs),
- [[lists_get(N, FunCallArgs) || N <- ArgNos], WVA2, WVA3, WVA4];
- ?WARN_WHEREIS_UNREGISTER ->
- [WVA1, WVA2] = WarnVarArgs,
- ArgNos = lists_key_members_lists(WVA1, FunDefArgs),
- [[lists_get(N, FunCallArgs) || N <- ArgNos], WVA2];
- ?WARN_ETS_LOOKUP_INSERT ->
- [WVA1, WVA2, WVA3, WVA4] = WarnVarArgs,
- ArgNos1 = lists_key_members_lists(WVA1, FunDefArgs),
- ArgNos2 = lists_key_members_lists(WVA3, FunDefArgs),
- [[lists_get(N1, FunCallArgs) || N1 <- ArgNos1], WVA2,
- [lists_get(N2, FunCallArgs) || N2 <- ArgNos2], WVA4];
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- [WVA1, WVA2|T] = WarnVarArgs,
- ArgNos = lists_key_members_lists(WVA1, FunDefArgs),
- [[lists_get(N, FunCallArgs) || N <- ArgNos], WVA2|T]
- end.
-
-var_type_analysis(FunDefArgs, FunCallTypes, WarnVarArgs, RaceWarnTag,
- RaceVarMap, CleanState) ->
- FunVarArgs = format_args(FunDefArgs, FunCallTypes, CleanState, function_call),
- case RaceWarnTag of
- ?WARN_WHEREIS_REGISTER ->
- [WVA1, WVA2, WVA3, WVA4] = WarnVarArgs,
- Vars = find_all_bound_vars(WVA1, RaceVarMap),
- case lists_key_member_lists(Vars, FunVarArgs) of
- 0 -> [Vars, WVA2, WVA3, WVA4];
- N when is_integer(N) ->
- NewWVA2 = string:lexemes(lists:nth(N + 1, FunVarArgs), " |"),
- [Vars, NewWVA2, WVA3, WVA4]
- end;
- ?WARN_WHEREIS_UNREGISTER ->
- [WVA1, WVA2] = WarnVarArgs,
- Vars = find_all_bound_vars(WVA1, RaceVarMap),
- case lists_key_member_lists(Vars, FunVarArgs) of
- 0 -> [Vars, WVA2];
- N when is_integer(N) ->
- NewWVA2 = string:lexemes(lists:nth(N + 1, FunVarArgs), " |"),
- [Vars, NewWVA2]
- end;
- ?WARN_ETS_LOOKUP_INSERT ->
- [WVA1, WVA2, WVA3, WVA4] = WarnVarArgs,
- Vars1 = find_all_bound_vars(WVA1, RaceVarMap),
- FirstVarArg =
- case lists_key_member_lists(Vars1, FunVarArgs) of
- 0 -> [Vars1, WVA2];
- N1 when is_integer(N1) ->
- NewWVA2 = string:lexemes(lists:nth(N1 + 1, FunVarArgs), " |"),
- [Vars1, NewWVA2]
- end,
- Vars2 =
- lists:flatten(
- [find_all_bound_vars(A, RaceVarMap) || A <- ets_list_args(WVA3)]),
- case lists_key_member_lists(Vars2, FunVarArgs) of
- 0 -> FirstVarArg ++ [Vars2, WVA4];
- N2 when is_integer(N2) ->
- NewWVA4 =
- ets_tuple_argtypes2(
- ets_tuple_argtypes1(lists:nth(N2 + 1, FunVarArgs), [], [], 0),
- []),
- FirstVarArg ++ [Vars2, NewWVA4]
-
- end;
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- [WVA1, WVA2|T] = WarnVarArgs,
- Arity =
- case T of
- [] -> 1;
- _Else -> 2
- end,
- Vars = find_all_bound_vars(WVA1, RaceVarMap),
- case lists_key_member_lists(Vars, FunVarArgs) of
- 0 -> [Vars, WVA2|T];
- N when is_integer(N) ->
- NewWVA2 =
- case Arity of
- 1 ->
- [mnesia_record_tab(R) || R <- string:lexemes(
- lists:nth(2, FunVarArgs), " |")];
- 2 ->
- string:lexemes(lists:nth(N + 1, FunVarArgs), " |")
- end,
- [Vars, NewWVA2|T]
- end
- end.
-
-%%% ===========================================================================
-%%%
-%%% Warning Format Utilities
-%%%
-%%% ===========================================================================
-
-add_race_warning(Warn, #races{race_warnings = Warns} = Races) ->
- Races#races{race_warnings = [Warn|Warns]}.
-
-get_race_warn(Fun, Args, ArgTypes, DepList, State) ->
- {M, F, _A} = Fun,
- case DepList of
- [] -> {State, no_race};
- _Other ->
- {State, {race_condition, [M, F, Args, ArgTypes, State, DepList]}}
- end.
-
--spec get_race_warnings(races(), dialyzer_dataflow:state()) ->
- {races(), dialyzer_dataflow:state()}.
-
-get_race_warnings(#races{race_warnings = RaceWarnings}, State) ->
- get_race_warnings_helper(RaceWarnings, State).
-
-get_race_warnings_helper(Warnings, State) ->
- case Warnings of
- [] ->
- {dialyzer_dataflow:state__get_races(State), State};
- [H|T] ->
- {RaceWarnTag, WarningInfo, {race_condition, [M, F, A, AT, S, DepList]}} = H,
- Reason =
- case RaceWarnTag of
- ?WARN_WHEREIS_REGISTER ->
- get_reason(lists:keysort(7, DepList),
- "might fail due to a possible race condition "
- "caused by its combination with ");
- ?WARN_WHEREIS_UNREGISTER ->
- get_reason(lists:keysort(7, DepList),
- "might fail due to a possible race condition "
- "caused by its combination with ");
- ?WARN_ETS_LOOKUP_INSERT ->
- get_reason(lists:keysort(7, DepList),
- "might have an unintended effect due to " ++
- "a possible race condition " ++
- "caused by its combination with ");
- ?WARN_MNESIA_DIRTY_READ_WRITE ->
- get_reason(lists:keysort(7, DepList),
- "might have an unintended effect due to " ++
- "a possible race condition " ++
- "caused by its combination with ")
- end,
- W =
- {?WARN_RACE_CONDITION, WarningInfo,
- {race_condition,
- [M, F, dialyzer_dataflow:format_args(A, AT, S), Reason]}},
- get_race_warnings_helper(T,
- dialyzer_dataflow:state__add_warning(W, State))
- end.
-
-get_reason(DependencyList, Reason) ->
- case DependencyList of
- [] -> "";
- [#dep_call{call_name = Call, arg_types = ArgTypes, vars = Args,
- state = State, file_loc = {File, Location}}|T] ->
- R =
- Reason ++
- case Call of
- whereis -> "the erlang:whereis";
- ets_lookup -> "the ets:lookup";
- mnesia_dirty_read -> "the mnesia:dirty_read"
- end ++
- dialyzer_dataflow:format_args(Args, ArgTypes, State) ++
- " call in " ++
- filename:basename(File) ++
- " on line " ++
- lists:flatten(io_lib:write(Location)),
- case T of
- [] -> R;
- _ -> get_reason(T, R ++ ", ")
- end
- end.
-
-state__add_race_warning(State, RaceWarn, RaceWarnTag, WarningInfo) ->
- case RaceWarn of
- no_race -> State;
- _Else ->
- Races = dialyzer_dataflow:state__get_races(State),
- Warn = {RaceWarnTag, WarningInfo, RaceWarn},
- dialyzer_dataflow:state__put_races(add_race_warning(Warn, Races), State)
- end.
-
-%%% ===========================================================================
-%%%
-%%% Record Interfaces
-%%%
-%%% ===========================================================================
-
--spec beg_clause_new(var_to_map1(), var_to_map1(), cerl:cerl()) ->
- #beg_clause{}.
-
-beg_clause_new(Arg, Pats, Guard) ->
- #beg_clause{arg = Arg, pats = Pats, guard = Guard}.
-
--spec cleanup(races()) -> races().
-
-cleanup(#races{race_list = RaceList}) ->
- #races{race_list = RaceList}.
-
--spec end_case_new([#end_clause{}]) -> #end_case{}.
-
-end_case_new(Clauses) ->
- #end_case{clauses = Clauses}.
-
--spec end_clause_new(var_to_map1(), var_to_map1(), cerl:cerl()) ->
- #end_clause{}.
-
-end_clause_new(Arg, Pats, Guard) ->
- #end_clause{arg = Arg, pats = Pats, guard = Guard}.
-
--spec get_curr_fun(races()) -> dialyzer_callgraph:mfa_or_funlbl().
-
-get_curr_fun(#races{curr_fun = CurrFun}) ->
- CurrFun.
-
--spec get_curr_fun_args(races()) -> core_args().
-
-get_curr_fun_args(#races{curr_fun_args = CurrFunArgs}) ->
- CurrFunArgs.
-
--spec get_new_table(races()) -> table().
-
-get_new_table(#races{new_table = Table}) ->
- Table.
-
--spec get_race_analysis(races()) -> boolean().
-
-get_race_analysis(#races{race_analysis = RaceAnalysis}) ->
- RaceAnalysis.
-
--spec get_race_list(races()) -> code().
-
-get_race_list(#races{race_list = RaceList}) ->
- RaceList.
-
--spec get_race_list_size(races()) -> non_neg_integer().
-
-get_race_list_size(#races{race_list_size = RaceListSize}) ->
- RaceListSize.
-
--spec get_race_list_and_size(races()) -> {code(), non_neg_integer()}.
-
-get_race_list_and_size(#races{race_list = RaceList,
-			 race_list_size = RaceListSize}) ->
- {RaceList, RaceListSize}.
-
--spec let_tag_new(var_to_map1(), var_to_map1()) -> #let_tag{}.
-
-let_tag_new(Var, Arg) ->
- #let_tag{var = Var, arg = Arg}.
-
--spec new() -> races().
-
-new() -> #races{}.
-
--spec put_curr_fun(dialyzer_callgraph:mfa_or_funlbl(), label(), races()) ->
- races().
-
-put_curr_fun(CurrFun, CurrFunLabel, Races) ->
- Races#races{curr_fun = CurrFun,
- curr_fun_label = CurrFunLabel,
- curr_fun_args = empty}.
-
--spec put_fun_args(core_args(), races()) -> races().
-
-put_fun_args(Args, #races{curr_fun_args = CurrFunArgs} = Races) ->
- case CurrFunArgs of
- empty -> Races#races{curr_fun_args = Args};
- _Other -> Races
- end.
-
--spec put_race_analysis(boolean(), races()) ->
- races().
-
-put_race_analysis(Analysis, Races) ->
- Races#races{race_analysis = Analysis}.
-
--spec put_race_list(code(), non_neg_integer(), races()) ->
- races().
-
-put_race_list(RaceList, RaceListSize, Races) ->
- Races#races{race_list = RaceList, race_list_size = RaceListSize}.
diff --git a/lib/dialyzer/test/indent_SUITE_data/dialyzer_options b/lib/dialyzer/test/indent_SUITE_data/dialyzer_options
index 7c088f9a65..3ff26b87db 100644
--- a/lib/dialyzer/test/indent_SUITE_data/dialyzer_options
+++ b/lib/dialyzer/test/indent_SUITE_data/dialyzer_options
@@ -1 +1 @@
-{dialyzer_options, [{warnings, [no_unused, no_return, race_conditions]}]}.
+{dialyzer_options, [{warnings, [no_unused, no_return]}]}.
diff --git a/lib/dialyzer/test/indent_SUITE_data/results/whereis_control_flow1 b/lib/dialyzer/test/indent_SUITE_data/results/whereis_control_flow1
deleted file mode 100644
index 1154cada8a..0000000000
--- a/lib/dialyzer/test/indent_SUITE_data/results/whereis_control_flow1
+++ /dev/null
@@ -1,4 +0,0 @@
-
-whereis_control_flow1.erl:13:18: The call erlang:register
- (AnAtom :: atom(),
- Pid :: pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_control_flow1.erl on line {8,8}
diff --git a/lib/dialyzer/test/indent_SUITE_data/src/whereis_control_flow1.erl b/lib/dialyzer/test/indent_SUITE_data/src/whereis_control_flow1.erl
deleted file mode 100644
index e65f6c3e23..0000000000
--- a/lib/dialyzer/test/indent_SUITE_data/src/whereis_control_flow1.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination. It takes into account control flow that might exist.
-
--module(whereis_control_flow1).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false -> register(AnAtom, Pid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/dialyzer_options b/lib/dialyzer/test/race_SUITE_data/dialyzer_options
deleted file mode 100644
index 2be2f47dda..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/dialyzer_options
+++ /dev/null
@@ -1 +0,0 @@
-{dialyzer_options, [{indent_opt, false}, {warnings, [race_conditions]}]}.
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args1 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args1
deleted file mode 100644
index 452b623f94..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args1.erl:9:16: The call ets:insert(T::'foo',[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(T::'foo','counter') call in ets_insert_args1.erl on line {8,28}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args10 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args10
deleted file mode 100644
index cefface2f5..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args10
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args10.erl:9:16: The call ets:insert(T::'foo',[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(T::'foo','counter') call in ets_insert_args10.erl on line {8,28}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args2 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args2
deleted file mode 100644
index 1a529812f9..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args2.erl:9:16: The call ets:insert(T::'foo',[{'counter',number()} | {'kostis',number()} | {'maria',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(T::'foo','counter') call in ets_insert_args2.erl on line {8,27}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args3 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args3
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args4 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args4
deleted file mode 100644
index dd08666fe8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args4
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args4.erl:9:16: The call ets:insert(T::'foo',{'counter',number()}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(T::'foo','counter') call in ets_insert_args4.erl on line {8,27}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args5 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args5
deleted file mode 100644
index ec44a89f8f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args5
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args5.erl:9:16: The call ets:insert(T::'foo',{'counter',number(),number()}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(T::'foo','counter') call in ets_insert_args5.erl on line {8,27}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args6 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args6
deleted file mode 100644
index b7d4131ff6..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args6
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args6.erl:9:16: The call ets:insert(T::'foo',[{'counter',number(),number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(T::'foo','counter') call in ets_insert_args6.erl on line {8,27}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args7 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args7
deleted file mode 100644
index fc6ea50437..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args7
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args7.erl:17:3: The call ets:insert(Table::'foo',[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::'foo','counter') call in ets_insert_args7.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args8 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args8
deleted file mode 100644
index f263c0eaaf..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_args8
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_args8.erl:16:3: The call ets:insert(Table::atom(),[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::atom(),'counter') call in ets_insert_args8.erl on line {12,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow1 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow1
deleted file mode 100644
index 38c507582e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_control_flow1.erl:15:7: The call ets:insert('foo',{'random',integer()}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo','random') call in ets_insert_control_flow1.erl on line {10,41}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow2 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow2
deleted file mode 100644
index 1ca874c4d8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow2
+++ /dev/null
@@ -1,3 +0,0 @@
-
-ets_insert_control_flow2.erl:15:7: The call ets:insert('foo',[{'pass',[pos_integer()]} | {'random',integer()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo','random') call in ets_insert_control_flow2.erl on line {10,41}
-ets_insert_control_flow2.erl:19:7: The call ets:insert('foo',[{'pass',[pos_integer()]} | {'random',integer()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo','random') call in ets_insert_control_flow2.erl on line {10,41}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow3 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow3
deleted file mode 100644
index ad011e918c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow3
+++ /dev/null
@@ -1,3 +0,0 @@
-
-ets_insert_control_flow3.erl:21:11: The call ets:insert(Table::atom() | ets:tid(),{'root',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'root') call in ets_insert_control_flow3.erl on line {12,15}
-ets_insert_control_flow3.erl:23:11: The call ets:insert(Table::atom() | ets:tid(),{'user',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'user') call in ets_insert_control_flow3.erl on line {13,15}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow4 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow4
deleted file mode 100644
index ad505c0ab8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow4
+++ /dev/null
@@ -1,3 +0,0 @@
-
-ets_insert_control_flow4.erl:21:11: The call ets:insert(Table::atom() | ets:tid(),{'pass',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow4.erl on line {12,15}, the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow4.erl on line {13,15}
-ets_insert_control_flow4.erl:23:11: The call ets:insert(Table::atom() | ets:tid(),{'pass',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow4.erl on line {12,15}, the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow4.erl on line {13,15}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow5 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow5
deleted file mode 100644
index f98aa27654..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_control_flow5
+++ /dev/null
@@ -1,5 +0,0 @@
-
-ets_insert_control_flow5.erl:22:11: The call ets:insert(Table::atom() | ets:tid(),{'welcome_msg',[any(),...]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'welcome_msg') call in ets_insert_control_flow5.erl on line {16,16}
-ets_insert_control_flow5.erl:23:11: The call ets:insert(Table::atom() | ets:tid(),{'pass',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow5.erl on line {12,15}, the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow5.erl on line {13,15}
-ets_insert_control_flow5.erl:25:11: The call ets:insert(Table::atom() | ets:tid(),{'welcome_msg',[any(),...]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'welcome_msg') call in ets_insert_control_flow5.erl on line {16,16}
-ets_insert_control_flow5.erl:26:11: The call ets:insert(Table::atom() | ets:tid(),{'pass',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow5.erl on line {12,15}, the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_control_flow5.erl on line {13,15}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race1 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race1
deleted file mode 100644
index 60e115ff1b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_diff_atoms_race1.erl:22:3: The call ets:insert(Table::'bar' | 'foo',[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::'foo','counter') call in ets_insert_diff_atoms_race1.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race2 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race2
deleted file mode 100644
index 0e6546685c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_diff_atoms_race2.erl:22:3: The call ets:insert(Table::'bar' | 'foo',[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::'foo',Counter::'counter') call in ets_insert_diff_atoms_race2.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race3 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race3
deleted file mode 100644
index 9a0e7dc936..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_diff_atoms_race3.erl:22:3: The call ets:insert(Table::'bar' | 'foo',{'counter',number()}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::'foo','counter') call in ets_insert_diff_atoms_race3.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race4 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race4
deleted file mode 100644
index cc17f482ad..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race4
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_diff_atoms_race4.erl:22:3: The call ets:insert(Table::'bar' | 'foo',{'counter',number()}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::'foo',Counter::'counter') call in ets_insert_diff_atoms_race4.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race5 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race5
deleted file mode 100644
index c6df36c0e2..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race5
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_diff_atoms_race5.erl:22:3: The call ets:insert(Table::'foo',[{'counter',number()} | {'index',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::'foo',Counter::'counter') call in ets_insert_diff_atoms_race5.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race6 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race6
deleted file mode 100644
index 21e5cdf8f3..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_diff_atoms_race6
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_diff_atoms_race6.erl:22:3: The call ets:insert(Table::'foo',{'counter',number()} | {'index',number()}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Tab::'foo',Counter::'counter') call in ets_insert_diff_atoms_race6.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_double1 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_double1
deleted file mode 100644
index 5de9983e9e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_double1
+++ /dev/null
@@ -1,4 +0,0 @@
-
-ets_insert_double1.erl:15:7: The call ets:insert('foo',[{'pass',[number()]} | {'random',integer()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo','random') call in ets_insert_double1.erl on line {10,41}, the ets:lookup('foo','pass') call in ets_insert_double1.erl on line {27,14}
-ets_insert_double1.erl:19:7: The call ets:insert('foo',[{'pass',[number()]} | {'random',integer()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo','random') call in ets_insert_double1.erl on line {10,41}, the ets:lookup('foo','pass') call in ets_insert_double1.erl on line {27,14}
-ets_insert_double1.erl:24:3: The call ets:insert('foo',{'pass', 'empty'}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo','pass') call in ets_insert_double1.erl on line {22,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_double2 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_double2
deleted file mode 100644
index 532550efb7..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_double2
+++ /dev/null
@@ -1,4 +0,0 @@
-
-ets_insert_double2.erl:15:7: The call ets:insert('foo',[{_,[number()] | integer()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo',Random::any()) call in ets_insert_double2.erl on line {10,41}, the ets:lookup('foo',Pass::any()) call in ets_insert_double2.erl on line {27,14}
-ets_insert_double2.erl:19:7: The call ets:insert('foo',[{_,[number()] | integer()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo',Random::any()) call in ets_insert_double2.erl on line {10,41}, the ets:lookup('foo',Pass::any()) call in ets_insert_double2.erl on line {27,14}
-ets_insert_double2.erl:24:3: The call ets:insert('foo',{_,'empty'}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo',Pass::any()) call in ets_insert_double2.erl on line {22,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs1 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs1
deleted file mode 100644
index 646921b7ab..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_funs1.erl:15:3: The call ets:insert('foo',[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(T::'foo','counter') call in ets_insert_funs1.erl on line {9,9}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs2 b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs2
deleted file mode 100644
index 1cb3e3a996..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_funs2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_funs2.erl:9:9: The call ets:insert(T::'foo',[{'counter',number()},...]) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('foo','counter') call in ets_insert_funs2.erl on line {14,14}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_new b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_new
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_param b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_param
deleted file mode 100644
index 29b20f3386..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_param
+++ /dev/null
@@ -1,5 +0,0 @@
-
-ets_insert_param.erl:13:7: The call ets:insert(Table::atom() | ets:tid(),{'welcome_msg',[any(),...]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'welcome_msg') call in ets_insert_param.erl on line {10,16}
-ets_insert_param.erl:14:7: The call ets:insert(Table::atom() | ets:tid(),{'pass',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_param.erl on line {14,57}, the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_param.erl on line {15,67}
-ets_insert_param.erl:17:7: The call ets:insert(Table::atom() | ets:tid(),{'welcome_msg',[any(),...]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'welcome_msg') call in ets_insert_param.erl on line {10,16}
-ets_insert_param.erl:18:7: The call ets:insert(Table::atom() | ets:tid(),{'pass',[pos_integer()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Table::atom() | ets:tid(),'pass') call in ets_insert_param.erl on line {18,57}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_public b/lib/dialyzer/test/race_SUITE_data/results/ets_insert_public
deleted file mode 100644
index 27ce4b181a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/ets_insert_public
+++ /dev/null
@@ -1,2 +0,0 @@
-
-ets_insert_public.erl:14:5: The call ets:insert(Foo::atom(),{'counter',number()}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup(Foo::atom(),'counter') call in ets_insert_public.erl on line {12,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/extract_translations b/lib/dialyzer/test/race_SUITE_data/results/extract_translations
deleted file mode 100644
index 8804c0b9ee..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/extract_translations
+++ /dev/null
@@ -1,5 +0,0 @@
-
-extract_translations.erl:140:7: The call ets:insert('files',{atom() | [atom() | [any()] | char()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('files',File::atom() | [atom() | [any()] | char()]) call in extract_translations.erl on line {135,11}
-extract_translations.erl:146:6: The call ets:insert('translations',{_,[]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('translations',Str::any()) call in extract_translations.erl on line {126,11}
-extract_translations.erl:152:7: The call ets:insert('files',{atom() | [atom() | [any()] | char()]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('files',File::atom() | [atom() | [any()] | char()]) call in extract_translations.erl on line {148,11}
-extract_translations.erl:154:6: The call ets:insert('translations',{_,[]}) might have an unintended effect due to a possible race condition caused by its combination with the ets:lookup('translations',Str::any()) call in extract_translations.erl on line {126,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race1 b/lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race1
deleted file mode 100644
index d7886f3b68..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_diff_atoms_race1.erl:33:3: The call mnesia:dirty_write(Table::'employee' | 'employer',Record::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read(Tab::'employee',Eno::any()) call in mnesia_diff_atoms_race1.erl on line {19,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race2 b/lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race2
deleted file mode 100644
index 51906dd548..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_diff_atoms_race2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_diff_atoms_race2.erl:37:3: The call mnesia:dirty_write(Record::#employee{salary::number()} | #employer{}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read(Tab::'employee',Eno::any()) call in mnesia_diff_atoms_race2.erl on line {26,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_one_write_two b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_one_write_two
deleted file mode 100644
index 3ac7ed1f04..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_one_write_two
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_one_write_two.erl:20:5: The call mnesia:dirty_write('employee',New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read({'employee',_}) call in mnesia_dirty_read_one_write_two.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_two_write_one b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_two_write_one
deleted file mode 100644
index 231e62c2c2..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_two_write_one
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_two_write_one.erl:20:5: The call mnesia:dirty_write(New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read('employee',Eno::any()) call in mnesia_dirty_read_two_write_one.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double1 b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double1
deleted file mode 100644
index 1e2c4e379f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_write_double1.erl:20:5: The call mnesia:dirty_write('employee',New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read('employee',Eno::any()) call in mnesia_dirty_read_write_double1.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double2 b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double2
deleted file mode 100644
index 3d28f32dc9..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_write_double2.erl:20:5: The call mnesia:dirty_write(New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read({'employee',_}) call in mnesia_dirty_read_write_double2.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double3 b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double3
deleted file mode 100644
index 5b46129157..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_write_double3.erl:20:5: The call mnesia:dirty_write('employee',New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read({'employee',_}) call in mnesia_dirty_read_write_double3.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double4 b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double4
deleted file mode 100644
index 895faa4cad..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_double4
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_write_double4.erl:20:5: The call mnesia:dirty_write(New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read('employee',Eno::any()) call in mnesia_dirty_read_write_double4.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_one b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_one
deleted file mode 100644
index d88e501f9c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_one
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_write_one.erl:20:5: The call mnesia:dirty_write(New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read({'employee',_}) call in mnesia_dirty_read_write_one.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_two b/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_two
deleted file mode 100644
index 4ff8c0d9c4..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/mnesia_dirty_read_write_two
+++ /dev/null
@@ -1,2 +0,0 @@
-
-mnesia_dirty_read_write_two.erl:20:5: The call mnesia:dirty_write('employee',New::#employee{salary::number()}) might have an unintended effect due to a possible race condition caused by its combination with the mnesia:dirty_read('employee',Eno::any()) call in mnesia_dirty_read_write_two.erl on line {17,11}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow1 b/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow1
deleted file mode 100644
index c62a764338..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_control_flow1.erl:13:18: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_control_flow1.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow2 b/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow2
deleted file mode 100644
index 1fc47a7218..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow2
+++ /dev/null
@@ -1,3 +0,0 @@
-
-whereis_control_flow2.erl:14:4: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_control_flow2.erl on line {8,8}
-whereis_control_flow2.erl:15:18: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_control_flow2.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow3 b/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow3
deleted file mode 100644
index f04acc840e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_control_flow3.erl:25:3: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_control_flow3.erl on line {11,14}, the erlang:whereis(AnAtom::any()) call in whereis_control_flow3.erl on line {18,14}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow4 b/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow4
deleted file mode 100644
index 76b60a0db8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow4
+++ /dev/null
@@ -1,3 +0,0 @@
-
-whereis_control_flow4.erl:18:19: The call erlang:register('maria',Pid1::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis('maria') call in whereis_control_flow4.erl on line {8,8}
-whereis_control_flow4.erl:19:19: The call erlang:register('kostis',Pid2::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis('kostis') call in whereis_control_flow4.erl on line {13,16}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow5 b/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow5
deleted file mode 100644
index 0a445d4f10..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow5
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_control_flow5.erl:11:7: The call erlang:unregister(AnAtom::atom()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_control_flow5.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow6 b/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow6
deleted file mode 100644
index 2b6726731f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_control_flow6
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_control_flow6.erl:11:7: The call erlang:unregister('kostis') might fail due to a possible race condition caused by its combination with the erlang:whereis('kostis') call in whereis_control_flow6.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_atoms_no_race b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_atoms_no_race
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_atoms_race b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_atoms_race
deleted file mode 100644
index 4b7272e203..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_atoms_race
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_atoms_race.erl:34:3: The call erlang:register(Atom::'kostis' | 'maria',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::'maria') call in whereis_diff_atoms_race.erl on line {14,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1
deleted file mode 100644
index aac6a321cd..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1
+++ /dev/null
@@ -1,3 +0,0 @@
-
-whereis_diff_functions1.erl:10:7: The call erlang:register('master',pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis('master') call in whereis_diff_functions1.erl on line {8,8}
-whereis_diff_functions1.erl:18:7: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions1.erl on line {15,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_nested b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_nested
deleted file mode 100644
index 85a8546bc6..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_nested
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions1_nested.erl:23:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions1_nested.erl on line {11,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_pathsens b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_pathsens
deleted file mode 100644
index c9c4fe7b48..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_pathsens
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions1_pathsens.erl:32:3: The call erlang:register(Atom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::'kostis') call in whereis_diff_functions1_pathsens.erl on line {15,14}, the erlang:whereis(AnAtom::'kostis') call in whereis_diff_functions1_pathsens.erl on line {22,14}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_twice b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_twice
deleted file mode 100644
index f2338ed249..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions1_twice
+++ /dev/null
@@ -1,3 +0,0 @@
-
-whereis_diff_functions1_twice.erl:27:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions1_twice.erl on line {11,8}
-whereis_diff_functions1_twice.erl:30:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::atom()) call in whereis_diff_functions1_twice.erl on line {15,12}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2
deleted file mode 100644
index 005428286e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions2.erl:25:3: The call erlang:register(Atom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::'kostis') call in whereis_diff_functions2.erl on line {13,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_nested b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_nested
deleted file mode 100644
index 54ea8e70fd..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_nested
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions2_nested.erl:20:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions2_nested.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_pathsens b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_pathsens
deleted file mode 100644
index 3ec2234046..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_pathsens
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions2_pathsens.erl:29:3: The call erlang:register(Atom::atom(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions2_pathsens.erl on line {12,14}, the erlang:whereis(AnAtom::any()) call in whereis_diff_functions2_pathsens.erl on line {19,14}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_twice b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_twice
deleted file mode 100644
index d14a255040..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions2_twice
+++ /dev/null
@@ -1,3 +0,0 @@
-
-whereis_diff_functions2_twice.erl:24:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions2_twice.erl on line {8,8}
-whereis_diff_functions2_twice.erl:27:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::atom()) call in whereis_diff_functions2_twice.erl on line {12,12}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3
deleted file mode 100644
index 079ec9fb31..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions3.erl:8:3: The call erlang:register(AnAtom::atom(),'undefined' | pid() | port()) might fail due to a possible race condition caused by its combination with the erlang:whereis(Atom::any()) call in whereis_diff_functions3.erl on line {11,3}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_nested b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_nested
deleted file mode 100644
index f1a4733585..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_nested
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions3_nested.erl:21:3: The call erlang:unregister(Atom::atom()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions3_nested.erl on line {11,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_pathsens b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_pathsens
deleted file mode 100644
index 44e1ba6fbc..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions3_pathsens
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions3_pathsens.erl:29:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions3_pathsens.erl on line {12,14}, the erlang:whereis(AnAtom::any()) call in whereis_diff_functions3_pathsens.erl on line {19,14}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions4 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions4
deleted file mode 100644
index 2f39e19a03..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions4
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions4.erl:32:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions4.erl on line {13,8}, the erlang:whereis(AnAtom::atom()) call in whereis_diff_functions4.erl on line {17,12}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions5 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions5
deleted file mode 100644
index 1e19cb26e7..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions5
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions5.erl:22:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions5.erl on line {10,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions6 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions6
deleted file mode 100644
index 5c8a093405..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_functions6
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_functions6.erl:29:3: The call erlang:register(Atom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_functions6.erl on line {10,8}, the erlang:whereis(AnAtom::atom()) call in whereis_diff_functions6.erl on line {14,12}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1
deleted file mode 100644
index 6a28376c07..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules2.erl:11:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_modules1.erl on line {10,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_pathsens b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_pathsens
deleted file mode 100644
index f287ade224..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_pathsens
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules2_pathsens.erl:12:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_modules1_pathsens.erl on line {12,14}, the erlang:whereis(AnAtom::any()) call in whereis_diff_modules1_pathsens.erl on line {19,14}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_rec b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_rec
deleted file mode 100644
index 2d2033d172..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules1_rec
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules1_rec.erl:10:10: The call erlang:register(AnAtom::any(),Id::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(NextAtom::any()) call in whereis_diff_modules1_rec.erl on line {12,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2
deleted file mode 100644
index 3ae7f24bf7..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules3.erl:8:3: The call erlang:register(AnAtom::atom(),'undefined' | pid() | port()) might fail due to a possible race condition caused by its combination with the erlang:whereis(Atom::any()) call in whereis_diff_modules4.erl on line {11,3}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_pathsens b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_pathsens
deleted file mode 100644
index b3a9a2130a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_pathsens
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules4_pathsens.erl:13:3: The call erlang:register(Atom::atom(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_modules3_pathsens.erl on line {12,14}, the erlang:whereis(AnAtom::any()) call in whereis_diff_modules3_pathsens.erl on line {19,14}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_rec b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_rec
deleted file mode 100644
index bca2659836..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules2_rec
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules3_rec.erl:13:10: The call erlang:register(AnAtom::any(),Id::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(NextAtom::any()) call in whereis_diff_modules3_rec.erl on line {15,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules3 b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules3
deleted file mode 100644
index c8afd6603f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules6.erl:11:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_modules5.erl on line {10,8}, the erlang:whereis(AnAtom::atom()) call in whereis_diff_modules5.erl on line {14,12}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_nested b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_nested
deleted file mode 100644
index b003518eb7..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_nested
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_modules3_nested.erl:11:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_modules1_nested.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_twice b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_twice
deleted file mode 100644
index c8d414d76c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_modules_twice
+++ /dev/null
@@ -1,3 +0,0 @@
-
-whereis_diff_modules2_twice.erl:11:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::atom()) call in whereis_diff_modules1_twice.erl on line {12,12}
-whereis_diff_modules2_twice.erl:8:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_diff_modules1_twice.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_vars_no_race b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_vars_no_race
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_vars_race b/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_vars_race
deleted file mode 100644
index 4309c8370c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_diff_vars_race
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_diff_vars_race.erl:16:7: The call erlang:register(Atom2::any(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(Atom1::any()) call in whereis_diff_vars_race.erl on line {13,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module1 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module1
deleted file mode 100644
index cf4393654f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module2.erl:11:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module1.erl on line {10,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module2 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module2
deleted file mode 100644
index 4ceffb2f1f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module4.erl:14:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module3.erl on line {10,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module3 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module3
deleted file mode 100644
index 9b5aa5c867..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module6.erl:14:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module5.erl on line {10,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module4 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module4
deleted file mode 100644
index c42e9b967f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module4
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module7.erl:8:3: The call erlang:register(AnAtom::atom(),pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module8.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module5 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module5
deleted file mode 100644
index 569d0f5976..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module5
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module9.erl:8:3: The call erlang:register(AnAtom::atom(),pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module10.erl on line {11,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module6 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module6
deleted file mode 100644
index cc848c493c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module6
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module12.erl:14:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module11.erl on line {10,8}, the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module11.erl on line {21,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module7 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module7
deleted file mode 100644
index 5bb9fb794b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module7
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module14.erl:11:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module13.erl on line {10,8}, the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module14.erl on line {16,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module8 b/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module8
deleted file mode 100644
index 6973b7422c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_intra_inter_module8
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_intra_inter_module16.erl:11:3: The call erlang:register(Atom::any(),Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module15.erl on line {10,8}, the erlang:whereis(AnAtom::any()) call in whereis_intra_inter_module16.erl on line {16,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_param b/lib/dialyzer/test/race_SUITE_data/results/whereis_param
deleted file mode 100644
index f6735807c1..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_param
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_param.erl:8:3: The call erlang:register(AnAtom::atom(),pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_param.erl on line {11,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_param_inter_module b/lib/dialyzer/test/race_SUITE_data/results/whereis_param_inter_module
deleted file mode 100644
index 97c9d27789..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_param_inter_module
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_param_inter_module1.erl:8:3: The call erlang:register(AnAtom::atom(),pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_param_inter_module2.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function1 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function1
deleted file mode 100644
index 66248649a0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function1
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function1.erl:14:4: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_rec_function1.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function2 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function2
deleted file mode 100644
index 83298a5c3c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function2.erl:13:10: The call erlang:register(AnAtom::atom(),Id::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(NextAtom::any()) call in whereis_rec_function2.erl on line {15,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function3 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function3
deleted file mode 100644
index 7b004aeb12..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function3.erl:13:10: The call erlang:register(AnAtom::atom(),Id::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(NextAtom::any()) call in whereis_rec_function3.erl on line {16,10}, the erlang:whereis(NextAtom::atom()) call in whereis_rec_function3.erl on line {20,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function4 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function4
deleted file mode 100644
index b2885774ba..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function4
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function4.erl:13:10: The call erlang:register(AnAtom::atom(),Id::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(NextAtom::any()) call in whereis_rec_function4.erl on line {15,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function5 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function5
deleted file mode 100644
index d5e9c4328a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function5
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function5.erl:10:10: The call erlang:register(AnAtom::any(),Id::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(NextAtom::any()) call in whereis_rec_function5.erl on line {12,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function6 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function6
deleted file mode 100644
index c4c7c55b02..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function6
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function6.erl:10:10: The call erlang:register(AnAtom::any(),Id::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(NextAtom::any()) call in whereis_rec_function6.erl on line {12,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function7 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function7
deleted file mode 100644
index 0a0b07bcc0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function7
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function7.erl:15:4: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_rec_function7.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function8 b/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function8
deleted file mode 100644
index db37842e6b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_rec_function8
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_rec_function8.erl:18:4: The call erlang:register(AnAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_rec_function8.erl on line {11,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_try_catch b/lib/dialyzer/test/race_SUITE_data/results/whereis_try_catch
deleted file mode 100644
index 3cf78cf0d2..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_try_catch
+++ /dev/null
@@ -1,3 +0,0 @@
-
-whereis_try_catch.erl:13:14: The call erlang:register('master',Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis('master') call in whereis_try_catch.erl on line {8,8}
-whereis_try_catch.erl:21:9: The call erlang:register('master',Pid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis('master') call in whereis_try_catch.erl on line {18,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars1 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars1
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars10 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars10
deleted file mode 100644
index 37c060def4..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars10
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars10.erl:17:22: The call erlang:register(OtherAtom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars10.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars11 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars11
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars12 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars12
deleted file mode 100644
index bc19f7a756..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars12
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars12.erl:16:37: The call erlang:register(OtherAtom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars12.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars13 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars13
deleted file mode 100644
index 864231d6b4..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars13
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars13.erl:16:52: The call erlang:register(OtherAtom::'kostis',APid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars13.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars14 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars14
deleted file mode 100644
index 4aaf586141..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars14
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars14.erl:16:52: The call erlang:register(OtherAtom::'kostis',APid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars14.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars15 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars15
deleted file mode 100644
index 2042e119ca..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars15
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars15.erl:17:15: The call erlang:register(OtherAtom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars15.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars16 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars16
deleted file mode 100644
index 89f5b963a8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars16
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars16.erl:17:15: The call erlang:register(OtherAtom::any(),APid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars16.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars17 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars17
deleted file mode 100644
index 1f94cfef0e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars17
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars17.erl:17:15: The call erlang:register(OtherAtom::any(),APid::any()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars17.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars18 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars18
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars19 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars19
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars2 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars2
deleted file mode 100644
index 6aa57fcdc5..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars2
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars2.erl:14:18: The call erlang:register(OtherAtom::atom(),Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars2.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars20 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars20
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars21 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars21
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars22 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars22
deleted file mode 100644
index 613d788e59..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars22
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars22.erl:21:21: The call erlang:register(OtherAtom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars22.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars3 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars3
deleted file mode 100644
index 74ab067e56..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars3
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars3.erl:14:18: The call erlang:register(OtherAtom::atom(),APid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars3.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars4 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars4
deleted file mode 100644
index 0584b03a8d..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars4
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars4.erl:14:18: The call erlang:register(OtherAtom::atom() | pid(),APid::atom() | pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars4.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars5 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars5
deleted file mode 100644
index 0482d31215..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars5
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars5.erl:16:26: The call erlang:register(OtherAtom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars5.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars6 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars6
deleted file mode 100644
index 6edcb8b756..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars6
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars6.erl:16:34: The call erlang:register(OtherAtom::'kostis',APid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars6.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars7 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars7
deleted file mode 100644
index 23c1ef2942..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars7
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars7.erl:16:34: The call erlang:register(OtherAtom::'kostis',APid::atom() | pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars7.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars8 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars8
deleted file mode 100644
index 59019c74c0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars8
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars8.erl:16:21: The call erlang:register(OtherAtom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars8.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars9 b/lib/dialyzer/test/race_SUITE_data/results/whereis_vars9
deleted file mode 100644
index 89fba57863..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/results/whereis_vars9
+++ /dev/null
@@ -1,2 +0,0 @@
-
-whereis_vars9.erl:16:21: The call erlang:register(OtherAtom::'kostis',Pid::pid()) might fail due to a possible race condition caused by its combination with the erlang:whereis(AnAtom::any()) call in whereis_vars9.erl on line {8,8}
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1.erl
deleted file mode 100644
index 0039195e0a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args1).
--export([start/0]).
-
-start() ->
- F = fun(T) -> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, [{counter, N+1}])
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0}),
- io:format("Inserted ~w\n", [{counter, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args10.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args10.erl
deleted file mode 100644
index c897a34af0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args10.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args10).
--export([start/0]).
-
-start() ->
- F = fun(T) -> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, [{counter, N+1}])
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- A = {counter, 0},
- B = [],
- ets:insert(foo, [A|B]),
- io:format("Inserted ~w\n", [{counter, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1_suppressed.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1_suppressed.erl
deleted file mode 100644
index 5134cc6f0b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args1_suppressed.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args1_suppressed).
--export([start/0]).
-
--dialyzer({nowarn_function,start/0}).
-
-start() ->
- F = fun(T) -> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, [{counter, N+1}])
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0}),
- io:format("Inserted ~w\n", [{counter, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args2.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args2.erl
deleted file mode 100644
index c1857eb58b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args2.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args2).
--export([start/0]).
-
-start() ->
- F = fun(T)-> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, [{counter, N+1}, {maria, N+1}, {kostis, N+1}])
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0}),
- io:format("Inserted ~w\n", [{counter, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args3.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args3.erl
deleted file mode 100644
index 74401b76fd..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args3.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args3).
--export([start/0]).
-
-start() ->
- F = fun(T)-> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, [{maria, N+1}, {kostis, N+1}])
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0}),
- io:format("Inserted ~w\n", [{counter, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args4.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args4.erl
deleted file mode 100644
index 2c892074ec..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args4.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args4).
--export([start/0]).
-
-start() ->
- F = fun(T)-> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, {counter, N+1})
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0}),
- io:format("Inserted ~w\n", [{counter, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args5.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args5.erl
deleted file mode 100644
index 156f555a7c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args5.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args5).
--export([start/0]).
-
-start() ->
- F = fun(T)-> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, {counter, N+1, N+2})
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0, 0}),
- io:format("Inserted ~w\n", [{counter, 0, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args6.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args6.erl
deleted file mode 100644
index 1e5887f76d..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args6.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args6).
--export([start/0]).
-
-start() ->
- F = fun(T)-> [{_, N}] = ets:lookup(T, counter),
- ets:insert(T, [{counter, N+1, N+2}])
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0, 0}),
- io:format("Inserted ~w\n", [{counter, 0, 0}]),
- F(foo),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args7.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args7.erl
deleted file mode 100644
index 912bbf7073..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args7.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args7).
--export([test/0]).
-
-test() ->
- Foo = foo,
- ets:new(Foo, [named_table, public]),
- race(Foo).
-
-race(Tab) ->
- [{_, N}] = ets:lookup(Tab, counter),
- aux(Tab, N).
-
-aux(Table, N) ->
- ets:insert(Table, [{counter, N+1}]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args8.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args8.erl
deleted file mode 100644
index 275cf0291c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_args8.erl
+++ /dev/null
@@ -1,16 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the argument types of the calls.
-
--module(ets_insert_args8).
--export([test/1]).
-
-test(Foo) ->
- ets:new(Foo, [named_table, public]),
- race(Foo).
-
-race(Tab) ->
- [{_, N}] = ets:lookup(Tab, counter),
- aux(Tab, N).
-
-aux(Table, N) ->
- ets:insert(Table, [{counter, N+1}]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow1.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow1.erl
deleted file mode 100644
index cfe0b2b727..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow1.erl
+++ /dev/null
@@ -1,20 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account control flow that might exist.
-
--module(ets_insert_control_flow1).
--export([start/0]).
-
-start() ->
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {random, random:uniform(maria:get_int())}),
- io:format("Inserted ~w\n", [{_, N}] = ets:lookup(foo, random)),
- case (N rem 2 == 0) of
- true ->
- io:format("\nInserted an even number\n", []),
- io:format("\nWill make it odd\n", []),
- ets:insert(foo, {random, N+1});
- false -> ok
- end,
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, random),
- io:format("Random odd integer: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow2.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow2.erl
deleted file mode 100644
index d160418bdb..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow2.erl
+++ /dev/null
@@ -1,26 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account control flow that might exist.
-
--module(ets_insert_control_flow2).
--export([start/0]).
-
-start() ->
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {random, random:uniform(150)}),
- io:format("Inserted ~w\n", [{_, N}] = ets:lookup(foo, random)),
- case (N rem 2 == 0) of
- true ->
- io:format("\nInserted an even integer\n", []),
- io:format("\nWill make it odd and generate password\n", []),
- ets:insert(foo, [{random, N+1}, {pass, generate_password(N)}]);
- false ->
- io:format("\nInserted an odd integer\n", []),
- io:format("\nWill make it even and generate password\n", []),
- ets:insert(foo, [{random, N+1}, {pass, generate_password(N)}])
- end,
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, pass),
- io:format("New password: ~w\n", [ObjectList]).
-
-generate_password(N) ->
- lists:map(fun (_) -> random:uniform(90)+$\s+1 end, lists:seq(1,N)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow3.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow3.erl
deleted file mode 100644
index 9c6a22eb05..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow3.erl
+++ /dev/null
@@ -1,31 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account control flow that might exist.
-
--module(ets_insert_control_flow3).
--export([start/1]).
-
-start(User) ->
- Table = ets:new(table, [public]),
- mod:process(Table),
- [{_, N}] =
- case User of
- root -> ets:lookup(Table, root);
- user -> ets:lookup(Table, user);
- Other -> [{undefined, -1}]
- end,
- case N of
- -1 -> io:format("\nUnknown User\n", []);
- 0 ->
- case User of
- root ->
- ets:insert(Table, {User, Pass = generate_password(N) ++ generate_password(N+1)});
- user ->
- ets:insert(Table, {User, Pass = generate_password(N)})
- end,
- io:format("\nYour new pass is ~w\n", [Pass]);
- P ->
- io:format("\nYour pass is ~w\n", [P])
- end.
-
-generate_password(N) ->
- lists:map(fun (_) -> random:uniform(90)+$\s+1 end, lists:seq(1,N)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow4.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow4.erl
deleted file mode 100644
index caa3804614..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow4.erl
+++ /dev/null
@@ -1,31 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account control flow that might exist.
-
--module(ets_insert_control_flow4).
--export([start/1]).
-
-start(User) ->
- Table = ets:new(table, [public]),
- mod:process(Table),
- [{_, N}] =
- case User of
- root -> ets:lookup(Table, pass);
- user -> ets:lookup(Table, pass);
- _Other -> [{undefined, -1}]
- end,
- case N of
- -1 -> io:format("\nUnknown User\n", []);
- 0 ->
- case User of
- root ->
- ets:insert(Table, {pass, Pass = generate_password(N) ++ generate_password(N+1)});
- user ->
- ets:insert(Table, {pass, Pass = generate_password(N)})
- end,
- io:format("\nYour new pass is ~w\n", [Pass]);
- P ->
- io:format("\nYour pass is ~w\n", [P])
- end.
-
-generate_password(N) ->
- lists:map(fun (_) -> random:uniform(90)+$\s+1 end, lists:seq(1,N)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow5.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow5.erl
deleted file mode 100644
index b19fd776ec..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_control_flow5.erl
+++ /dev/null
@@ -1,34 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account control flow that might exist.
-
--module(ets_insert_control_flow5).
--export([start/1]).
-
-start(User) ->
- Table = ets:new(table, [public]),
- mod:process(Table),
- [{_, N}] =
- case User of
- root -> ets:lookup(Table, pass);
- user -> ets:lookup(Table, pass);
- Other -> [{undefined, -1}]
- end,
- [{_, Msg}] = ets:lookup(Table, welcome_msg),
- case N of
- -1 -> io:format("\nUnknown User\n", []);
- 0 ->
- case User of
- root ->
- ets:insert(Table, {welcome_msg, Msg ++ "root"}),
- ets:insert(Table, {pass, Pass = generate_password(N) ++ generate_password(N+1)});
- user ->
- ets:insert(Table, {welcome_msg, Msg ++ "user"}),
- ets:insert(Table, {pass, Pass = generate_password(N)})
- end,
- io:format("\nYour new pass is ~w\n", [Pass]);
- P ->
- io:format("\nYour pass is ~w\n", [P])
- end.
-
-generate_password(N) ->
- lists:map(fun (_) -> random:uniform(90)+$\s+1 end, lists:seq(1,N)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race1.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race1.erl
deleted file mode 100644
index 7b2dbb8eff..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race1.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between ets:lookup/
-%% ets:insert is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(ets_insert_diff_atoms_race1).
--export([test/0]).
-
-test() ->
- ets:new(foo, [named_table, public]),
- {race(foo), no_race(foo)}.
-
-race(Tab) ->
- [{_, N}] = ets:lookup(Tab, counter),
- aux(Tab, N).
-
-no_race(Tab) ->
- [{_, N}] = ets:lookup(Tab, counter),
- AnotherTab = bar,
- aux(AnotherTab, N).
-
-aux(Table, N) ->
- ets:insert(Table, [{counter, N+1}]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race2.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race2.erl
deleted file mode 100644
index d7afc79d07..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race2.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between ets:lookup/
-%% ets:insert is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(ets_insert_diff_atoms_race2).
--export([test/0]).
-
-test() ->
- ets:new(foo, [named_table, public]),
- {race(foo, counter), no_race(foo, counter)}.
-
-race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- aux(Tab, Counter, N).
-
-no_race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- AnotherTab = bar,
- aux(AnotherTab, Counter, N).
-
-aux(Table, Counter, N) ->
- ets:insert(Table, [{Counter, N+1}]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race3.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race3.erl
deleted file mode 100644
index e05e9be54b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race3.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between ets:lookup/
-%% ets:insert is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(ets_insert_diff_atoms_race3).
--export([test/0]).
-
-test() ->
- ets:new(foo, [named_table, public]),
- {race(foo), no_race(foo)}.
-
-race(Tab) ->
- [{_, N}] = ets:lookup(Tab, counter),
- aux(Tab, N).
-
-no_race(Tab) ->
- [{_, N}] = ets:lookup(Tab, counter),
- AnotherTab = bar,
- aux(AnotherTab, N).
-
-aux(Table, N) ->
- ets:insert(Table, {counter, N+1}).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race4.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race4.erl
deleted file mode 100644
index e2a3588f41..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race4.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between ets:lookup/
-%% ets:insert is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(ets_insert_diff_atoms_race4).
--export([test/0]).
-
-test() ->
- ets:new(foo, [named_table, public]),
- {race(foo, counter), no_race(foo, counter)}.
-
-race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- aux(Tab, Counter, N).
-
-no_race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- AnotherTab = bar,
- aux(AnotherTab, Counter, N).
-
-aux(Table, Counter, N) ->
- ets:insert(Table, {Counter, N+1}).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race5.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race5.erl
deleted file mode 100644
index dd53387c11..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race5.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between ets:lookup/
-%% ets:insert is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(ets_insert_diff_atoms_race5).
--export([test/0]).
-
-test() ->
- ets:new(foo, [named_table, public]),
- {race(foo, counter), no_race(foo, counter)}.
-
-race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- aux(Tab, Counter, N).
-
-no_race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- AnotherCounter = index,
- aux(Tab, AnotherCounter, N).
-
-aux(Table, Counter, N) ->
- ets:insert(Table, [{Counter, N+1}]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race6.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race6.erl
deleted file mode 100644
index ec0a0eaadf..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_diff_atoms_race6.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between ets:lookup/
-%% ets:insert is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(ets_insert_diff_atoms_race6).
--export([test/0]).
-
-test() ->
- ets:new(foo, [named_table, public]),
- {race(foo, counter), no_race(foo, counter)}.
-
-race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- aux(Tab, Counter, N).
-
-no_race(Tab, Counter) ->
- [{_, N}] = ets:lookup(Tab, Counter),
- AnotherCounter = index,
- aux(Tab, AnotherCounter, N).
-
-aux(Table, Counter, N) ->
- ets:insert(Table, {Counter, N+1}).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_double1.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_double1.erl
deleted file mode 100644
index d5b6689eb1..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_double1.erl
+++ /dev/null
@@ -1,28 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account multiple ets:inserts that might exist.
-
--module(ets_insert_double1).
--export([start/0]).
-
-start() ->
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {random, random:uniform(150)}),
- io:format("Inserted ~w\n", [{_, N}] = ets:lookup(foo, random)),
- case (N rem 2 == 0) of
- true ->
- io:format("\nInserted an even integer\n", []),
- io:format("\nWill make it odd and generate new password\n", []),
- ets:insert(foo, [{random, N+1}, {pass, generate_password(N)}]);
- false ->
- io:format("\nInserted an odd integer\n", []),
- io:format("\nWill make it even and generate new password\n", []),
- ets:insert(foo, [{random, N+1}, {pass, generate_password(N)}])
- end,
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, pass),
- io:format("New password: ~w\n", [ObjectList]),
- ets:insert(foo, {pass, 'empty'}).
-
-generate_password(N) ->
- [{_, P}] = ets:lookup(foo, pass),
- lists:map(fun (_) -> random:uniform(90)+P+$\s+1 end, lists:seq(1,N)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_double2.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_double2.erl
deleted file mode 100644
index fa653e3090..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_double2.erl
+++ /dev/null
@@ -1,28 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account multiple ets:inserts that might exist.
-
--module(ets_insert_double2).
--export([start/2]).
-
-start(Random, Pass) ->
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {Random, random:uniform(150)}),
- io:format("Inserted ~w\n", [{_, N}] = ets:lookup(foo, Random)),
- case (N rem 2 == 0) of
- true ->
- io:format("\nInserted an even integer\n", []),
- io:format("\nWill make it odd and generate new password\n", []),
- ets:insert(foo, [{Random, N+1}, {Pass, generate_password(Pass, N)}]);
- false ->
- io:format("\nInserted an odd integer\n", []),
- io:format("\nWill make it even and generate new password\n", []),
- ets:insert(foo, [{Random, N+1}, {Pass, generate_password(Pass, N)}])
- end,
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, Pass),
- io:format("New password: ~w\n", [ObjectList]),
- ets:insert(foo, {Pass, 'empty'}).
-
-generate_password(Pass, N) ->
- [{_, P}] = ets:lookup(foo, Pass),
- lists:map(fun (_) -> random:uniform(90)+P+$\s+1 end, lists:seq(1,N)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs1.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs1.erl
deleted file mode 100644
index b6b258fd21..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs1.erl
+++ /dev/null
@@ -1,18 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the anonymous functions.
-
--module(ets_insert_funs1).
--export([start/0]).
-
-start() ->
- F = fun(T) ->
- ets:lookup(T, counter)
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0}),
- io:format("Inserted ~w\n", [{counter, 0}]),
- [{_, N}] = F(foo),
- ets:insert(foo, [{counter, N+1}]),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs2.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs2.erl
deleted file mode 100644
index 6b9518f314..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_funs2.erl
+++ /dev/null
@@ -1,18 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account the anonymous functions.
-
--module(ets_insert_funs2).
--export([start/0]).
-
-start() ->
- F = fun(T, N) ->
- ets:insert(T, [{counter, N+1}])
- end,
- io:format("Created ~w\n", [ets:new(foo, [named_table, public])]),
- ets:insert(foo, {counter, 0}),
- io:format("Inserted ~w\n", [{counter, 0}]),
- [{_, N}] = ets:lookup(foo, counter),
- F(foo, N),
- io:format("Update complete\n", []),
- ObjectList = ets:lookup(foo, counter),
- io:format("Counter: ~w\n", [ObjectList]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_new.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_new.erl
deleted file mode 100644
index 63f3272912..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_new.erl
+++ /dev/null
@@ -1,15 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account multiple ets:new calls that might exist.
-
--module(ets_insert_new).
--export([test/0]).
-
-test() ->
- T1 = ets:new(foo, [public]),
- T2 = ets:new(bar, []),
- ets:lookup(T2, counter),
- aux(T1),
- aux(T2).
-
-aux(Tab) ->
- ets:insert(Tab, {counter, 1}).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_param.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_param.erl
deleted file mode 100644
index a479a31792..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_param.erl
+++ /dev/null
@@ -1,26 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination in higher order functions.
-
--module(ets_insert_param).
--export([start/1]).
-
-start(User) ->
- Table = ets:new(table, [public]),
- mod:process(Table),
- [{_, Msg}] = ets:lookup(Table, welcome_msg),
- case User of
- root ->
- ets:insert(Table, {welcome_msg, Msg ++ "root"}),
- ets:insert(Table, {pass, Pass = generate_password(ets:lookup(Table, pass))
- ++ generate_strong_password(ets:lookup(Table, pass))});
- user ->
- ets:insert(Table, {welcome_msg, Msg ++ "user"}),
- ets:insert(Table, {pass, Pass = generate_password(ets:lookup(Table, pass))})
- end,
- io:format("\nYour new pass is ~w\n", [Pass]).
-
-generate_password([{_, N}]) ->
- lists:map(fun (_) -> random:uniform(90)+$\s+1 end, lists:seq(1,N)).
-
-generate_strong_password([{_, N}]) ->
- lists:map(fun (_) -> random:uniform(90)+$\s+1 end, lists:seq(1,(N rem 2) * 5)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_public.erl b/lib/dialyzer/test/race_SUITE_data/src/ets_insert_public.erl
deleted file mode 100644
index 4caa9fe8a0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/ets_insert_public.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests the presence of possible races due to an ets:lookup/ets:insert
-%% combination. It takes into account any public ETS tables that might exist.
-
--module(ets_insert_public).
-
--export([main/1]).
-
-%% Main
-main(Foo) ->
- make_table(Foo),
- ets:insert(Foo, {counter, 0}),
- [{_, N}] = ets:lookup(Foo, counter),
- NewN = N + 1,
- ets:insert(Foo, {counter, NewN}),
- NewN.
-
-make_table(Foo) ->
- init(Foo).
-
-init(Foo) ->
- ets:new(Foo, [named_table, public]),
- ets:insert(Foo, {counter, 0}),
- {ok, feeling_good}.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/extract_translations.erl b/lib/dialyzer/test/race_SUITE_data/src/extract_translations.erl
deleted file mode 100644
index 76ffca4676..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/extract_translations.erl
+++ /dev/null
@@ -1,293 +0,0 @@
-%%%----------------------------------------------------------------------
-%%% File : extract_translations.erl
-%%% Author : Sergei Golovan <sgolovan@nes.ru>
-%%% Purpose : Auxiliary tool for interface/messages translators
-%%% Created : 23 Apr 2005 by Sergei Golovan <sgolovan@nes.ru>
-%%% Id : $Id: extract_translations.erl,v 1.1 2009/08/17 09:18:59 maria Exp $
-%%%----------------------------------------------------------------------
-
--module(extract_translations).
--author('sgolovan@nes.ru').
-
--export([start/0]).
-
--define(STATUS_SUCCESS, 0).
--define(STATUS_ERROR, 1).
--define(STATUS_USAGE, 2).
-
--include_lib("kernel/include/file.hrl").
-
-
-start() ->
- ets:new(translations, [named_table, public]),
- ets:new(translations_obsolete, [named_table, public]),
- ets:new(files, [named_table, public]),
- ets:new(vars, [named_table, public]),
- case init:get_plain_arguments() of
-	["-srcmsg2po", Dir, File] ->
-	 print_po_header(File),
-	 Status = process(Dir, File, srcmsg2po),
-	 halt(Status);
-	["-unused", Dir, File] ->
-	 Status = process(Dir, File, unused),
-	 halt(Status);
-	[Dir, File] ->
-	 Status = process(Dir, File, used),
-	 halt(Status);
-	_ ->
-	 print_usage(),
-	 halt(?STATUS_USAGE)
- end.
-
-
-process(Dir, File, Used) ->
- case load_file(File) of
-	{error, Reason} ->
-	 io:format("~s: ~s~n", [File, file:format_error(Reason)]),
-	 ?STATUS_ERROR;
-	_ ->
-	 FileList = find_src_files(Dir),
-	 lists:foreach(
-	 fun(F) ->
-		 parse_file(Dir, F, Used)
-	 end, FileList),
-	 case Used of
-		unused ->
-		 ets:foldl(fun({Key, _}, _) ->
-				 io:format("~p~n", [Key])
-			 end, ok, translations);
-		srcmsg2po ->
-		 ets:foldl(fun({Key, Trans}, _) ->
-				 print_translation_obsolete(Key, Trans)
-			 end, ok, translations_obsolete);
-		_ ->
-		 ok
-	 end,
-	 ?STATUS_SUCCESS
- end.
-
-parse_file(Dir, File, Used) ->
- ets:delete_all_objects(vars),
- case epp:parse_file(File, [Dir, filename:dirname(File) | code:get_path()], []) of
-	{ok, Forms} ->
-	 lists:foreach(
-	 fun(F) ->
-		 parse_form(Dir, File, F, Used)
-	 end, Forms);
-	_ ->
-	 ok
- end.
-
-parse_form(Dir, File, Form, Used) ->
- case Form of
-	%%{undefined, Something} ->
- %% io:format("Undefined: ~p~n", [Something]);
-	{call,
-	 _,
-	 {remote, _, {atom, _, translate}, {atom, _, translate}},
-	 [_, {string, Line, Str}]
-	} ->
-	 process_string(Dir, File, Line, Str, Used);
-	{call,
-	 _,
-	 {remote, _, {atom, _, translate}, {atom, _, translate}},
-	 [_, {var, _, Name}]
-	} ->
-	 case ets:lookup(vars, Name) of
-		[{_Name, Value, Line}] ->
-		 process_string(Dir, File, Line, Value, Used);
-		_ ->
-		 ok
-	 end;
-	{match,
-	 _,
-	 {var, _, Name},
-	 {string, Line, Value}
-	} ->
-	 ets:insert(vars, {Name, Value, Line});
-	L when is_list(L) ->
-	 lists:foreach(
-	 fun(F) ->
-		 parse_form(Dir, File, F, Used)
-	 end, L);
-	T when is_tuple(T) ->
-	 lists:foreach(
-	 fun(F) ->
-		 parse_form(Dir, File, F, Used)
-	 end, tuple_to_list(T));
-	_ ->
-	 ok
- end.
-
-process_string(_Dir, _File, _Line, "", _Used) ->
- ok;
-
-process_string(_Dir, File, Line, Str, Used) ->
- case {ets:lookup(translations, Str), Used} of
-	{[{_Key, _Trans}], unused} ->
-	 ets:delete(translations, Str);
-	{[{_Key, _Trans}], used} ->
-	 ok;
-	{[{_Key, Trans}], srcmsg2po} ->
-	 ets:delete(translations_obsolete, Str),
-	 print_translation(File, Line, Str, Trans);
-	{_, used} ->
-	 case ets:lookup(files, File) of
-		[{_}] ->
-		 ok;
-		_ ->
-		 io:format("~n% ~s~n", [File]),
-		 ets:insert(files, {File})
-	 end,
-	 case Str of
-		[] -> ok;
-		_ -> io:format("{~p, \"\"}.~n", [Str])
-	 end,
-	 ets:insert(translations, {Str, ""});
-	{_, srcmsg2po} ->
-	 case ets:lookup(files, File) of
-		[{_}] ->
-		 ok;
-		_ ->
-		 ets:insert(files, {File})
-	 end,
-	 ets:insert(translations, {Str, ""}),
-	 print_translation(File, Line, Str, "");
-	_ ->
-	 ok
- end.
-
-load_file(File) ->
- case file:consult(File) of
-	{ok, Terms} ->
-	 lists:foreach(
-	 fun({Orig, Trans}) ->
-		 case Trans of
-			"" ->
-			 ok;
-			_ ->
-			 ets:insert(translations, {Orig, Trans}),
-			 ets:insert(translations_obsolete, {Orig, Trans})
-		 end
-	 end, Terms);
-	Err ->
-	 Err
- end.
-
-find_src_files(Dir) ->
- case file:list_dir(Dir) of
-	{ok, FileList} ->
-	 recurse_filelist(
-	 lists:map(
-	 fun(F) ->
-			filename:join(Dir, F)
-		end, FileList));
-	_ ->
-	 []
- end.
-
-recurse_filelist(FileList) ->
- recurse_filelist(FileList, []).
-
-recurse_filelist([], Acc) ->
- lists:reverse(Acc);
-
-recurse_filelist([H | T], Acc) ->
- case file:read_file_info(H) of
-	{ok, #file_info{type = directory}} ->
-	 recurse_filelist(T, lists:reverse(find_src_files(H)) ++ Acc);
-	{ok, #file_info{type = regular}} ->
-	 case string:substr(H, string:len(H) - 3) of
-		".erl" ->
-		 recurse_filelist(T, [H | Acc]);
-		".hrl" ->
-		 recurse_filelist(T, [H | Acc]);
-		_ ->
-		 recurse_filelist(T, Acc)
-	 end;
-	_ ->
-	 recurse_filelist(T, Acc)
- end.
-
-
-print_usage() ->
- io:format(
- "Usage: extract_translations [-unused] dir file~n"
- "~n"
- "Example:~n"
- " extract_translations . ./msgs/ru.msg~n"
- ).
-
-
-%%%
-%%% Gettext
-%%%
-
-print_po_header(File) ->
- MsgProps = get_msg_header_props(File),
- {Language, [LastT | AddT]} = prepare_props(MsgProps),
- application:load(ejabberd),
- {ok, Version} = application:get_key(ejabberd, vsn),
- print_po_header(Version, Language, LastT, AddT).
-
-get_msg_header_props(File) ->
- {ok, F} = file:open(File, [read]),
- Lines = get_msg_header_props(F, []),
- file:close(F),
- Lines.
-
-get_msg_header_props(F, Lines) ->
- String = io:get_line(F, ""),
- case io_lib:fread("% ", String) of
-	{ok, [], RemString} ->
-	 case io_lib:fread("~s", RemString) of
-		{ok, [Key], Value} when Value /= "\n" ->
-		 %% The first character in Value is a blankspace:
-		 %% And the last characters are 'slash n'
-		 ValueClean = string:substr(Value, 2, string:len(Value)-2),
-		 get_msg_header_props(F, Lines ++ [{Key, ValueClean}]);
-		_ ->
-		 get_msg_header_props(F, Lines)
-	 end;
-	_ ->
-	 Lines
- end.
-
-prepare_props(MsgProps) ->
- Language = proplists:get_value("Language:", MsgProps),
- Authors = proplists:get_all_values("Author:", MsgProps),
- {Language, Authors}.
-
-print_po_header(Version, Language, LastTranslator, AdditionalTranslatorsList) ->
- AdditionalTranslatorsString = build_additional_translators(AdditionalTranslatorsList),
- HeaderString =
-	"msgid \"\"\n"
-	"msgstr \"\"\n"
-	"\"Project-Id-Version: " ++ Version ++ "\\n\"\n"
-	++ "\"X-Language: " ++ Language ++ "\\n\"\n"
-	"\"Last-Translator: " ++ LastTranslator ++ "\\n\"\n"
-	++ AdditionalTranslatorsString ++
-	"\"MIME-Version: 1.0\\n\"\n"
-	"\"Content-Type: text/plain; charset=UTF-8\\n\"\n"
-	"\"Content-Transfer-Encoding: 8bit\\n\"\n",
- io:format("~s~n", [HeaderString]).
-
-build_additional_translators(List) ->
- lists:foldl(
- fun(T, Str) ->
-	 Str ++ "\"X-Additional-Translator: " ++ T ++ "\\n\"\n"
- end,
- "",
- List).
-
-print_translation(File, Line, Str, StrT) ->
- {ok, StrQ, _} = regexp:gsub(Str, "\"", "\\\""),
- {ok, StrTQ, _} = regexp:gsub(StrT, "\"", "\\\""),
- io:format("#: ~s:~p~nmsgid \"~s\"~nmsgstr \"~s\"~n~n", [File, Line, StrQ, StrTQ]).
-
-print_translation_obsolete(Str, StrT) ->
- File = "unknown.erl",
- Line = 1,
- {ok, StrQ, _} = regexp:gsub(Str, "\"", "\\\""),
- {ok, StrTQ, _} = regexp:gsub(StrT, "\"", "\\\""),
- io:format("#: ~s:~p~n#~~ msgid \"~s\"~n#~~ msgstr \"~s\"~n~n", [File, Line, StrQ, StrTQ]).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race1.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race1.erl
deleted file mode 100644
index 2f499208a2..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race1.erl
+++ /dev/null
@@ -1,33 +0,0 @@
-%% This tests that the race condition detection between mnesia:dirty_read/
-%% mnesia:dirty_write is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(mnesia_diff_atoms_race1).
--export([test/2]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-test(Eno, Raise) ->
- {race(employee, Eno, Raise), no_race(employee, Eno, Raise)}.
-
-race(Tab, Eno, Raise) ->
- [E] = mnesia:dirty_read(Tab, Eno),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- aux(Tab, New).
-
-no_race(Tab, Eno, Raise) ->
- [E] = mnesia:dirty_read(Tab, Eno),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- AnotherTab = employer,
- aux(AnotherTab, New).
-
-
-aux(Table, Record) ->
- mnesia:dirty_write(Table, Record).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race2.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race2.erl
deleted file mode 100644
index c1dcfbd8f5..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_diff_atoms_race2.erl
+++ /dev/null
@@ -1,37 +0,0 @@
-%% This tests that the race condition detection between mnesia:dirty_read/
-%% mnesia:dirty_write is robust even when the functions are called with
-%% different atoms as arguments.
-
--module(mnesia_diff_atoms_race2).
--export([test/2]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
--record(employer, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-test(Eno, Raise) ->
- {race(employee, Eno, Raise), no_race(employee, Eno, Raise)}.
-
-race(Tab, Eno, Raise) ->
- [E] = mnesia:dirty_read(Tab, Eno),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- aux(New).
-
-no_race(Tab, Eno, Raise) ->
- [E] = mnesia:dirty_read(Tab, Eno),
- AnotherRecord = #employer{},
- aux(AnotherRecord).
-
-aux(Record) ->
- mnesia:dirty_write(Record).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_one_write_two.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_one_write_two.erl
deleted file mode 100644
index 4ca62deedc..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_one_write_two.erl
+++ /dev/null
@@ -1,20 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account the argument types
-%% of the calls.
-
--module(mnesia_dirty_read_one_write_two).
--export([raise/2]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise) ->
- [E] = mnesia:dirty_read({employee, Eno}),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(employee, New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_two_write_one.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_two_write_one.erl
deleted file mode 100644
index e523a03789..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_two_write_one.erl
+++ /dev/null
@@ -1,20 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account the argument types
-%% of the calls.
-
--module(mnesia_dirty_read_two_write_one).
--export([raise/2]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise) ->
- [E] = mnesia:dirty_read(employee, Eno),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double1.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double1.erl
deleted file mode 100644
index 2bd18e4772..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double1.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account multiple
-%% mnesia:dirty_writes that might exist.
-
--module(mnesia_dirty_read_write_double1).
--export([raise/3]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise, Room) ->
- [E] = mnesia:dirty_read(employee, Eno),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(employee, New),
- move(E, Room).
-
-move(E, Room) ->
- New = E#employee{room_no = Room},
- mnesia:dirty_write(employee, New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double2.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double2.erl
deleted file mode 100644
index cdbfdc700a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double2.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account multiple
-%% mnesia:dirty_writes that might exist.
-
--module(mnesia_dirty_read_write_double2).
--export([raise/3]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise, Room) ->
- [E] = mnesia:dirty_read({employee, Eno}),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(New),
- move(E, Room).
-
-move(E, Room) ->
- New = E#employee{room_no = Room},
- mnesia:dirty_write(New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double3.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double3.erl
deleted file mode 100644
index 051524917e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double3.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account multiple
-%% mnesia:dirty_writes that might exist.
-
--module(mnesia_dirty_read_write_double3).
--export([raise/3]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise, Room) ->
- [E] = mnesia:dirty_read({employee, Eno}),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(employee, New),
- move(E, Room).
-
-move(E, Room) ->
- New = E#employee{room_no = Room},
- mnesia:dirty_write(employee, New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double4.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double4.erl
deleted file mode 100644
index 96752a6045..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_double4.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account multiple
-%% mnesia:dirty_writes that might exist.
-
--module(mnesia_dirty_read_write_double4).
--export([raise/3]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise, Room) ->
- [E] = mnesia:dirty_read(employee, Eno),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(New),
- move(E, Room).
-
-move(E, Room) ->
- New = E#employee{room_no = Room},
- mnesia:dirty_write(New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_one.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_one.erl
deleted file mode 100644
index aee6433736..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_one.erl
+++ /dev/null
@@ -1,20 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account the argument types
-%% of the calls.
-
--module(mnesia_dirty_read_write_one).
--export([raise/2]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise) ->
- [E] = mnesia:dirty_read({employee, Eno}),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_two.erl b/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_two.erl
deleted file mode 100644
index 037aeddafd..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/mnesia_dirty_read_write_two.erl
+++ /dev/null
@@ -1,20 +0,0 @@
-%% This tests the presence of possible races due to an mnesia:dirty_read/
-%% mnesia:dirty_write combination. It takes into account the argument types
-%% of the calls.
-
--module(mnesia_dirty_read_write_two).
--export([raise/2]).
-
--record(employee, {emp_no,
- name,
- salary,
- sex,
- phone,
- room_no}).
-
-
-raise(Eno, Raise) ->
- [E] = mnesia:dirty_read(employee, Eno),
- Salary = E#employee.salary + Raise,
- New = E#employee{salary = Salary},
- mnesia:dirty_write(employee, New).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow1.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow1.erl
deleted file mode 100644
index e65f6c3e23..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow1.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination. It takes into account control flow that might exist.
-
--module(whereis_control_flow1).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false -> register(AnAtom, Pid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow2.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow2.erl
deleted file mode 100644
index 41039482c9..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow2.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination. It takes into account control flow that might exist.
-
--module(whereis_control_flow2).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true ->
-	 io:format("self",[]),
-	 register(AnAtom, Pid);
- false -> register(AnAtom, Pid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow3.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow3.erl
deleted file mode 100644
index 94f8445fad..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow3.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination. It takes into account control flow that might exist.
-
--module(whereis_control_flow3).
--export([start/3]).
-
-start(AnAtom, Fun, FunName) ->
- Pid =
- case FunName of
- master ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end;
- slave ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end
- end,
- register(AnAtom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow4.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow4.erl
deleted file mode 100644
index 2a59760789..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow4.erl
+++ /dev/null
@@ -1,29 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination. It takes into account control flow that might exist.
-
--module(whereis_control_flow4).
--export([start/1]).
-
-start(Fun) ->
- case whereis(maria) of
- undefined ->
- Pid1 = spawn(Fun),
- case Pid1 =:= self() of
- true ->
- case whereis(kostis) of
- undefined ->
- Pid2 = spawn(Fun),
- case Pid2 =:= self() of
- true ->
- register(maria, Pid1),
- register(kostis, Pid2);
- false -> ok
- end;
- P when is_pid(P) ->
- ok
- end;
- false -> ok
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow5.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow5.erl
deleted file mode 100644
index 8de9cb2dad..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow5.erl
+++ /dev/null
@@ -1,12 +0,0 @@
-%% This tests the presence of possible races due to a whereis/unregister
-%% combination. It takes into account control flow that might exist.
-
--module(whereis_control_flow5).
--export([start/1]).
-
-start(AnAtom) ->
- case whereis(AnAtom) of
- undefined -> ok;
- P when is_pid(P) ->
- unregister(AnAtom)
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow6.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow6.erl
deleted file mode 100644
index 03c5095a50..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_control_flow6.erl
+++ /dev/null
@@ -1,12 +0,0 @@
-%% This tests the presence of possible races due to a whereis/unregister
-%% combination. It takes into account control flow that might exist.
-
--module(whereis_control_flow6).
--export([start/0]).
-
-start() ->
- case whereis(kostis) of
- undefined -> ok;
- P when is_pid(P) ->
- unregister(kostis)
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_no_race.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_no_race.erl
deleted file mode 100644
index 704ee6015d..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_no_race.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust even when the functions are called with different atoms
-%% as arguments.
-
--module(whereis_diff_atoms_no_race).
--export([test/0]).
-
-test() ->
- Fun = fun () -> foo end,
- {no_race(maria, Fun)}.
-
-no_race(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- AnotherAtom = kostis,
- aux(AnotherAtom, Pid);
- P when is_pid(P) ->
- ok
- end.
-
-aux(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_race.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_race.erl
deleted file mode 100644
index 6c834caa0c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_atoms_race.erl
+++ /dev/null
@@ -1,34 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust even when the functions are called with different atoms
-%% as arguments.
-
--module(whereis_diff_atoms_race).
--export([test/0]). %, race/1, no_race/1]).
-
-test() ->
- Fun = fun () -> foo end,
- {race(maria, Fun), no_race(maria, Fun)}.
-
-race(AnAtom, Fun) ->
- %AnAtom = maria,
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- aux(AnAtom, Pid);
- P when is_pid(P) ->
- ok
- end.
-
-no_race(AnAtom, Fun) ->
- %AnAtom = maria,
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- AnotherAtom = kostis,
- aux(AnotherAtom, Pid);
- P when is_pid(P) ->
- ok
- end.
-
-aux(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1.erl
deleted file mode 100644
index 6a1c197c06..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions1).
--export([start/2]).
-
-continue(Fun) ->
- case whereis(master) of
- undefined ->
- register(master, spawn(Fun));
- _ -> ok
- end.
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- register(AnAtom, Pid);
- _ ->
- ok
- end,
- continue(Fun).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_nested.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_nested.erl
deleted file mode 100644
index 4967dec133..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_nested.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions1_nested).
--export([test/2]).
-
-test(AnAtom, Fun) ->
- start(AnAtom, Fun).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- race1(AnAtom, Pid);
- P when is_pid(P) ->
- true
- end.
-
-race1(Atom, Pid) ->
- race2(Atom, Pid).
-
-race2(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_pathsens.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_pathsens.erl
deleted file mode 100644
index ff6506eee8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_pathsens.erl
+++ /dev/null
@@ -1,32 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-%% It takes into account control flow that might exist.
-
--module(whereis_diff_functions1_pathsens).
--export([test/1]).
-
-test(FunName) ->
- start(kostis, mod:function(), FunName).
-
-start(AnAtom, Fun, FunName) ->
- Pid =
- case FunName of
- master ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end;
- slave ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end
- end,
- race(AnAtom, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_twice.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_twice.erl
deleted file mode 100644
index dd395bb6d8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions1_twice.erl
+++ /dev/null
@@ -1,30 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having multiple calls in separate functions.
-
--module(whereis_diff_functions1_twice).
--export([test/2]).
-
-test(AnAtom, Fun) ->
- start(AnAtom, Fun).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid1 = spawn(Fun),
- race(AnAtom, Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- race_again(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end;
- P when is_pid(P) ->
- true
- end.
-
-race(Atom, Pid) ->
- register(Atom, Pid).
-
-race_again(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2.erl
deleted file mode 100644
index eaf98291ed..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions2).
--export([test/0]).
-
-test() ->
- start(kostis, mod:function()).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- race(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_nested.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_nested.erl
deleted file mode 100644
index 5ae8784389..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_nested.erl
+++ /dev/null
@@ -1,20 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions2_nested).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- race1(AnAtom, Pid);
- P when is_pid(P) ->
- true
- end.
-
-race1(Atom, Pid) ->
- race2(Atom, Pid).
-
-race2(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_pathsens.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_pathsens.erl
deleted file mode 100644
index e9ce4bc48e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_pathsens.erl
+++ /dev/null
@@ -1,29 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-%% It takes into account control flow that might exist.
-
--module(whereis_diff_functions2_pathsens).
--export([race/4]).
-
-start(AnAtom, Fun, FunName) ->
- Pid =
- case FunName of
- master ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end;
- slave ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end
- end.
-
-race(Atom, Fun, FunName, Pid) ->
- start(Atom, Fun, FunName),
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_twice.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_twice.erl
deleted file mode 100644
index d5efe631b8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions2_twice.erl
+++ /dev/null
@@ -1,27 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having multiple calls in separate functions.
-
--module(whereis_diff_functions2_twice).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid1 = spawn(Fun),
- race(AnAtom, Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- race_again(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end;
- P when is_pid(P) ->
- true
- end.
-
-race(Atom, Pid) ->
- register(Atom, Pid).
-
-race_again(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3.erl
deleted file mode 100644
index 093f02a06f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions3).
--export([start/1]).
-
-start(AnAtom) ->
- register(AnAtom, race(AnAtom)).
-
-race(Atom) ->
- whereis(Atom).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_nested.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_nested.erl
deleted file mode 100644
index 5c28fc74f6..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_nested.erl
+++ /dev/null
@@ -1,21 +0,0 @@
-%% This tests that the race condition detection between whereis/unregister
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions3_nested).
--export([test/1]).
-
-test(AnAtom) ->
- start(AnAtom).
-
-start(AnAtom) ->
- case whereis(AnAtom) of
- undefined -> true;
- P when is_pid(P) ->
- race1(AnAtom)
- end.
-
-race1(Atom) ->
- race2(Atom).
-
-race2(Atom) ->
- unregister(Atom).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_pathsens.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_pathsens.erl
deleted file mode 100644
index a3a245b9ea..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions3_pathsens.erl
+++ /dev/null
@@ -1,29 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-%% It takes into account control flow that might exist.
-
--module(whereis_diff_functions3_pathsens).
--export([start/3]).
-
-start(AnAtom, Fun, FunName) ->
- Pid =
- case FunName of
- master ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end;
- slave ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end
- end,
- race(AnAtom, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions4.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions4.erl
deleted file mode 100644
index e40483d487..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions4.erl
+++ /dev/null
@@ -1,32 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions4).
--export([test/2]).
-
-test(AnAtom, Fun) ->
- start(AnAtom, Fun).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- race(AnAtom, Pid2),
- case whereis(AnAtom) of
- undefined ->
- Pid3 = spawn(Fun),
- race(AnAtom, Pid3);
- P when is_pid(P) ->
- true
- end;
- P when is_pid(P) ->
- true
- end.
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions5.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions5.erl
deleted file mode 100644
index a2c4352803..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions5.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions5).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- race(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions6.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions6.erl
deleted file mode 100644
index f016d79533..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_functions6.erl
+++ /dev/null
@@ -1,29 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions.
-
--module(whereis_diff_functions6).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- race(AnAtom, Pid2),
- case whereis(AnAtom) of
- undefined ->
- Pid3 = spawn(Fun),
- race(AnAtom, Pid3);
- P when is_pid(P) ->
- true
- end;
- P when is_pid(P) ->
- true
- end.
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules1.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules1.erl
deleted file mode 100644
index 00cb29cec0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules1.erl
+++ /dev/null
@@ -1,16 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules1).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_diff_modules2:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- whereis_diff_modules2:race(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules2.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules2.erl
deleted file mode 100644
index e5f6fdeb7b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1/whereis_diff_modules2.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules2).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules1_pathsens.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules1_pathsens.erl
deleted file mode 100644
index a5f1d4d3c7..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules1_pathsens.erl
+++ /dev/null
@@ -1,26 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules (backward analysis).
-%% It takes into account control flow that might exist.
-
--module(whereis_diff_modules1_pathsens).
--export([start/3]).
-
-start(AnAtom, Fun, FunName) ->
- Pid =
- case FunName of
- master ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end;
- slave ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end
- end,
- whereis_diff_modules2_pathsens:race(AnAtom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules2_pathsens.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules2_pathsens.erl
deleted file mode 100644
index d24d13976b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_pathsens/whereis_diff_modules2_pathsens.erl
+++ /dev/null
@@ -1,12 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules (backward analysis).
-%% It takes into account control flow that might exist.
-
--module(whereis_diff_modules2_pathsens).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules1_rec.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules1_rec.erl
deleted file mode 100644
index a397954eea..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules1_rec.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in an indirectly recursive inter-modular function.
-
--module(whereis_diff_modules1_rec).
--export([start/4]).
-
-start(AnAtom, NextAtom, Fun, Id) ->
- case AnAtom of
- undefined -> register(start, Id);
- _ -> register(AnAtom, Id)
- end,
- case whereis(NextAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
- whereis_diff_modules2_rec:continue(NextAtom, mod:next(), Pid, Id)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules2_rec.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules2_rec.erl
deleted file mode 100644
index 4b46b4a8e5..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules1_rec/whereis_diff_modules2_rec.erl
+++ /dev/null
@@ -1,8 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in a recursive function.
-
--module(whereis_diff_modules2_rec).
--export([continue/4]).
-
-continue(Atom, NextAtom, Fun, Id) ->
- whereis_diff_modules1_rec:start(Atom, NextAtom, Fun, Id).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules3.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules3.erl
deleted file mode 100644
index 60b5a1d378..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules3.erl
+++ /dev/null
@@ -1,8 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules3).
--export([start/1]).
-
-start(AnAtom) ->
- register(AnAtom, whereis_diff_modules4:race(AnAtom)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules4.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules4.erl
deleted file mode 100644
index 1ab4fbf8d8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2/whereis_diff_modules4.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules4).
--export([no_race/1, race/1]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom) ->
- whereis(Atom).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules3_pathsens.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules3_pathsens.erl
deleted file mode 100644
index cb2f85a103..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules3_pathsens.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules (forward analysis).
-%% It takes into account control flow that might exist.
-
--module(whereis_diff_modules3_pathsens).
--export([start/3]).
-
-start(AnAtom, Fun, FunName) ->
- Pid =
- case FunName of
- master ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end;
- slave ->
- case whereis(AnAtom) of
- undefined ->
- spawn(Fun);
- P when is_pid(P) ->
- P
- end
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules4_pathsens.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules4_pathsens.erl
deleted file mode 100644
index 952f9312f4..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_pathsens/whereis_diff_modules4_pathsens.erl
+++ /dev/null
@@ -1,13 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules (forward analysis).
-%% It takes into account control flow that might exist.
-
--module(whereis_diff_modules4_pathsens).
--export([no_race/1, race/4]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Fun, FunName, Pid) ->
- whereis_diff_modules3_pathsens:start(Atom, Fun, FunName),
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules3_rec.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules3_rec.erl
deleted file mode 100644
index 0320140768..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules3_rec.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in an indirectly recursive inter-modular function.
-
--module(whereis_diff_modules3_rec).
--export([test/0, start/4]).
-
-test() ->
- start(undefined, second, mod:f(), self()).
-
-start(AnAtom, NextAtom, Fun, Id) ->
- case AnAtom of
- undefined -> register(start, Id);
- _ -> register(AnAtom, Id)
- end,
- case whereis(NextAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
- whereis_diff_modules4_rec:continue(NextAtom, mod:next(), Pid, Id)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules4_rec.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules4_rec.erl
deleted file mode 100644
index d49c59ed5c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules2_rec/whereis_diff_modules4_rec.erl
+++ /dev/null
@@ -1,8 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in a recursive function.
-
--module(whereis_diff_modules4_rec).
--export([continue/4]).
-
-continue(Atom, NextAtom, Fun, Id) ->
- whereis_diff_modules3_rec:start(Atom, NextAtom, Fun, Id).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules5.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules5.erl
deleted file mode 100644
index 591732aa31..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules5.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules5).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_diff_modules6:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- whereis_diff_modules6:race(AnAtom, Pid2),
- case whereis(AnAtom) of
- undefined ->
- Pid3 = spawn(Fun),
- whereis_diff_modules6:race(AnAtom, Pid3);
- P when is_pid(P) ->
- true
- end;
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules6.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules6.erl
deleted file mode 100644
index 159d96cfc5..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules3/whereis_diff_modules6.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules6).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules1_nested.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules1_nested.erl
deleted file mode 100644
index a25d2f8784..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules1_nested.erl
+++ /dev/null
@@ -1,14 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules1_nested).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- whereis_diff_modules2_nested:race(AnAtom, Pid);
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules2_nested.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules2_nested.erl
deleted file mode 100644
index 32a55e731a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules2_nested.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules2_nested).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- whereis_diff_modules3_nested:race(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules3_nested.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules3_nested.erl
deleted file mode 100644
index 414129611f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_nested/whereis_diff_modules3_nested.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules3_nested).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules1_twice.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules1_twice.erl
deleted file mode 100644
index 92f2cb1fbc..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules1_twice.erl
+++ /dev/null
@@ -1,21 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having multiple calls in separate modules.
-
--module(whereis_diff_modules1_twice).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid1 = spawn(Fun),
- whereis_diff_modules2_twice:race(AnAtom, Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- whereis_diff_modules2_twice:race_again(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end;
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules2_twice.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules2_twice.erl
deleted file mode 100644
index 390c0dcc94..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_modules_twice/whereis_diff_modules2_twice.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate modules.
-
--module(whereis_diff_modules2_twice).
--export([race/2, race_again/2]).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
-
-race_again(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_no_race.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_no_race.erl
deleted file mode 100644
index 8466004ce4..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_no_race.erl
+++ /dev/null
@@ -1,13 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust even when the functions are called with different variables
-%% as arguments.
-
--module(whereis_diff_vars_no_race).
--export([test/3]).
-
-test(AnAtom, AnotherAtom, Pid) ->
- {aux(AnAtom, Pid), aux(AnotherAtom, Pid)}.
-
-aux(Atom, Pid) ->
- register(Atom, Pid),
- whereis(Atom).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_race.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_race.erl
deleted file mode 100644
index 90791de1b2..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_diff_vars_race.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust even when the functions are called with different variables
-%% as arguments.
-
--module(whereis_diff_vars_race).
--export([test/2]).
-
-test(AnAtom, AnotherAtom) ->
- Fun = fun () -> foo end,
- {aux(AnAtom, AnotherAtom, Fun), aux(AnotherAtom, AnAtom, Fun)}.
-
-aux(Atom1, Atom2, Fun) ->
- case whereis(Atom1) of
- undefined ->
- Pid = spawn(Fun),
- register(Atom2, Pid);
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module1.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module1.erl
deleted file mode 100644
index 677551c99d..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module1.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module1).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_intra_inter_module2:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- continue(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
-
-continue(Atom, Pid) ->
- whereis_intra_inter_module2:race(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module2.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module2.erl
deleted file mode 100644
index e7acee0cfd..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module1/whereis_intra_inter_module2.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module2).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module3.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module3.erl
deleted file mode 100644
index c8103db122..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module3.erl
+++ /dev/null
@@ -1,16 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module3).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_intra_inter_module4:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- whereis_intra_inter_module4:race(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module4.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module4.erl
deleted file mode 100644
index 4094a95223..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module2/whereis_intra_inter_module4.erl
+++ /dev/null
@@ -1,14 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module4).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- continue(Atom, Pid).
-
-continue(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module5.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module5.erl
deleted file mode 100644
index 2a29779153..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module5.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module5).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_intra_inter_module6:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- continue(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
-
-continue(Atom, Pid) ->
- whereis_intra_inter_module6:race(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module6.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module6.erl
deleted file mode 100644
index cd05431cd5..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module3/whereis_intra_inter_module6.erl
+++ /dev/null
@@ -1,14 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module6).
--export([no_race/1, race/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- continue(Atom, Pid).
-
-continue(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module7.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module7.erl
deleted file mode 100644
index 1f702e7af3..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module7.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module7).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- register(AnAtom, continue(AnAtom, Fun)).
-
-continue(AnAtom, Fun) ->
- whereis_intra_inter_module8:continue(AnAtom, Fun).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module8.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module8.erl
deleted file mode 100644
index 581817308b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module4/whereis_intra_inter_module8.erl
+++ /dev/null
@@ -1,13 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module8).
--export([continue/2]).
-
-continue(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun);
- P when is_pid(P) ->
- P
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module10.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module10.erl
deleted file mode 100644
index 7ed50ea742..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module10.erl
+++ /dev/null
@@ -1,16 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module10).
--export([continue/2]).
-
-continue(AnAtom, Fun) ->
- aux(AnAtom, Fun).
-
-aux(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun);
- P when is_pid(P) ->
- P
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module9.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module9.erl
deleted file mode 100644
index 5c5d92b770..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module5/whereis_intra_inter_module9.erl
+++ /dev/null
@@ -1,11 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module9).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- register(AnAtom, continue(AnAtom, Fun)).
-
-continue(AnAtom, Fun) ->
- whereis_intra_inter_module10:continue(AnAtom, Fun).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module11.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module11.erl
deleted file mode 100644
index 82abe2f4a8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module11.erl
+++ /dev/null
@@ -1,27 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module11).
--export([start/2, start_again/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_intra_inter_module12:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- whereis_intra_inter_module12:race(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
-
-start_again(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_intra_inter_module12:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- whereis_intra_inter_module12:continue(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module12.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module12.erl
deleted file mode 100644
index c2f5d560a0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module6/whereis_intra_inter_module12.erl
+++ /dev/null
@@ -1,14 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module12).
--export([no_race/1, race/2, continue/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- continue(Atom, Pid).
-
-continue(Atom, Pid) ->
- register(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module13.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module13.erl
deleted file mode 100644
index 3cd5cc6fa6..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module13.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module13).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_intra_inter_module14:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- continue(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
-
-continue(Atom, Pid) ->
- whereis_intra_inter_module14:race(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module14.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module14.erl
deleted file mode 100644
index 6b6a982055..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module7/whereis_intra_inter_module14.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module14).
--export([no_race/1, race/2, start/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- race(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module15.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module15.erl
deleted file mode 100644
index c60d166fa9..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module15.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module15).
--export([start/2, continue/2]).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- whereis_intra_inter_module16:no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- continue(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
-
-continue(Atom, Pid) ->
- whereis_intra_inter_module16:race(Atom, Pid).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module16.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module16.erl
deleted file mode 100644
index 279e633d66..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_intra_inter_module8/whereis_intra_inter_module16.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that the race condition detection between whereis/register
-%% is robust w.r.t. having the calls in separate functions and modules.
-
--module(whereis_intra_inter_module16).
--export([no_race/1, race/2, start/2]).
-
-no_race(Pid) ->
- register(master, Pid).
-
-race(Atom, Pid) ->
- register(Atom, Pid).
-
-start(AnAtom, Fun) ->
- Pid1 = spawn(Fun),
- no_race(Pid1),
- case whereis(AnAtom) of
- undefined ->
- Pid2 = spawn(Fun),
- whereis_intra_inter_module15:continue(AnAtom, Pid2);
- P when is_pid(P) ->
- true
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_param.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_param.erl
deleted file mode 100644
index 7bcde321a1..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_param.erl
+++ /dev/null
@@ -1,16 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination in higher order functions.
-
--module(whereis_param).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- register(AnAtom, continue(AnAtom, Fun)).
-
-continue(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun);
- P when is_pid(P) ->
- P
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module1.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module1.erl
deleted file mode 100644
index 8bac0326a5..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module1.erl
+++ /dev/null
@@ -1,8 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination in higher order functions and inter-module calls.
-
--module(whereis_param_inter_module1).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- register(AnAtom, whereis_param_inter_module2:continue(AnAtom, Fun)).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module2.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module2.erl
deleted file mode 100644
index 61252add9a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_param_inter_module/whereis_param_inter_module2.erl
+++ /dev/null
@@ -1,13 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination in higher order functions and inter-module calls.
-
--module(whereis_param_inter_module2).
--export([continue/2]).
-
-continue(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun);
- P when is_pid(P) ->
- P
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function1.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function1.erl
deleted file mode 100644
index c8095fbf4c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function1.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination in a recursive function.
-
--module(whereis_rec_function1).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
-	 register(AnAtom, Pid),
-	 start(AnAtom, Fun)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function2.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function2.erl
deleted file mode 100644
index 2721c9e19c..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function2.erl
+++ /dev/null
@@ -1,24 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in a recursive function.
-
--module(whereis_rec_function2).
--export([test/0]).
-
-test() ->
- start(undefined, second, mod:f(), self()).
-
-start(AnAtom, NextAtom, Fun, Id) ->
- case AnAtom of
- undefined -> register(start, Id);
- _ -> register(AnAtom, Id)
- end,
- case whereis(NextAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false -> start(NextAtom, mod:next(), Pid, Id)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function3.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function3.erl
deleted file mode 100644
index e101f34fba..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function3.erl
+++ /dev/null
@@ -1,27 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in a recursive function.
-
--module(whereis_rec_function3).
--export([test/0]).
-
-test() ->
- start(undefined, second, mod:f(), self()).
-
-start(AnAtom, NextAtom, Fun, Id) ->
- case AnAtom of
- undefined -> register(start, Id);
- _ -> register(AnAtom, Id)
- end,
- Pid =
- case whereis(NextAtom) of
- undefined -> spawn(Fun);
- P1 when is_pid(P1) -> P1
- end,
- case whereis(NextAtom) of
- undefined ->
- case Pid =:= self() of
- true -> ok;
- false -> start(NextAtom, mod:next(), Pid, Id), io:format("", [])
- end;
- P2 when is_pid(P2) -> ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function4.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function4.erl
deleted file mode 100644
index 4894d3397b..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function4.erl
+++ /dev/null
@@ -1,27 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in an indirectly recursive function.
-
--module(whereis_rec_function4).
--export([test/0]).
-
-test() ->
- start(undefined, second, mod:f(), self()).
-
-start(AnAtom, NextAtom, Fun, Id) ->
- case AnAtom of
- undefined -> register(start, Id);
- _ -> register(AnAtom, Id)
- end,
- case whereis(NextAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false -> continue(NextAtom, mod:next(), Pid, Id)
- end;
- P when is_pid(P) ->
- ok
- end.
-
-continue(Atom, NextAtom, Fun, Id) ->
- start(Atom, NextAtom, Fun, Id).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function5.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function5.erl
deleted file mode 100644
index d821f829a2..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function5.erl
+++ /dev/null
@@ -1,21 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in a recursive function.
-
--module(whereis_rec_function5).
--export([start/4]).
-
-start(AnAtom, NextAtom, Fun, Id) ->
- case AnAtom of
- undefined -> register(start, Id);
- _ -> register(AnAtom, Id)
- end,
- case whereis(NextAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false -> start(NextAtom, mod:next(), Pid, Id)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function6.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function6.erl
deleted file mode 100644
index 4ec4baf0be..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function6.erl
+++ /dev/null
@@ -1,24 +0,0 @@
-%% This tests the presence of possible races due to a register/whereis
-%% combination in an indirectly recursive function.
-
--module(whereis_rec_function6).
--export([start/4]).
-
-start(AnAtom, NextAtom, Fun, Id) ->
- case AnAtom of
- undefined -> register(start, Id);
- _ -> register(AnAtom, Id)
- end,
- case whereis(NextAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false -> continue(NextAtom, mod:next(), Pid, Id)
- end;
- P when is_pid(P) ->
- ok
- end.
-
-continue(Atom, NextAtom, Fun, Id) ->
- start(Atom, NextAtom, Fun, Id).
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function7.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function7.erl
deleted file mode 100644
index 7667443117..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function7.erl
+++ /dev/null
@@ -1,19 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination in a recursive function.
-
--module(whereis_rec_function7).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
-	 start(AnAtom, Fun),
-	 register(AnAtom, Pid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function8.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function8.erl
deleted file mode 100644
index a06fb75f64..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_rec_function8.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests the presence of possible races due to a whereis/register
-%% combination in a recursive function.
-
--module(whereis_rec_function8).
--export([test/2]).
-
-test(AnAtom, Fun) ->
- start(AnAtom, Fun).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
-	 start(AnAtom, Fun),
-	 register(AnAtom, Pid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_try_catch.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_try_catch.erl
deleted file mode 100644
index 39bb440f56..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_try_catch.erl
+++ /dev/null
@@ -1,25 +0,0 @@
-% This tests that warnings do appear when a whereis/register combination
-% is handled by try/catch.
-
--module(whereis_try_catch).
--export([race/1, no_race/1]).
-
-race(Pid) ->
- case whereis(master) of
- undefined ->
- try
-	io:format("exception", [])
- catch
- _ -> register(master, Pid)
- end
- end.
-
-no_race(Pid) ->
- case whereis(master) of
- undefined ->
- try
- register(master, Pid)
- catch
- _ -> io:format("exception", [])
- end
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars1.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars1.erl
deleted file mode 100644
index 9b249e72be..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars1.erl
+++ /dev/null
@@ -1,17 +0,0 @@
-%% This tests that no warnings appear when there is no specific
-%% information about the types and the variables are not bound.
-
--module(whereis_vars1).
--export([start/3]).
-
-start(AnAtom, OtherAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false -> register(OtherAtom, Pid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars10.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars10.erl
deleted file mode 100644
index 5c1896d6b4..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars10.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars10).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom =/= OtherAtom of
-	 true -> ok;
- false -> register(OtherAtom, Pid)
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars11.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars11.erl
deleted file mode 100644
index dc8551b3f2..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars11.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that no warnings appear when there is no specific
-%% information about the types and the variables are not bound.
-
--module(whereis_vars11).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom of
- OtherAtom -> ok;
-	 _Other -> register(OtherAtom, Pid)
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars12.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars12.erl
deleted file mode 100644
index 38b0dc5d04..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars12.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars12).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- if
- AnAtom =:= OtherAtom -> register(OtherAtom, Pid);
- AnAtom =/= OtherAtom -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars13.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars13.erl
deleted file mode 100644
index 3a04bba02f..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars13.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars13).
--export([start/3]).
-
-start(AnAtom, APid, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- if
- {AnAtom, Pid} =:= {OtherAtom, APid} -> register(OtherAtom, APid);
- {AnAtom, Pid} =/= {OtherAtom, APid} -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars14.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars14.erl
deleted file mode 100644
index c688847551..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars14.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars14).
--export([start/3]).
-
-start(AnAtom, APid, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- if
- [AnAtom, Pid] =:= [OtherAtom, APid] -> register(OtherAtom, APid);
- [AnAtom, Pid] =/= [OtherAtom, APid] -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars15.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars15.erl
deleted file mode 100644
index 4b3a72537e..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars15.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars15).
--export([start/3]).
-
-start(AnAtom, OtherAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom of
- maria -> ok;
- kostis when AnAtom =:= OtherAtom ->
- register(OtherAtom, Pid);
-	 _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars16.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars16.erl
deleted file mode 100644
index 7badb8df22..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars16.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars16).
--export([start/4]).
-
-start(AnAtom, OtherAtom, APid, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom of
- maria -> ok;
- kostis when {AnAtom, Pid} =:= {OtherAtom, APid} ->
- register(OtherAtom, APid);
-	 _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars17.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars17.erl
deleted file mode 100644
index bc7ef5e980..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars17.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars17).
--export([start/4]).
-
-start(AnAtom, OtherAtom, APid, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom of
- maria -> ok;
- kostis when [AnAtom, Pid] =:= [OtherAtom, APid] ->
- register(OtherAtom, APid);
-	 _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars18.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars18.erl
deleted file mode 100644
index 06416fa987..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars18.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that no warnings appear when there is no specific
-%% information about the types and the variables are not bound.
-
--module(whereis_vars18).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom =:= OtherAtom of
-	 true -> ok;
- false -> register(OtherAtom, Pid)
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars19.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars19.erl
deleted file mode 100644
index ae5b28e42d..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars19.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that no warnings appear when there is no specific
-%% information about the types and the variables are not bound.
-
--module(whereis_vars19).
--export([start/3]).
-
-start(AnAtom, OtherAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom of
- maria -> ok;
- kostis when AnAtom =/= OtherAtom ->
- register(OtherAtom, Pid);
-	 _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars2.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars2.erl
deleted file mode 100644
index bafb5d4644..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars2.erl
+++ /dev/null
@@ -1,18 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars2).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = AnAtom,
- case Pid =:= self() of
- true -> ok;
- false -> register(OtherAtom, Pid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars20.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars20.erl
deleted file mode 100644
index 87c6caadf0..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars20.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that no warnings appear when there is no specific
-%% information about the types and the variables are not bound.
-
--module(whereis_vars20).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- if
- AnAtom =:= OtherAtom -> ok;
- AnAtom =/= OtherAtom -> register(OtherAtom, Pid)
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars21.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars21.erl
deleted file mode 100644
index 73d22d3467..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars21.erl
+++ /dev/null
@@ -1,23 +0,0 @@
-%% This tests that no warnings appear when there is no specific
-%% information about the types and the variables are not bound.
-
--module(whereis_vars21).
--export([start/3]).
-
-start(AnAtom, OtherAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom of
- maria when AnAtom =/= OtherAtom -> ok;
- kostis when AnAtom =/= OtherAtom ->
- register(OtherAtom, Pid);
- _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars22.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars22.erl
deleted file mode 100644
index dd16928e33..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars22.erl
+++ /dev/null
@@ -1,27 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars22).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- Same =
- case AnAtom of
- OtherAtom -> true;
-	 _Other -> false
-	 end,
- case Same of
- true -> register(OtherAtom, Pid);
- false -> ok
- end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars3.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars3.erl
deleted file mode 100644
index 16c9a6c8bc..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars3.erl
+++ /dev/null
@@ -1,18 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars3).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- {OtherAtom, APid} = {AnAtom, Pid},
- case Pid =:= self() of
- true -> ok;
- false -> register(OtherAtom, APid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars4.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars4.erl
deleted file mode 100644
index da5b329ca9..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars4.erl
+++ /dev/null
@@ -1,18 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars4).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- [OtherAtom, APid] = [AnAtom, Pid],
- case Pid =:= self() of
- true -> ok;
- false -> register(OtherAtom, APid)
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars5.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars5.erl
deleted file mode 100644
index dff8646ea8..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars5.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars5).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom of
- OtherAtom -> register(OtherAtom, Pid);
-	 _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars6.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars6.erl
deleted file mode 100644
index cf22ab1883..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars6.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars6).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case {AnAtom, Pid} of
- {OtherAtom, APid} -> register(OtherAtom, APid);
-	 _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars7.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars7.erl
deleted file mode 100644
index 4bce53982a..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars7.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars7).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case [AnAtom, Pid] of
- [OtherAtom, APid] -> register(OtherAtom, APid);
-	 _Other -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars8.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars8.erl
deleted file mode 100644
index 937b83cf02..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars8.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars8).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom =:= OtherAtom of
- true -> register(OtherAtom, Pid);
-	 false -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
diff --git a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars9.erl b/lib/dialyzer/test/race_SUITE_data/src/whereis_vars9.erl
deleted file mode 100644
index 9beb67ca38..0000000000
--- a/lib/dialyzer/test/race_SUITE_data/src/whereis_vars9.erl
+++ /dev/null
@@ -1,22 +0,0 @@
-%% This tests that warnings do appear when there is no specific
-%% information about the types and the variables are bound.
-
--module(whereis_vars9).
--export([start/2]).
-
-start(AnAtom, Fun) ->
- case whereis(AnAtom) of
- undefined ->
- Pid = spawn(Fun),
- OtherAtom = kostis,
- case Pid =:= self() of
- true -> ok;
- false ->
- case AnAtom == OtherAtom of
- true -> register(OtherAtom, Pid);
-	 false -> ok
-	 end
- end;
- P when is_pid(P) ->
- ok
- end.
-- 
2.31.1

Places

File 3031-dialyzer-Eliminate-the-race_conditions-option.patch of Package erlang (Revision f2cb6664a9597ea658e888a53cd508ed)

Places