Skip to content

Commit

Permalink
Reformatting.
Browse files Browse the repository at this point in the history
  • Loading branch information
WilliamDue committed Feb 7, 2025
1 parent 5642a36 commit a780b6a
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions src/Futhark/IR/SOACS/SOAC.hs
Original file line number Diff line number Diff line change
Expand Up @@ -460,12 +460,12 @@ mapSOACM tv (ScanScatter w arrs map_lam scan dests scatter_lam) =
mapOnSOACScatterSpec :: (Monad m) => SOACMapper frep trep m -> ScatterSpec VName -> m (ScatterSpec VName)
mapOnSOACScatterSpec tv =
mapM
( \(aw, an, a) ->
(,,)
<$> mapM (mapOnSOACSubExp tv) aw
<*> pure an
<*> mapOnSOACVName tv a
)
( \(aw, an, a) ->
(,,)
<$> mapM (mapOnSOACSubExp tv) aw
<*> pure an
<*> mapOnSOACVName tv a
)

mapOnSOACScan :: (Monad m) => SOACMapper frep trep m -> Scan frep -> m (Scan trep)
mapOnSOACScan tv (Scan red_lam red_nes) =
Expand Down

0 comments on commit a780b6a

Please sign in to comment.