Skip to content

Commit 18055fb

Browse files
authored
[ fix ] issue #2905 (#2927)
* [ fix ] issue #2905 * fix: words
1 parent 29063bb commit 18055fb

File tree

2 files changed

+6
-0
lines changed

2 files changed

+6
-0
lines changed

CHANGELOG.md

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -32,6 +32,11 @@ Minor improvements
3232
properties (and their proofs). In particular, `truncate-irrelevant` is now
3333
deprecated, because definitionally trivial.
3434

35+
* The function `Data.Vec.Functional.map` is now marked with the `INLINE` pragma.
36+
This is consistent with the inlining of `Function.Base._∘_` for which it is
37+
an alias, and should be backwards compatible, but does improve the behaviour
38+
of the termination checker for some `Vector`-defined operations.
39+
3540
* The type of `Relation.Nullary.Negation.Core.contradiction-irr` has been further
3641
weakened so that the negated hypothesis `¬ A` is marked as irrelevant. This is
3742
safe to do, in view of `Relation.Nullary.Recomputable.Properties.¬-recompute`.

src/Data/Vec/Functional.agda

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -100,6 +100,7 @@ updateAt {n = suc n} xs (suc i) f (suc j) = updateAt (tail xs) i f j
100100

101101
map : (A B) {n} Vector A n Vector B n
102102
map f xs = f ∘ xs
103+
{-# INLINE map #-}
103104

104105
_++_ : Vector A m Vector A n Vector A (m ℕ.+ n)
105106
_++_ {m = m} xs ys i = [ xs , ys ] (splitAt m i)

0 commit comments

Comments
 (0)