Section-style getter syntax
commit5ddb3dbd54fe6bd245ea54ebdb67076d79353193
authorGary Burgess <gary.burgess@gmail.com>
dateSat 7 Feb 2015, 16:52 (12 years ago)
parentec3e3f1
examples/passing/ObjectGetter.purs+3−2
@@ -1,9 +1,10 @@
11module Main where
22
3−getX = _.x
3+getX = (.x)
44
55point = { x: 1, y: 0 }
66
77main = do
88 Debug.Trace.print $ getX point
9− Debug.Trace.trace $ _.value { value: "Done!" }
9+ Debug.Trace.trace $ (." 123 string Prop Name ") { " 123 string Prop Name ": "OK" }
10+ Debug.Trace.trace $ (.value) { value: "Done!" }
src/Language/PureScript/Parser/Declarations.hs+1−1
@@ -385,7 +385,7 @@ parseDoNotationElement = P.choice
385385 , P.try (DoNotationValue <$> parseValue) ]
386386
387387parseObjectGetter :: TokenParser Expr
388−parseObjectGetter = ObjectGetter <$> (underscore *> C.indented *> dot *> C.indented *> (lname <|> stringLiteral))
388+parseObjectGetter = ObjectGetter <$> parens (dot *> C.indented *> (lname <|> stringLiteral))
389389
390390-- |
391391-- Parse a value