on main help sign in
[#83] Support GHC-8.10 (#84)

Resolves #83

commit0a43f5d71c2b0c4c24b1bf11f3f3420d68f996f5 authorVeronika Romashkina <vrom911@gmail.com> dateSat 18 Apr 2020, 14:16 (6 years ago) parent2eb113f
14 files changed+527−138
.github/workflows/ci.yml+48 .travis.yml+3−2 CHANGELOG.md+11−1 CONTRIBUTING.md−53 LICENSE+373−21 shell.nix−10 src/Data/TMap.hs+4 src/Data/TypeRepMap.hs+45−40 src/Data/TypeRepMap/Internal.hs+8−4 stack.yaml+1−1 typerep-extra-impls/Data/TypeRep/CMap.hs+9 typerep-extra-impls/Data/TypeRep/OptimalVector.hs+9 typerep-extra-impls/Data/TypeRep/Vector.hs+9 typerep-map.cabal+7−6
.github/workflows/ci.ymlnew file+48
@@ -0,0 +1,48 @@
1+name: CI
2+
3+on:
4+ # Trigger the workflow on push or pull request,
5+ # but only for the master branch
6+ push:
7+ branches:
8+ - master
9+ pull_request:
10+
11+jobs:
12+ build:
13+ name: ghc ${{ matrix.ghc }}
14+ runs-on: ubuntu-16.04
15+ strategy:
16+ matrix:
17+ cabal: ["3.0"]
18+ ghc:
19+ - "8.2.2"
20+ - "8.4.4"
21+ - "8.6.5"
22+ - "8.8.3"
23+ - "8.10.1"
24+
25+ steps:
26+ - uses: actions/checkout@v2
27+ if: github.event.action == 'opened' || github.event.action == 'synchronize' || github.event.ref == 'refs/heads/master'
28+
29+ - uses: actions/setup-haskell@v1
30+ name: Setup Haskell
31+ with:
32+ ghc-version: ${{ matrix.ghc }}
33+ cabal-version: ${{ matrix.cabal }}
34+
35+ - uses: actions/cache@v1
36+ name: Cache ~/.cabal/store
37+ with:
38+ path: ~/.cabal/store
39+ key: ${{ runner.os }}-${{ matrix.ghc }}-cabal
40+
41+ - name: Build
42+ run: |
43+ cabal update
44+ cabal build --enable-tests --enable-benchmarks all
45+
46+ - name: Test
47+ run: |
48+ cabal test --enable-tests --test-show-details=direct all
.travis.yml+3−2
@@ -17,9 +17,10 @@ matrix:
1717 - ghc: 8.2.2
1818 - ghc: 8.4.4
1919 - ghc: 8.6.5
20− - ghc: 8.8.1
20+ - ghc: 8.8.3
21+ - ghc: 8.10.1
2122
22− - ghc: 8.8.1
23+ - ghc: 8.8.3
2324 env: STACK_YAML="$TRAVIS_BUILD_DIR/stack.yaml"
2425
2526install:
CHANGELOG.md+11−1
@@ -3,6 +3,17 @@
33`typerep-map` uses [PVP Versioning][1].
44The changelog is available [on GitHub][2].
55
6+## 0.3.3.0 — Apr 18, 2020
7+
8+* [#83](https://github.com/kowainik/typerep-map/issues/83):
9+ Support GHC-8.10.
10+* [#80](https://github.com/kowainik/typerep-map/issues/80):
11+ Build on 32-bit platforms.
12+* [#78](https://github.com/kowainik/typerep-map/issues/78):
13+ Support GHC-8.8.3.
14+* [#63](https://github.com/kowainik/typerep-map/pull/63):
15+ Add invariant check.
16+
617## 0.3.2 — Mar 27, 2019
718
819* [#47](https://github.com/kowainik/typerep-map/issues/47):
@@ -27,7 +38,6 @@ The changelog is available [on GitHub][2].
2738 Rewrite `fromSortedList` to use `Array` and `MutableArray`
2839 instead of `IntMap`.
2940
30−
3141## 0.2.0
3242
3343* [#43](https://github.com/kowainik/typerep-map/issues/43):
CONTRIBUTING.mddeleted−53
@@ -1,53 +0,0 @@
1−# Contributing to the Kowainik repositories
2−
3−## :wave: Greetings Traveler!
4−
5−We are delighted you're reading this, and we appreciate the effort you're
6−taking to make our projects awesome! :sparkles:
7−
8−## How to contribute
9−
10−### :bug: Report bugs or feature request :bulb:
11−
12−If you discover a bug or have any proposals on how to make this project better
13−don't hesitate to create an issue [here](../../issues/new) in a free format.
14−
15−### Create a PR
16−
17−We love to receive pull requests from everyone! It's usually a good idea
18−to tell about your intention to work on something under the corresponding
19−issue, so everyone is aware that you're on it. If there's no such issue — simply
20−create a new one!
21−
22−To get started with the Pull Request implementation you should first
23−[fork](../../fork), then clone the repo:
24−
25− git clone git@github.com:your-username/project-name.git
26−
27−Make your changes and consider the following checklist to go through
28−before submitting your pull request.
29−
30−### :white_check_mark: Check list
31−- [ ] New/fixed features work as expected (Bonus points for the new tests).
32−- [ ] There are no warnings during compilation.
33−- [ ] `hlint .` output is: _No Hints_ (see [`hlint`][hlint] tool docs).
34−- [ ] The code is formatted with the [`stylish-haskell`][stylish-tool] tool
35− using [stylish-haskell.yaml][stylish] file in the repository.
36−- [ ] The code style of the files you changed is preserved (for more specific
37− details on our style guide check [this document][style-guide]).
38−- [ ] Commit messages are in the proper format.
39− Start the first line of the commit with the issue number in square parentheses.
40−
41− **_Example:_** `[#42] Upgrade upper bounds of 'base'`
42−
43−After all above is done commit and push to your fork.
44−Now you are ready to [submit a pull request](../../compare).
45−
46−
47−----------
48−Thanks for spending your time on reading this contributing guide! :sparkling_heart:
49−
50−[stylish]: .stylish-haskell.yaml
51−[stylish-tool]: http://hackage.haskell.org/package/stylish-haskell
52−[hlint]: http://hackage.haskell.org/package/hlint
53−[style-guide]: https://github.com/kowainik/org/blob/master/style-guide.md#haskell-style-guide
LICENSE+373−21
@@ -1,21 +1,373 @@
1−MIT License
2−
3−Copyright (c) 2017 Veronika Romashkina
4−
5−Permission is hereby granted, free of charge, to any person obtaining a copy
6−of this software and associated documentation files (the "Software"), to deal
7−in the Software without restriction, including without limitation the rights
8−to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
9−copies of the Software, and to permit persons to whom the Software is
10−furnished to do so, subject to the following conditions:
11−
12−The above copyright notice and this permission notice shall be included in all
13−copies or substantial portions of the Software.
14−
15−THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16−IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17−FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18−AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19−LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20−OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
21−SOFTWARE.
1+Mozilla Public License Version 2.0
2+==================================
3+
4+1. Definitions
5+--------------
6+
7+1.1. "Contributor"
8+ means each individual or legal entity that creates, contributes to
9+ the creation of, or owns Covered Software.
10+
11+1.2. "Contributor Version"
12+ means the combination of the Contributions of others (if any) used
13+ by a Contributor and that particular Contributor's Contribution.
14+
15+1.3. "Contribution"
16+ means Covered Software of a particular Contributor.
17+
18+1.4. "Covered Software"
19+ means Source Code Form to which the initial Contributor has attached
20+ the notice in Exhibit A, the Executable Form of such Source Code
21+ Form, and Modifications of such Source Code Form, in each case
22+ including portions thereof.
23+
24+1.5. "Incompatible With Secondary Licenses"
25+ means
26+
27+ (a) that the initial Contributor has attached the notice described
28+ in Exhibit B to the Covered Software; or
29+
30+ (b) that the Covered Software was made available under the terms of
31+ version 1.1 or earlier of the License, but not also under the
32+ terms of a Secondary License.
33+
34+1.6. "Executable Form"
35+ means any form of the work other than Source Code Form.
36+
37+1.7. "Larger Work"
38+ means a work that combines Covered Software with other material, in
39+ a separate file or files, that is not Covered Software.
40+
41+1.8. "License"
42+ means this document.
43+
44+1.9. "Licensable"
45+ means having the right to grant, to the maximum extent possible,
46+ whether at the time of the initial grant or subsequently, any and
47+ all of the rights conveyed by this License.
48+
49+1.10. "Modifications"
50+ means any of the following:
51+
52+ (a) any file in Source Code Form that results from an addition to,
53+ deletion from, or modification of the contents of Covered
54+ Software; or
55+
56+ (b) any new file in Source Code Form that contains any Covered
57+ Software.
58+
59+1.11. "Patent Claims" of a Contributor
60+ means any patent claim(s), including without limitation, method,
61+ process, and apparatus claims, in any patent Licensable by such
62+ Contributor that would be infringed, but for the grant of the
63+ License, by the making, using, selling, offering for sale, having
64+ made, import, or transfer of either its Contributions or its
65+ Contributor Version.
66+
67+1.12. "Secondary License"
68+ means either the GNU General Public License, Version 2.0, the GNU
69+ Lesser General Public License, Version 2.1, the GNU Affero General
70+ Public License, Version 3.0, or any later versions of those
71+ licenses.
72+
73+1.13. "Source Code Form"
74+ means the form of the work preferred for making modifications.
75+
76+1.14. "You" (or "Your")
77+ means an individual or a legal entity exercising rights under this
78+ License. For legal entities, "You" includes any entity that
79+ controls, is controlled by, or is under common control with You. For
80+ purposes of this definition, "control" means (a) the power, direct
81+ or indirect, to cause the direction or management of such entity,
82+ whether by contract or otherwise, or (b) ownership of more than
83+ fifty percent (50%) of the outstanding shares or beneficial
84+ ownership of such entity.
85+
86+2. License Grants and Conditions
87+--------------------------------
88+
89+2.1. Grants
90+
91+Each Contributor hereby grants You a world-wide, royalty-free,
92+non-exclusive license:
93+
94+(a) under intellectual property rights (other than patent or trademark)
95+ Licensable by such Contributor to use, reproduce, make available,
96+ modify, display, perform, distribute, and otherwise exploit its
97+ Contributions, either on an unmodified basis, with Modifications, or
98+ as part of a Larger Work; and
99+
100+(b) under Patent Claims of such Contributor to make, use, sell, offer
101+ for sale, have made, import, and otherwise transfer either its
102+ Contributions or its Contributor Version.
103+
104+2.2. Effective Date
105+
106+The licenses granted in Section 2.1 with respect to any Contribution
107+become effective for each Contribution on the date the Contributor first
108+distributes such Contribution.
109+
110+2.3. Limitations on Grant Scope
111+
112+The licenses granted in this Section 2 are the only rights granted under
113+this License. No additional rights or licenses will be implied from the
114+distribution or licensing of Covered Software under this License.
115+Notwithstanding Section 2.1(b) above, no patent license is granted by a
116+Contributor:
117+
118+(a) for any code that a Contributor has removed from Covered Software;
119+ or
120+
121+(b) for infringements caused by: (i) Your and any other third party's
122+ modifications of Covered Software, or (ii) the combination of its
123+ Contributions with other software (except as part of its Contributor
124+ Version); or
125+
126+(c) under Patent Claims infringed by Covered Software in the absence of
127+ its Contributions.
128+
129+This License does not grant any rights in the trademarks, service marks,
130+or logos of any Contributor (except as may be necessary to comply with
131+the notice requirements in Section 3.4).
132+
133+2.4. Subsequent Licenses
134+
135+No Contributor makes additional grants as a result of Your choice to
136+distribute the Covered Software under a subsequent version of this
137+License (see Section 10.2) or under the terms of a Secondary License (if
138+permitted under the terms of Section 3.3).
139+
140+2.5. Representation
141+
142+Each Contributor represents that the Contributor believes its
143+Contributions are its original creation(s) or it has sufficient rights
144+to grant the rights to its Contributions conveyed by this License.
145+
146+2.6. Fair Use
147+
148+This License is not intended to limit any rights You have under
149+applicable copyright doctrines of fair use, fair dealing, or other
150+equivalents.
151+
152+2.7. Conditions
153+
154+Sections 3.1, 3.2, 3.3, and 3.4 are conditions of the licenses granted
155+in Section 2.1.
156+
157+3. Responsibilities
158+-------------------
159+
160+3.1. Distribution of Source Form
161+
162+All distribution of Covered Software in Source Code Form, including any
163+Modifications that You create or to which You contribute, must be under
164+the terms of this License. You must inform recipients that the Source
165+Code Form of the Covered Software is governed by the terms of this
166+License, and how they can obtain a copy of this License. You may not
167+attempt to alter or restrict the recipients' rights in the Source Code
168+Form.
169+
170+3.2. Distribution of Executable Form
171+
172+If You distribute Covered Software in Executable Form then:
173+
174+(a) such Covered Software must also be made available in Source Code
175+ Form, as described in Section 3.1, and You must inform recipients of
176+ the Executable Form how they can obtain a copy of such Source Code
177+ Form by reasonable means in a timely manner, at a charge no more
178+ than the cost of distribution to the recipient; and
179+
180+(b) You may distribute such Executable Form under the terms of this
181+ License, or sublicense it under different terms, provided that the
182+ license for the Executable Form does not attempt to limit or alter
183+ the recipients' rights in the Source Code Form under this License.
184+
185+3.3. Distribution of a Larger Work
186+
187+You may create and distribute a Larger Work under terms of Your choice,
188+provided that You also comply with the requirements of this License for
189+the Covered Software. If the Larger Work is a combination of Covered
190+Software with a work governed by one or more Secondary Licenses, and the
191+Covered Software is not Incompatible With Secondary Licenses, this
192+License permits You to additionally distribute such Covered Software
193+under the terms of such Secondary License(s), so that the recipient of
194+the Larger Work may, at their option, further distribute the Covered
195+Software under the terms of either this License or such Secondary
196+License(s).
197+
198+3.4. Notices
199+
200+You may not remove or alter the substance of any license notices
201+(including copyright notices, patent notices, disclaimers of warranty,
202+or limitations of liability) contained within the Source Code Form of
203+the Covered Software, except that You may alter any license notices to
204+the extent required to remedy known factual inaccuracies.
205+
206+3.5. Application of Additional Terms
207+
208+You may choose to offer, and to charge a fee for, warranty, support,
209+indemnity or liability obligations to one or more recipients of Covered
210+Software. However, You may do so only on Your own behalf, and not on
211+behalf of any Contributor. You must make it absolutely clear that any
212+such warranty, support, indemnity, or liability obligation is offered by
213+You alone, and You hereby agree to indemnify every Contributor for any
214+liability incurred by such Contributor as a result of warranty, support,
215+indemnity or liability terms You offer. You may include additional
216+disclaimers of warranty and limitations of liability specific to any
217+jurisdiction.
218+
219+4. Inability to Comply Due to Statute or Regulation
220+---------------------------------------------------
221+
222+If it is impossible for You to comply with any of the terms of this
223+License with respect to some or all of the Covered Software due to
224+statute, judicial order, or regulation then You must: (a) comply with
225+the terms of this License to the maximum extent possible; and (b)
226+describe the limitations and the code they affect. Such description must
227+be placed in a text file included with all distributions of the Covered
228+Software under this License. Except to the extent prohibited by statute
229+or regulation, such description must be sufficiently detailed for a
230+recipient of ordinary skill to be able to understand it.
231+
232+5. Termination
233+--------------
234+
235+5.1. The rights granted under this License will terminate automatically
236+if You fail to comply with any of its terms. However, if You become
237+compliant, then the rights granted under this License from a particular
238+Contributor are reinstated (a) provisionally, unless and until such
239+Contributor explicitly and finally terminates Your grants, and (b) on an
240+ongoing basis, if such Contributor fails to notify You of the
241+non-compliance by some reasonable means prior to 60 days after You have
242+come back into compliance. Moreover, Your grants from a particular
243+Contributor are reinstated on an ongoing basis if such Contributor
244+notifies You of the non-compliance by some reasonable means, this is the
245+first time You have received notice of non-compliance with this License
246+from such Contributor, and You become compliant prior to 30 days after
247+Your receipt of the notice.
248+
249+5.2. If You initiate litigation against any entity by asserting a patent
250+infringement claim (excluding declaratory judgment actions,
251+counter-claims, and cross-claims) alleging that a Contributor Version
252+directly or indirectly infringes any patent, then the rights granted to
253+You by any and all Contributors for the Covered Software under Section
254+2.1 of this License shall terminate.
255+
256+5.3. In the event of termination under Sections 5.1 or 5.2 above, all
257+end user license agreements (excluding distributors and resellers) which
258+have been validly granted by You or Your distributors under this License
259+prior to termination shall survive termination.
260+
261+************************************************************************
262+* *
263+* 6. Disclaimer of Warranty *
264+* ------------------------- *
265+* *
266+* Covered Software is provided under this License on an "as is" *
267+* basis, without warranty of any kind, either expressed, implied, or *
268+* statutory, including, without limitation, warranties that the *
269+* Covered Software is free of defects, merchantable, fit for a *
270+* particular purpose or non-infringing. The entire risk as to the *
271+* quality and performance of the Covered Software is with You. *
272+* Should any Covered Software prove defective in any respect, You *
273+* (not any Contributor) assume the cost of any necessary servicing, *
274+* repair, or correction. This disclaimer of warranty constitutes an *
275+* essential part of this License. No use of any Covered Software is *
276+* authorized under this License except under this disclaimer. *
277+* *
278+************************************************************************
279+
280+************************************************************************
281+* *
282+* 7. Limitation of Liability *
283+* -------------------------- *
284+* *
285+* Under no circumstances and under no legal theory, whether tort *
286+* (including negligence), contract, or otherwise, shall any *
287+* Contributor, or anyone who distributes Covered Software as *
288+* permitted above, be liable to You for any direct, indirect, *
289+* special, incidental, or consequential damages of any character *
290+* including, without limitation, damages for lost profits, loss of *
291+* goodwill, work stoppage, computer failure or malfunction, or any *
292+* and all other commercial damages or losses, even if such party *
293+* shall have been informed of the possibility of such damages. This *
294+* limitation of liability shall not apply to liability for death or *
295+* personal injury resulting from such party's negligence to the *
296+* extent applicable law prohibits such limitation. Some *
297+* jurisdictions do not allow the exclusion or limitation of *
298+* incidental or consequential damages, so this exclusion and *
299+* limitation may not apply to You. *
300+* *
301+************************************************************************
302+
303+8. Litigation
304+-------------
305+
306+Any litigation relating to this License may be brought only in the
307+courts of a jurisdiction where the defendant maintains its principal
308+place of business and such litigation shall be governed by laws of that
309+jurisdiction, without reference to its conflict-of-law provisions.
310+Nothing in this Section shall prevent a party's ability to bring
311+cross-claims or counter-claims.
312+
313+9. Miscellaneous
314+----------------
315+
316+This License represents the complete agreement concerning the subject
317+matter hereof. If any provision of this License is held to be
318+unenforceable, such provision shall be reformed only to the extent
319+necessary to make it enforceable. Any law or regulation which provides
320+that the language of a contract shall be construed against the drafter
321+shall not be used to construe this License against a Contributor.
322+
323+10. Versions of the License
324+---------------------------
325+
326+10.1. New Versions
327+
328+Mozilla Foundation is the license steward. Except as provided in Section
329+10.3, no one other than the license steward has the right to modify or
330+publish new versions of this License. Each version will be given a
331+distinguishing version number.
332+
333+10.2. Effect of New Versions
334+
335+You may distribute the Covered Software under the terms of the version
336+of the License under which You originally received the Covered Software,
337+or under the terms of any subsequent version published by the license
338+steward.
339+
340+10.3. Modified Versions
341+
342+If you create software not governed by this License, and you want to
343+create a new license for such software, you may create and use a
344+modified version of this License if you rename the license and remove
345+any references to the name of the license steward (except to note that
346+such modified license differs from this License).
347+
348+10.4. Distributing Source Code Form that is Incompatible With Secondary
349+Licenses
350+
351+If You choose to distribute Source Code Form that is Incompatible With
352+Secondary Licenses under the terms of this version of the License, the
353+notice described in Exhibit B of this License must be attached.
354+
355+Exhibit A - Source Code Form License Notice
356+-------------------------------------------
357+
358+ This Source Code Form is subject to the terms of the Mozilla Public
359+ License, v. 2.0. If a copy of the MPL was not distributed with this
360+ file, You can obtain one at http://mozilla.org/MPL/2.0/.
361+
362+If it is not possible or desirable to put the notice in a particular
363+file, then You may include the notice in a location (such as a LICENSE
364+file in a relevant directory) where a recipient would be likely to look
365+for such a notice.
366+
367+You may add additional accurate notices of copyright ownership.
368+
369+Exhibit B - "Incompatible With Secondary Licenses" Notice
370+---------------------------------------------------------
371+
372+ This Source Code Form is "Incompatible With Secondary Licenses", as
373+ defined by the Mozilla Public License, v. 2.0.
shell.nixdeleted−10
@@ -1,10 +0,0 @@
1−# { stdenv, pkgs, haskell }:
2−with import <nixpkgs> { };
3−
4−stdenv.mkDerivation rec {
5− name = "typerep-map";
6− buildInputs = [
7− haskell.compiler.ghc844
8− pkgs.cabal-install
9− ];
10−}
src/Data/TMap.hs+4
@@ -2,6 +2,10 @@
22{-# LANGUAGE Rank2Types #-}
33
44{- |
5+Copyright: (c) 2017-2020 Kowainik
6+SPDX-License-Identifier: MPL-2.0
7+Maintainer: Kowainik <xrom.xkov@gmail.com>
8+
59'TMap' is a heterogeneous data structure similar in its essence to
610'Data.Map.Map' with types as keys, where each value has the type of its key.
711
src/Data/TypeRepMap.hs+45−40
@@ -1,45 +1,50 @@
11{-# LANGUAGE NoImplicitPrelude #-}
22
3−-- | A version of 'Data.TMap.TMap' parametrized by an interpretation @f@. This
4−-- sort of parametrization may be familiar to users of @vinyl@ records.
5−--
6−-- @'TypeRepMap' f@ is a more efficient replacement for @DMap
7−-- 'Type.Reflection.TypeRep' f@ (where @DMap@ is from the @dependent-map@
8−-- package).
9−--
10−-- Here is an example of using 'Prelude.Maybe' as an interpretation, with a
11−-- comparison to 'Data.TMap.TMap':
12−--
13−-- @
14−-- 'Data.TMap.TMap' 'TypeRepMap' 'Prelude.Maybe'
15−-- -------------- -------------------
16−-- Int -> 5 Int -> Just 5
17−-- Bool -> True Bool -> Nothing
18−-- Char -> \'x\' Char -> Just \'x\'
19−-- @
20−--
21−-- In fact, a 'Data.TMap.TMap' is defined as 'TypeRepMap'
22−-- 'Data.Functor.Identity'.
23−--
24−-- Since 'Type.Reflection.TypeRep' is poly-kinded, the interpretation can use
25−-- any kind for the keys. For instance, we can use the 'GHC.TypeLits.Symbol'
26−-- kind to use 'TypeRepMap' as an extensible record:
27−--
28−-- @
29−-- newtype Field name = F (FType name)
30−--
31−-- type family FType (name :: Symbol) :: Type
32−-- type instance FType "radius" = Double
33−-- type instance FType "border-color" = RGB
34−-- type instance FType "border-width" = Double
35−--
36−-- 'TypeRepMap' Field
37−-- --------------------------------------
38−-- "radius" -> F 5.7
39−-- "border-color" -> F (rgb 148 0 211)
40−-- "border-width" -> F 0.5
41−-- @
42−--
3+{- |
4+Copyright: (c) 2017-2020 Kowainik
5+SPDX-License-Identifier: MPL-2.0
6+Maintainer: Kowainik <xrom.xkov@gmail.com>
7+
8+ A version of 'Data.TMap.TMap' parametrized by an interpretation @f@. This
9+sort of parametrization may be familiar to users of @vinyl@ records.
10+
11+@'TypeRepMap' f@ is a more efficient replacement for @DMap
12+'Type.Reflection.TypeRep' f@ (where @DMap@ is from the @dependent-map@
13+package).
14+
15+Here is an example of using 'Prelude.Maybe' as an interpretation, with a
16+comparison to 'Data.TMap.TMap':
17+
18+@
19+ 'Data.TMap.TMap' 'TypeRepMap' 'Prelude.Maybe'
20+-------------- -------------------
21+ Int -> 5 Int -> Just 5
22+ Bool -> True Bool -> Nothing
23+ Char -> \'x\' Char -> Just \'x\'
24+@
25+
26+In fact, a 'Data.TMap.TMap' is defined as 'TypeRepMap'
27+'Data.Functor.Identity'.
28+
29+Since 'Type.Reflection.TypeRep' is poly-kinded, the interpretation can use
30+any kind for the keys. For instance, we can use the 'GHC.TypeLits.Symbol'
31+kind to use 'TypeRepMap' as an extensible record:
32+
33+@
34+newtype Field name = F (FType name)
35+
36+type family FType (name :: Symbol) :: Type
37+type instance FType "radius" = Double
38+type instance FType "border-color" = RGB
39+type instance FType "border-width" = Double
40+
41+ 'TypeRepMap' Field
42+--------------------------------------
43+ "radius" -> F 5.7
44+ "border-color" -> F (rgb 148 0 211)
45+ "border-width" -> F 0.5
46+@
47+--}
4348module Data.TypeRepMap
4449 ( -- * Map type
4550 TypeRepMap()
src/Data/TypeRepMap/Internal.hs+8−4
@@ -18,7 +18,12 @@
1818
1919-- {-# OPTIONS_GHC -ddump-simpl -dsuppress-idinfo -dsuppress-coercions -dsuppress-type-applications -dsuppress-uniques -dsuppress-module-prefixes #-}
2020
21−{- | Internal API for 'TypeRepMap' and operations on it. The functions here do
21+{- |
22+Copyright: (c) 2017-2020 Kowainik
23+SPDX-License-Identifier: MPL-2.0
24+Maintainer: Kowainik <xrom.xkov@gmail.com>
25+
26+Internal API for 'TypeRepMap' and operations on it. The functions here do
2227not have any stability guarantees and can change between minor versions.
2328
2429If you need to use this module for purposes other than tests,
@@ -466,10 +471,10 @@ fromSortedList l = runST $ do
466471-- The structure maintains the following invariant.
467472-- For each element @A@ at index @i@:
468473--
469−-- 1. if there is an element @B@ at index @2*i+1@,
474+-- 1. if there is an element @B@ at index @2*i+1@,
470475-- then @B < A@.
471476--
472−-- 2. if there is an element @C@ at index @2*i+2@,
477+-- 2. if there is an element @C@ at index @2*i+2@,
473478-- then @A < C@.
474479--
475480invariantCheck :: TypeRepMap f -> Bool
@@ -515,4 +520,3 @@ invariantCheck TypeRepMap{..} = getAll (check 0)
515520 , All $ fromMaybe True $ (<=) <$> leftMax <*> rightMin
516521 , check (i+1)
517522 ]
518−
stack.yaml+1−1
@@ -1,4 +1,4 @@
1−resolver: nightly-2019-09-30
1+resolver: lts-15.8
22
33extra-deps:
44 - dependent-map-0.2.4.0
typerep-extra-impls/Data/TypeRep/CMap.hs+9
@@ -1,6 +1,14 @@
11{-# LANGUAGE KindSignatures #-}
22{-# LANGUAGE PolyKinds #-}
33
4+{- |
5+Copyright: (c) 2017-2020 Kowainik
6+SPDX-License-Identifier: MPL-2.0
7+Maintainer: Kowainik <xrom.xkov@gmail.com>
8+
9+TypeRepMap implementation based on @containers@ 'Map'.
10+-}
11+
412module Data.TypeRep.CMap
513 ( TypeRepMap (..)
614 , empty
@@ -20,6 +28,7 @@ import Unsafe.Coerce (unsafeCoerce)
2028
2129import qualified Data.Map.Lazy as LMap
2230
31+
2332-- | Map-like data structure with types served as the keys.
2433newtype TypeRepMap (f :: k -> *) = TypeRepMap
2534 { unMap :: LMap.Map TypeRep Any
typerep-extra-impls/Data/TypeRep/OptimalVector.hs+9
@@ -5,6 +5,14 @@
55{-# LANGUAGE PolyKinds #-}
66{-# LANGUAGE TypeFamilies #-}
77
8+{- |
9+Copyright: (c) 2017-2020 Kowainik
10+SPDX-License-Identifier: MPL-2.0
11+Maintainer: Kowainik <xrom.xkov@gmail.com>
12+
13+TypeRepMap implementation based on the optimal Vector.
14+-}
15+
816module Data.TypeRep.OptimalVector
917 ( -- * Map type
1018 TypeRepMap (..)
@@ -36,6 +44,7 @@ import Unsafe.Coerce (unsafeCoerce)
3644import qualified Data.Vector as V
3745import qualified Data.Vector.Unboxed as Unboxed
3846
47+
3948data TypeRepMap (f :: k -> Type) = TypeRepMap
4049 { fingerprintAs :: Unboxed.Vector Word64
4150 , fingerprintBs :: Unboxed.Vector Word64
typerep-extra-impls/Data/TypeRep/Vector.hs+9
@@ -7,6 +7,14 @@
77{-# LANGUAGE PolyKinds #-}
88{-# LANGUAGE TypeFamilies #-}
99
10+{- |
11+Copyright: (c) 2017-2020 Kowainik
12+SPDX-License-Identifier: MPL-2.0
13+Maintainer: Kowainik <xrom.xkov@gmail.com>
14+
15+TypeRepMap implementation based on Vector.
16+-}
17+
1018module Data.TypeRep.Vector
1119 ( TypeRepVector (..)
1220 , TF (..)
@@ -33,6 +41,7 @@ import qualified Data.Vector.Generic as G
3341import qualified Data.Vector.Generic.Mutable as M
3442import qualified Data.Vector.Unboxed as Unboxed
3543
44+
3645data instance Unboxed.MVector s Fingerprint = MFingerprintVector (Unboxed.MVector s Word64) (Unboxed.MVector s Word64)
3746data instance Unboxed.Vector Fingerprint = FingerprintVector (Unboxed.Vector Word64) (Unboxed.Vector Word64)
3847
typerep-map.cabal+7−6
@@ -1,6 +1,6 @@
11cabal-version: 2.4
22name: typerep-map
3−version: 0.3.2
3+version: 0.3.3.0
44synopsis: Efficient implementation of a dependent map with types as keys
55description:
66 A dependent map from type representations to values of these types.
@@ -19,11 +19,11 @@ description:
1919
2020homepage: https://github.com/kowainik/typerep-map
2121bug-reports: https://github.com/kowainik/typerep-map/issues
22−license: MIT
22+license: MPL-2.0
2323license-file: LICENSE
2424author: Veronika Romashkina, Vladislav Zavialov, Dmitrii Kovanikov
2525maintainer: Kowainik <xrom.xkov@gmail.com>
26−copyright: 2017-2019 Kowainik
26+copyright: 2017-2020 Kowainik
2727category: Data, Data Structures, Types
2828build-type: Simple
2929extra-doc-files: README.md
@@ -31,14 +31,15 @@ extra-doc-files: README.md
3131tested-with: GHC == 8.2.2
3232 , GHC == 8.4.4
3333 , GHC == 8.6.5
34− , GHC == 8.8.1
34+ , GHC == 8.8.3
35+ , GHC == 8.10.1
3536
3637source-repository head
3738 type: git
3839 location: https://github.com/kowainik/typerep-map.git
3940
4041common common-options
41− build-depends: base >= 4.10 && < 4.14
42+ build-depends: base >= 4.10 && < 4.15
4243
4344 default-language: Haskell2010
4445 default-extensions: BangPatterns
@@ -58,7 +59,7 @@ library
5859 Data.TypeRepMap.Internal
5960
6061 build-depends: containers >= 0.5.10.2 && < 0.7
61− , ghc-prim ^>= 0.5.1.1
62+ , ghc-prim >= 0.5.1.1 && < 0.7
6263 , primitive ^>= 0.7.0
6364 , deepseq ^>= 1.4
6465