mirror of
https://github.com/github/semantic.git
synced 2025-01-04 05:27:08 +03:00
Fewer parens.
This commit is contained in:
parent
03526754e9
commit
83173a7b96
@ -13,7 +13,7 @@ unSource :: Source a -> [a]
|
|||||||
unSource (Source vector) = Vector.toList vector
|
unSource (Source vector) = Vector.toList vector
|
||||||
|
|
||||||
subsource :: Range -> Source a -> Source a
|
subsource :: Range -> Source a -> Source a
|
||||||
subsource range (Source vector) = Source (Vector.slice (start range) (end range - start range) vector)
|
subsource range (Source vector) = Source $ Vector.slice (start range) (end range - start range) vector
|
||||||
|
|
||||||
toString :: Source Char -> String
|
toString :: Source Char -> String
|
||||||
toString = unSource
|
toString = unSource
|
||||||
|
Loading…
Reference in New Issue
Block a user