Skip to content

Commit eef9345

Browse files
authored
Add instances of IsString (List Char) (#2756)
* Add instances of `IsString (List Char)` * Don't also `isString` as an instance from `Data.List.Literals` * Add changelog entry * Whitespace fix
1 parent 7367bae commit eef9345

File tree

2 files changed

+8
-0
lines changed

2 files changed

+8
-0
lines changed

CHANGELOG.md

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -562,3 +562,8 @@ Additions to existing modules
562562
```agda
563563
SortingAlgorithm.sort-↭ₛ : ∀ xs → sort xs Setoid.↭ xs
564564
```
565+
566+
* In `Data.List.Instances`:
567+
```agda
568+
instance listIsString : IsString (List Char)
569+
```

src/Data/List/Instances.agda

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -16,6 +16,8 @@ import Data.List.Effectful.Transformer as Trans
1616
using (functor; applicative; monad; monadT)
1717
open import Data.List.Properties
1818
using (≡-dec)
19+
open import Data.List.Literals
20+
using (isString)
1921
open import Data.List.Relation.Binary.Pointwise
2022
using (Pointwise)
2123
open import Data.List.Relation.Binary.Lex.NonStrict
@@ -42,6 +44,7 @@ instance
4244
listMonad = monad
4345
listMonadZero = monadZero
4446
listMonadPlus = monadPlus
47+
listIsString = isString
4548
-- ListT
4649
listTFunctor = λ {f} {g} {M} {{inst}} Trans.functor {f} {g} {M} inst
4750
listTApplicative = λ {f} {g} {M} {{inst}} Trans.applicative {f} {g} {M} inst

0 commit comments

Comments
 (0)