指定された型でコンパイルエラーが発生する

Question

私はXSDファイルを読み込み、XSDで定義された各型の型を提供するTypeProviderに取り組んでいます。私は最後の行に以下のコード

type schema = XmlProviders.Schema<"file.xsd"> 
type Bazzer = { 
    Sum : XmlProviders.bar 
} 

に問題を持っているしかし、私はXmlProviders.barが存在しないというコンパイルエラーが発生します。

let defineType (xType : XElement) = 
    let name = xType.Attribute(XName.Get "name").Value 
    let t = ProvidedTypeDefinition(thisAssembly, 
             ns, 
             name, 
             baseType = Some typeof<obj>) 

    let ctor = ProvidedConstructor(parameters = [ ], 
            InvokeCode= (fun args -> <@@ "" :> obj @@>)) 
    t.AddMember ctor 



do provider.DefineStaticParameters(parameters, fun tyName args -> 

    let filename = args.[0] :?> string 
    let main = ProvidedTypeDefinition(thisAssembly,ns, 
             tyName, 
             baseType = Some typeof<obj>) 

    //Elements is a list of XElement 
    elements |> List.map defineType |> ignore 
    main 

私はXmlProviders.barタイプが作成されていることを知っているし、次のように 私はタイプを定義する方法の実装があり、私はdefineType provider.AddMember tに追加の行を追加した場合ので、私は

The type provider 'XmlProviders.SampleTypeProvider' reported an error: container type for 'XmlProviders.bar' was already set to 'XmlProviders.Schema'

を言ってエラーが出ます XmlProviders.Schemaが provider

で識別ProvidedTypeDefinitionある

私は、コンパイラは型が存在しないことを不平を言う理由で失われたビットだ場合はしばらくI明示的に私はそれが同じような状況で終わるものになるよう、答えを見つけることが

Answer 1

すでにだとエラーが出るそれを追加

ネストされたタイプはなしでなければなりません定義されているライン

let t = ProvidedTypeDefinition(thisAssembly, 
            ns, 
            name, 
            baseType = Some typeof<obj>) 

アセンブリおよび名前空間

let t = ProvidedTypeDefinition(name,baseType = Some typeof<obj>)