Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Pact step signatures #565

Merged
merged 33 commits into from
Jul 9, 2019
Merged

Pact step signatures #565

merged 33 commits into from
Jul 9, 2019

Conversation

joelburget
Copy link
Contributor

No description provided.

@joelburget joelburget requested a review from bts July 2, 2019 16:42
src/Pact/Analyze/Check.hs Show resolved Hide resolved
src/Pact/Analyze/Check.hs Outdated Show resolved Hide resolved
src/Pact/Analyze/Translate.hs Outdated Show resolved Hide resolved
src/Pact/Types/Typecheck.hs Show resolved Hide resolved
src/Pact/Analyze/Check.hs Outdated Show resolved Hide resolved
src/Pact/Analyze/Check.hs Show resolved Hide resolved
src/Pact/Types/Typecheck.hs Outdated Show resolved Hide resolved
`verifyFunctionInvariants` and `verifyFunctionProperty`.
This previously caused checking of `defpact`s to fail due to the wrong
`CheckableType`.
@joelburget joelburget marked this pull request as ready for review July 8, 2019 17:59
, invariantChecks :: HM.HashMap Text (TableMap [CheckResult])
, moduleWarnings :: VerificationWarnings
} deriving (Eq, Show)

data CheckEnv = CheckEnv
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

👍

-- use this structure for invariant checks, which don't check any props. We
-- also use it for checking pact steps which are a different check type and
-- borrow the name of their enclosing pact.
data FunData = FunData
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

👍

handlePositiveTestResult :: Maybe TestFailure -> IO ()
handlePositiveTestResult = \case
handlePositiveTestResult :: HasCallStack => Maybe TestFailure -> IO ()
handlePositiveTestResult = withFrozenCallStack $ \case
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

This is cool! I had no idea about this function.

bts added 2 commits July 9, 2019 14:05
* origin/master:
  Change 'executed' output to 'Maybe Bool' to indicate private exec (#560)
  Write a few older tests in terms of new testing system.
  Roll back (not needed) analysis write validation.
  Rewrite expected failure properties.
  Small alignment tweak.
  Analysis write validation.
@bts
Copy link
Contributor

bts commented Jul 9, 2019

I added another case to expectFailsTypechecking because apparently on master now, the typechecking error seems to be reported at the module level.

@bts bts merged commit f3ed10b into master Jul 9, 2019
@bts bts deleted the pact-step-signatures branch July 9, 2019 18:44
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

Successfully merging this pull request may close these issues.

2 participants