Merge pull request #3830 from unisonweb/fix/compile-types

Some type references were being ignored when compiling code
unisonweb · Feb 16, 2023 · 0207347 · 0207347
2 parents aeac746 + 82bd02f
commit 0207347
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/parser-typechecker/src/Unison/Runtime/MCode.hs b/parser-typechecker/src/Unison/Runtime/MCode.hs
@@ -1436,6 +1436,9 @@ sectionTypes _ = []
 
 instrTypes :: Instr -> [Word64]
 instrTypes (Pack _ w _) = [w `shiftR` 16]
+instrTypes (Reset ws) = setToList ws
+instrTypes (Capture w) = [w]
+instrTypes (SetDyn w _) = [w]
 instrTypes _ = []
 
 branchDeps :: Branch -> [Word64]