anchor.diff:                          | MnemonicOrigin.Output operation -> 
                               operation
                           | _ -> 
  -                            unexpected "There must be only outputs")
  +                            unexpected "There must be only operation outputs")
                   let operation = { name = memberOrFunc.FullName;
                                     inputs = argNames;
                                     output = name;
  -                                  dependencies = dependencies }
  -                (ParsedProgram.addMnemonic updatedProgram name (MnemonicOrigin.Output operation)), (Output operation)
  +                                  dependencies = dependencies } in
  +                ParsedProgram.addMnemonic updatedProgram name (MnemonicOrigin.Output operation)
                   
           | BasicPatterns.Value value ->
               let updatedProgram = 
  
positive.code:                         ProgramDiff.empty, value.CompiledName
                      | _ -> 
                          let argName = ParsedProgram.escapeName parsedProgram (memberOrFunc.CompiledName + (string i))
                          let updatedProgram, _ = visitExpression (Some argName) parsedProgram argExpr in
                          (updatedProgram - parsedProgram), argName
                  let updatedProgram, argNames = 
                      argsExprs
                      |> List.mapi processArgumentExpr
                      |> List.fold (fun (program, names) (diff, mnemo) ->
                          program + diff, mnemo :: names) (parsedProgram, [])
                      |> fun (program, names) -> program, List.rev names
                  let name = 
                      match nameOpt with 
                      | Some str -> str 
  
negative.code:                 | Some str -> str
                  | None -> ParsedProgram.escapeName parsedProgram (dataType.name + "val")
              let updatedProgram = ParsedProgram.addMnemonic parsedProgram name (Const (string objVal, dataType))
              updatedProgram // check if "string" serialization is correct
  
          | _ ->
              notSupported "Expression is not supported"
  