Skip to content

Commit fcd3e1d

Browse files
committed
chore: remove extra comments
1 parent 1a2698f commit fcd3e1d

File tree

1 file changed

+9
-18
lines changed
  • lib/Language/PureScript/CoreFn

1 file changed

+9
-18
lines changed

lib/Language/PureScript/CoreFn/Expr.hs

Lines changed: 9 additions & 18 deletions
Original file line numberDiff line numberDiff line change
@@ -11,32 +11,23 @@ import Language.PureScript.PSString (PSString)
1111
Data type for expressions and terms
1212
-}
1313
data Expr a
14-
= -- |
15-
-- A literal value
14+
= -- A literal value
1615
Literal a (Literal (Expr a))
17-
| -- |
18-
-- A data constructor (type name, constructor name, field names)
16+
| -- A data constructor (type name, constructor name, field names)
1917
Constructor a (ProperName 'TypeName) (ProperName 'ConstructorName) [Ident]
20-
| -- |
21-
-- A record property accessor
18+
| -- A record property accessor
2219
Accessor a PSString (Expr a)
23-
| -- |
24-
-- Partial record update
20+
| -- Partial record update
2521
ObjectUpdate a (Expr a) [(PSString, Expr a)]
26-
| -- |
27-
-- Function introduction
22+
| -- Function introduction
2823
Abs a Ident (Expr a)
29-
| -- |
30-
-- Function application
24+
| -- Function application
3125
App a (Expr a) (Expr a)
32-
| -- |
33-
-- Variable
26+
| -- Variable
3427
Var a (Qualified Ident)
35-
| -- |
36-
-- A case expression
28+
| -- A case expression
3729
Case a [Expr a] [CaseAlternative a]
38-
| -- |
39-
-- A let binding
30+
| -- A let binding
4031
Let a [Bind a] (Expr a)
4132
deriving stock (Eq, Ord, Show, Functor)
4233

0 commit comments

Comments
 (0)