summaryrefslogtreecommitdiff
path: root/src/AST/Weaken.hs
diff options
context:
space:
mode:
authorTom Smeding <tom@tomsmeding.com>2024-08-30 22:45:46 +0200
committerTom Smeding <tom@tomsmeding.com>2024-08-30 22:45:46 +0200
commit1f7ed2ee02222108684cfde8078e7a182f734a61 (patch)
tree976175ede4ec12a6e4a65d5e45e0b1ee8eeff5e6 /src/AST/Weaken.hs
parent172887fb577526de92b0653b5d3153114f8ce02a (diff)
WIP Build1
Diffstat (limited to 'src/AST/Weaken.hs')
-rw-r--r--src/AST/Weaken.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/AST/Weaken.hs b/src/AST/Weaken.hs
index 432b687..78577ee 100644
--- a/src/AST/Weaken.hs
+++ b/src/AST/Weaken.hs
@@ -28,7 +28,7 @@ deriving instance Show (Idx env t)
data env :> env' where
WId :: env :> env
- WSink :: env :> (t : env)
+ WSink :: forall t env. env :> (t : env)
WCopy :: env :> env' -> (t : env) :> (t : env')
WPop :: (t : env) :> env' -> env :> env'
WThen :: env1 :> env2 -> env2 :> env3 -> env1 :> env3