Skip to content

Commit

Permalink
Updating haskell-src-exts dependency from 1.17 -> 1.19
Browse files Browse the repository at this point in the history
  • Loading branch information
brendanhay committed Nov 11, 2017
1 parent 5b2f90a commit 95f6c36
Show file tree
Hide file tree
Showing 10 changed files with 284 additions and 238 deletions.
4 changes: 1 addition & 3 deletions gen/amazonka-gen.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -40,20 +40,18 @@ executable amazonka-gen
, Gen.Tree
, Gen.Types
, Gen.Types.Ann
, Gen.Types.Config
, Gen.Types.Data
, Gen.Types.Help
, Gen.Types.Id
, Gen.Types.Map
, Gen.Types.NS
, Gen.Types.Notation
, Gen.Types.Orphans
, Gen.Types.Pager
, Gen.Types.Pager
, Gen.Types.Retry
, Gen.Types.Service
, Gen.Types.TypeOf
, Gen.Types.URI
, Gen.Types.Config
, Gen.Types.Waiter

ghc-options: -Wall -threaded
Expand Down
5 changes: 3 additions & 2 deletions gen/src/Gen/AST/Data/Field.hs
Original file line number Diff line number Diff line change
Expand Up @@ -135,8 +135,9 @@ fieldAccessor f = accessorId (_fieldPrefix f) (_fieldId f)
fieldIsParam :: Field -> Bool
fieldIsParam f = not (fieldMaybe f) && not (fieldMonoid f)

fieldParamName :: Field -> Name
fieldParamName = Ident
fieldParamName :: Field -> Name ()
fieldParamName =
Ident ()
. Text.unpack
. Text.cons 'p'
. flip Text.snoc '_'
Expand Down
Loading

0 comments on commit 95f6c36

Please sign in to comment.