mirror of
https://github.com/rowtype-yoga/purescript-yoga-tree.git
synced 2024-10-26 16:53:03 +03:00
Merge pull request #3 from safareli/patch-1
fix ShadowedName before and after
This commit is contained in:
commit
9cf8157b70
@ -122,11 +122,11 @@ siblingAt i l@(Loc r) =
|
||||
case (children p) !! i of
|
||||
Nothing -> Nothing
|
||||
Just c ->
|
||||
let before = reverse $ take i (children p)
|
||||
after = drop (i+1) (children p)
|
||||
let before' = reverse $ take i (children p)
|
||||
after' = drop (i+1) (children p)
|
||||
in Just $ Loc { node: c
|
||||
, before: before
|
||||
, after: after
|
||||
, before: before'
|
||||
, after: after'
|
||||
, parents: r.parents
|
||||
}
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user