f# - how to XML-Serialize array of an array in FSharp -

-

here's i'm looking for:

<reports>   <parameters>     <parameter name="srid" type="java.lang.integer">16533</parameter>     <parameter name="pmid" type="java.lang.integer">17018</parameter>     <parameter name="start" type="java.text.simpledateformat">1/1/2011 12:00:00 am</parameter>     <parameter name="end" type="java.text.simpledateformat">1/31/2011 12:00:00 am</parameter>   </parameters>   <parameters>     <parameter name="srid" type="java.lang.integer">16099</parameter>     <parameter name="pmid" type="java.lang.integer">17018</parameter>     <parameter name="start" type="java.text.simpledateformat">1/1/2011 12:00:00 am</parameter>     <parameter name="end" type="java.text.simpledateformat">1/31/2011 12:00:00 am</parameter>   </parameters> </reports>

but instead, here's i'm getting:

<reports>     <parameters>       <parameters>         <parameter name="srid" type="java.lang.integer">16533</parameter>         <parameter name="pmid" type="java.lang.integer">17018</parameter>         <parameter name="start" type="java.text.simpledateformat">1/1/2011 12:00:00 am</parameter>         <parameter name="end" type="java.text.simpledateformat">1/31/2011 12:00:00 am</parameter>       </parameters>     </parameters>     <parameters>       <parameters>         <parameter name="srid" type="java.lang.integer">16677</parameter>         <parameter name="pmid" type="java.lang.integer">17018</parameter>         <parameter name="start" type="java.text.simpledateformat">1/1/2011 12:00:00 am</parameter>         <parameter name="end" type="java.text.simpledateformat">1/31/2011 12:00:00 am</parameter>       </parameters>     </parameters> </reports>

it seems have <parameters> tag.

here's whole model:

type parameter(paramname, javatype, paramvalue) =     let mutable pname = paramname     let mutable ptype = javatype     let mutable pvalue = paramvalue      public new() =          new parameter("","","")      [<xmlattributeattribute("name")>]         member this.pname get() = pname , set v = pname <- v      [<xmlattributeattribute("type")>]     member this.ptype get() = ptype , set v = ptype <- v      [<xmltext>]     member this.pvalue get() = pvalue , set v = pvalue <- v  type parameters(parameters: parameter array) =     let mutable paramarray = parameters      public new() =          new parameters(array.empty)      [<xmlarray "parameters">]     member this.paramarray get() = paramarray , set v = paramarray <- v  [<xmlroot("reports")>] type reports(ps:parameters array) =     let mutable parms = ps      public new() =         new reports(array.empty)      [<xmlelement("parameters")>]      member this.ps get() = parms , set v = parms <- v

ok, simplified types little cleaner: 

type parameter(paramname) =    let mutable pname = paramname     public new() =      new parameter("")     [<xmlattribute("name")>]        member this.pname get() = pname , set v = pname <- v   type parameters(parameters: parameter array) =    let mutable paramarray = parameters     public new() =      new parameters(array.empty)     [<xmlelement "parameter">]    member this.paramarray get() = paramarray , set v = paramarray <- v  [<xmlroot("reports")>] type reports(ps:parameters array) =    let mutable parms = ps     public new() =     new reports(array.empty)     [<xmlelement("parameters")>]     member this.ps get() = parms , set v = parms <- v

and serialize these: 

    let params1 = parameters ([|parameter("a"); parameter("b")|])     let params2 = parameters ([|parameter("c"); parameter("d")|])      let repos = reports ([|params1; params2|])      use writer = system.xml.xmlwriter.create @"c:\temp\foo1.xml"     let xs = system.xml.serialization.xmlserializer typeof<reports>     xs.serialize (writer, repos)

produces: 

<reports xmlns:xsi="http://www.w3.org/2001/xmlschema-instance" xmlns:xsd="http://www.w3.org/2001/xmlschema">     <parameters>         <parameter name="a" />         <parameter name="b" />     </parameters>     <parameters>         <parameter name="c" />         <parameter name="d" />     </parameters> </reports>

hth, alex


Comments

Post a Comment

Popular posts from this blog

javascript - Enclosure Memory Copies -

-
function myclass() { //lots , lots of vars , code here. this.bar = function() { //do numerous enclosed myclass vars } this.foo = function() { alert('hello'); //don't enclosed variables. } } each instance of myclass gets own copy of bar , foo, why prototyped methods use less memory. however, know more memory use of inner methods. it seems obvious me (1) below must true. agree? not distinct myclass instances have own distinct copies of bar, must have own distinct copies of myclass enclosure. (or else how bar method keep myclass variables straight on per instance basis?) now (2) question i'm after. since inner foo method doesn't use in myclass enclosure natural qustion is: javascript smart enough not keep myclass enclosure in memory use of foo? this depend entirely on implementation not language. naive implementations keep far more around others. answer true e.g. v8 (chrome's js engine) may not true spider...
Read more

php - Replacing tags in braces, even nested tags, with regex -

-
example preg_replace('/\{[a-za-z.,\(\)0-9]+\}/', 'replaced', 'lorem ipsum dolor sit {tag1({tag2()})}, consectetur adipiscing elit.'); the result: lorem ipsum dolor sit {tag1(replaced)}, consectetur adipiscing elit. question as can see "tag2" has been replaced, want replace "tag1" know how can this? (in cases might this: {tag1({tag2({tag3()})})}) , on.) btw using preg_replace_callback, easier show preg_replace here site can test code: http://www.spaweditor.com/scripts/regex/index.php you need add curly braces character set. here's pattern used: /\{[a-za-z.,\(\)\{\}0-9]+\}/ and here result: "lorem ipsum dolor sit replaced, consectetur adipiscing elit."
Read more