anchor.diff:                          Value aut
                       |   _  -> ErrorResult [MessageAtLine.CreateContinue (prs2.Location) ErrTooLessIndentedLiteral "Could not detect indentation of literal block scalar after '>'"]
                   |> FallibleOption.bind(fun m ->
  +                    let mapScalar (s, prs) =  
  +                        CreateScalarNode (NonSpecific.NonSpecificTagQT) (getParseInfo ps prs) (s)
  +                        |> this.ResolveTag prs NonSpecificQT (prs.Location)
                       (``folded-content`` (prs2 |> ParseState.SetIndent (prs2.n+m) |> ParseState.SetSubIndent 0))
                       |> FallibleOption.map(fun (ms, ps2) -> 
                           let s = 
  
positive.code:                             |> this.``join lines``
                          (s, ps2 |> ParseState.Advance)
                      )
                  )
              )
           )
          |> ParseState.ResetEnv ps
          |> ParseState.TrackParseLocation ps
          |> this.LogReturn "c-l+folded" ps 
  
negative.code:         let ``literal or folded`` (psp:ParseState) =
              let psp1 = psp.SetIndent (psp.n + 1)
              psp1 |> ParseState.``Match and Advance`` (this.``s-separate`` psp1) (fun prs ->
                  (prs |> ParseState.SetIndent (prs.n-1) |> ParseState.OneOf)
                      {
                          either   (this.``c-l+literal``)
                          either   (this.``c-l+folded``)
                          ifneither NoResult
                      }
                      |> ParseState.PreserveErrors psp
              )
          psp1 |> ParseState.``Match and Advance`` (this.``s-separate`` psp1) (fun prs ->
              (prs |> ParseState.SetIndent (prs.n-1) |> ParseState.OneOf)
                  {
                      either(this.``content with properties`` ``literal or folded``)
                      either   (this.``c-l+literal``)
                      either   (this.``c-l+folded``)
                      ifneither NoResult
                  }
                  |> ParseState.PreserveErrors ps
  