anchor.diff:          logger.DebugFormat("Payload: ({0})", requestText)
           match DeterminePullRequestType(JsonValue.Parse(requestText)) with
           | Invalid i -> ClosePullRequest i
  +        | UnknownMergeability uri -> QueueMergePullRequest uri
           | AutoMergeable uri -> MergePullRequest uri
           | Skip -> DreamMessage.Ok(MimeType.JSON, "Pull request needs to be handled by a human since is not targeting an open branch or the master branch"B)
   
  
positive.code:         new DreamMessage(DreamStatus.Ok, new DreamHeaders(headers), MimeType.JSON, payload)
  
      let DeterminePullRequestType pr =
          if InvalidPullRequest pr then
              Invalid (new XUri(pr?pull_request?url.AsString()))
          else if AutoMergeablePullRequest pr then
              AutoMergeable (new XUri(pr?pull_request?url.AsString()))
          else
              Skip
  
  
negative.code: type PullRequestType =
  | Invalid of XUri
  | AutoMergeable of XUri
  | UnknownMergeability of XUri
  | Skip
  
  [<DreamService(
  