diff options
author | Hans Bolinder <[email protected]> | 2019-08-20 08:41:00 +0200 |
---|---|---|
committer | Hans Bolinder <[email protected]> | 2019-08-20 08:41:00 +0200 |
commit | ae97c3416bbbc7a5aa181814bb82b573cbc9da7f (patch) | |
tree | d6405d72ad9ca238dc56119fa19a60ad5a102d60 /lib/stdlib/src/ms_transform.erl | |
parent | 44c7f022e3a0e9c1fc2f906790413946cb48e58b (diff) | |
parent | e2c6e9446cb3ce48f87909dd77ae68892e9126d5 (diff) | |
download | otp-ae97c3416bbbc7a5aa181814bb82b573cbc9da7f.tar.gz otp-ae97c3416bbbc7a5aa181814bb82b573cbc9da7f.tar.bz2 otp-ae97c3416bbbc7a5aa181814bb82b573cbc9da7f.zip |
Merge branch 'maint'
* maint:
fun2ms: accept ++ in function head when called from shell
Diffstat (limited to 'lib/stdlib/src/ms_transform.erl')
-rw-r--r-- | lib/stdlib/src/ms_transform.erl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/stdlib/src/ms_transform.erl b/lib/stdlib/src/ms_transform.erl index 97ec785c62..74efe5c513 100644 --- a/lib/stdlib/src/ms_transform.erl +++ b/lib/stdlib/src/ms_transform.erl @@ -1100,6 +1100,8 @@ normalise({bin,_,Fs}) -> B; normalise({cons,_,Head,Tail}) -> [normalise(Head)|normalise(Tail)]; +normalise({op,_,'++',A,B}) -> + normalise(A) ++ normalise(B); normalise({tuple,_,Args}) -> list_to_tuple(normalise_list(Args)); normalise({map,_,Pairs0}) -> |