Skip to content

Commit

Permalink
chore: fix comment on BETA regression test
Browse files Browse the repository at this point in the history
Signed-off-by: Ben Price <ben@hackworthltd.com>
  • Loading branch information
brprice committed Jul 11, 2023
1 parent 50c45a4 commit 31b6931
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion primer/test/Tests/EvalFull.hs
Original file line number Diff line number Diff line change
Expand Up @@ -571,7 +571,7 @@ unit_type_preservation_BETA_regression :: Assertion
unit_type_preservation_BETA_regression =
let (((exprA, expectedAs), (exprB, expectedBs)), maxID) = create $ do
-- The 'A' sequence previously captured in the type "S" above
-- Λb x. (Λa λc (_ : a) : ∀b.(Nat -> b)) @(b -> Bool) x
-- Λb x. (Λa λc (_ : a) : ∀b.(Nat -> b)) @(b Bool) x
eA <-
lAM "b" $
lam "x" $
Expand Down

0 comments on commit 31b6931

Please sign in to comment.