diff options
| author | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2020-12-16 20:03:14 +0100 |
|---|---|---|
| committer | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2021-02-05 23:05:56 +0100 |
| commit | 62bf25cb0931e761e8b2ff082a703d79386fc8bc (patch) | |
| tree | 2db43650cb17a48e501ae84f6dc041f5dcd619fc /latex-test/src/LinearTypes/LinearTypes.hs | |
| parent | a2f9f297d17059b3fc68ce4a245702278a5d8340 (diff) | |
Display linear/multiplicity arrows correctly (#1238)
Previously we were ignoring multiplicity and displayed
a %1 -> b as a -> b.
(cherry picked from commit b4b4d896d2d68d6c48e7db7bfe95c185ca0709cb)
Diffstat (limited to 'latex-test/src/LinearTypes/LinearTypes.hs')
| -rw-r--r-- | latex-test/src/LinearTypes/LinearTypes.hs | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/latex-test/src/LinearTypes/LinearTypes.hs b/latex-test/src/LinearTypes/LinearTypes.hs new file mode 100644 index 00000000..cb4eb138 --- /dev/null +++ b/latex-test/src/LinearTypes/LinearTypes.hs @@ -0,0 +1,14 @@ +{-# LANGUAGE LinearTypes #-} +module LinearTypes where + +-- | Does something unrestricted. +unrestricted :: a -> b +unrestricted = undefined + +-- | Does something linear. +linear :: a %1 -> b +linear = linear + +-- | Does something polymorphic. +poly :: a %m -> b +poly = poly |