anchor.diff:              else
                   MessagePackException("Attempt to unpack with non-compatible type") |> raise
   
  -        let _unpackExt16 (bytes: byte[]) (sequencials: Sequencials list) (values: Value list) =
  +        let _unpackExt16 (bytes: byte[]) (sequencials: Stack<Sequencials>) (values: List<Value>) =
               if bytes.Length >= 4 then
                   let length = int(bytes.[1]) * 256 +
                                int(bytes.[2])
  
positive.code:             else
                  MessagePackException("Attempt to unpack with non-compativle type") |> raise
  
          let _unpackInt8 (bytes: byte[]) (sequencials: Sequencials list) (values: Value list) =
              if bytes.Length >= 2 then
                  let newValue = sbyte(bytes.[1]) |> Value.Int8
                  let ars, vs = appendValue newValue sequencials values
  
negative.code:             else
                  MessagePackException("Attempt to unpack with non-compativle type") |> raise
  
          let _unpackStr16 (bytes: byte[]) (sequencials: Stack<Sequencials>) (values: List<Value>) =
              if bytes.Length >= 3 then
                  let length = int(bytes.[1]) * 256 +
                               int(bytes.[2])
  