aboutsummaryrefslogtreecommitdiff
path: root/latex-test/src/LinearTypes/LinearTypes.hs
diff options
context:
space:
mode:
authorHécate Moonlight <Kleidukos@users.noreply.github.com>2021-02-07 16:21:29 +0100
committerGitHub <noreply@github.com>2021-02-07 16:21:29 +0100
commit9dab3bdc9f31c0389e69f21c2199f874d151ccb7 (patch)
tree36252b271f70ae2730063a39dff19fdfb4fadf8d /latex-test/src/LinearTypes/LinearTypes.hs
parenta10d042ac76c990764250244ac801db16858b6ee (diff)
parent62bf25cb0931e761e8b2ff082a703d79386fc8bc (diff)
Merge pull request #1314 from tweag/show-linear-backport
Backport #1238 (linear types) to ghc-9.0
Diffstat (limited to 'latex-test/src/LinearTypes/LinearTypes.hs')
-rw-r--r--latex-test/src/LinearTypes/LinearTypes.hs14
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