git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Merge pull request #1841 from sharkdp/fix-1839

Fix #1839, Renaming for nested constructor binders

commit63e7a56b16568dba99bf27f8b4a94f17283591d4 authorGary Burgess <gary.burgess@gmail.com> dateThu 21 Jan 2016, 12:07 (11 years ago) parentc8006a1e935aa3
2 files changed+2
compare with golang
unifiedsplit
CONTRIBUTORS.md+1 src/Language/PureScript/CoreFn/Traversals.hs+1
CONTRIBUTORS.md+1
@@ -51,6 +51,7 @@ This file lists the contributors to the PureScript compiler project, and the ter
5151- [@robdaemon](https://github.com/robdaemon) (Robert Roland) My existing contributions and all future contributions until further notice are Copyright Robert Roland, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
5252- [@RossMeikleham](https://github.com/RossMeikleham) (Ross Meikleham) My existing contributions and all future contributions until further notice are Copyright Ross Meikleham, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
5353- [@sebastiaanvisser](https://github.com/sebastiaanvisser) (Sebastiaan Visser) - My existing contributions and all future contributions until further notice are Copyright Sebastiaan Visser, and are licensed to the owners and users of the PureScript compiler project under the terms of the MIT license.
54+- [@sharkdp](https://github.com/sharkdp) (David Peter) My existing contributions and all future contributions until further notice are Copyright David Peter, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
5455- [@sztupi](https://github.com/sztupi) (Attila Sztupak) My existing contributions and all future contributions until further notice are Copyright Attila Sztupak, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
5556- [@taku0](https://github.com/taku0) - My existing contributions and all future contributions until further notice are Copyright taku0, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
5657- [@trofi](https://github.com/trofi) (Sergei Trofimovich) My existing contributions and all future contributions until further notice are Copyright Sergei Trofimovich, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
src/Language/PureScript/CoreFn/Traversals.hs+1
@@ -40,6 +40,7 @@ everywhereOnValues f g h = (f', g', h')
4040
4141 h' (LiteralBinder a b) = h (LiteralBinder a (handleLiteral h' b))
4242 h' (NamedBinder a name b) = h (NamedBinder a name (h' b))
43+ h' (ConstructorBinder a q1 q2 bs) = h (ConstructorBinder a q1 q2 (map h' bs))
4344 h' b = h b
4445
4546 handleCaseAlternative ca =