Upcasting F # registro criado através da reflexão

Question

Eu fui mexer com F # e ele é reflexão, tentando criar um tipo de objeto de registro dinamicamente a partir de dentro de F #, eu tenho mais do mesmo trabalho (como você pode ver abaixo), mas uma coisa - o registro eu crio através da reflexão tem o tipo "obj" em vez aquele que deveria ( "pessoa") e eu não consigo ser capaz de upcast-lo de qualquer forma.

#light

type Person = {
    Name:string;
    Age:int;
}

let example = {Name = "Fredrik"; Age = 23;}
// example has type Person = {Name = "Fredrik"; Age = 23;}

let creator = Reflection.FSharpValue.PrecomputeRecordConstructor(example.GetType(), 
               System.Reflection.BindingFlags.Public)

let reflected = creator [| ("thr" :> obj); (23 :> obj) |]
// here reflected will have the type obj = {Name = "thr"; Age = 23;}

// Function that changes the name of a Person record
let changeName (x:Person) (name:string) = 
    { x with Name = name }

// Works with "example" which is has type "Person"
changeName example "Johan"

// But not with "reflected" since it has type "obj"
changeName reflected "Jack" // Error "This expression has type obj but is here used with type Person. "

// But casting reflected to Person doesn't work either
(reflected :> Person) // Type constraint mismatch. The type   obj is not compatible with 
                      // type  Person. The type 'obj' is not compatible with the type 'Person'. 
                      // C:\Users\thr\Documents\Visual Studio 2008\Projects\
                      // Reflection\Reflection\Script.fsx   34  2   Reflection

Answer 1

Tente usar outro operador de conversão (como você está lançando para o outro lado desta vez)

Assim changeName (refletido :> Pessoa) "Jack"