diff options
| author | Stavros Aronis <[email protected]> | 2011-11-30 20:19:31 +0100 |
|---|---|---|
| committer | Stavros Aronis <[email protected]> | 2011-12-01 11:55:09 +0100 |
| commit | 9949c1e03cdde87548371d5a9b53a997e3088dc6 (patch) | |
| tree | ae512f43e1e7fb0b0160b641ff586579bd93e965 /lib/dialyzer/test/small_SUITE_data/src/maybe_improper.erl | |
| parent | 0290bed50ccbba067619c5829b0a090a8a60a2ff (diff) | |
| download | otp-9949c1e03cdde87548371d5a9b53a997e3088dc6.tar.gz otp-9949c1e03cdde87548371d5a9b53a997e3088dc6.tar.bz2 otp-9949c1e03cdde87548371d5a9b53a997e3088dc6.zip | |
Fix crash in Dialyzer
Variable substitution was not generalizing any unknown variables.
Diffstat (limited to 'lib/dialyzer/test/small_SUITE_data/src/maybe_improper.erl')
| -rw-r--r-- | lib/dialyzer/test/small_SUITE_data/src/maybe_improper.erl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/dialyzer/test/small_SUITE_data/src/maybe_improper.erl b/lib/dialyzer/test/small_SUITE_data/src/maybe_improper.erl new file mode 100644 index 0000000000..1743d81493 --- /dev/null +++ b/lib/dialyzer/test/small_SUITE_data/src/maybe_improper.erl @@ -0,0 +1,7 @@ +-module(maybe_improper). + +-export([s/1]). + +-spec s(maybe_improper_list(X,Y)) -> {[X], maybe_improper_list(X,Y)}. +s(A) -> + lists:split(2,A). |