src/Pure/Thy/thy_header.scala
changeset 44157 a21d3e1e64fd
parent 43767 e0219ef7f84c
child 44159 9a35e88d9dc9
equal deleted inserted replaced
44156:6aa25b80e1a5 44157:a21d3e1e64fd
    27 
    27 
    28   sealed case class Header(val name: String, val imports: List[String], val uses: List[String])
    28   sealed case class Header(val name: String, val imports: List[String], val uses: List[String])
    29   {
    29   {
    30     def map(f: String => String): Header =
    30     def map(f: String => String): Header =
    31       Header(f(name), imports.map(f), uses.map(f))
    31       Header(f(name), imports.map(f), uses.map(f))
    32   }
       
    33 
       
    34   val xml_encode: XML.Encode.T[Header] =
       
    35   {
       
    36     case Header(name, imports, uses) =>
       
    37       import XML.Encode._
       
    38       triple(string, list(string), list(string))(name, imports, uses)
       
    39   }
    32   }
    40 
    33 
    41 
    34 
    42   /* file name */
    35   /* file name */
    43 
    36