Skip to content

Commit

Permalink
Not super convinced this is a good optimisation at all.
Browse files Browse the repository at this point in the history
  • Loading branch information
athas committed Nov 14, 2023
1 parent 3efe52b commit 7c5330d
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion src/Futhark/IR/SegOp.hs
Original file line number Diff line number Diff line change
Expand Up @@ -1275,7 +1275,9 @@ topDownSegOp _ (Pat pes) _ (SegRed lvl space ops ts kbody)
(red_ts, map_ts) = splitAt (segBinOpResults ops) ts
(red_res, map_res) = splitAt (segBinOpResults ops) $ kernelBodyResult kbody

sameShape (op1, _) (op2, _) = segBinOpShape op1 == segBinOpShape op2
sameShape (op1, _) (op2, _) =
segBinOpShape op1 == segBinOpShape op2
&& shapeRank (segBinOpShape op1) > 0

combineOps [] = Nothing
combineOps (x : xs) = Just $ foldl' combine x xs
Expand Down

0 comments on commit 7c5330d

Please sign in to comment.