在XML XSD定义递归代数数据类型
-
22-09-2019 - |
题
想象我有一个递归代数数据类型像这样(Haskell语法):
data Expr = Zero
| One
| Add Expr Expr
| Mul Expr Expr
我想在XML来表示这一点,我想XSD架构它。
我已想出如何实现这个语法:
<Expr>
<Add>
<Expr>
<Zero/>
</Expr>
<Expr>
<Mul>
<Expr>
<One/>
</Expr>
<Expr>
<Add>
<Expr>
<One/>
</Expr>
<Expr>
<One/>
</Expr>
</Add>
</Expr>
</Mul>
</Expr>
</Add>
</Expr>
与此架构:
<xs:complexType name="Expr">
<xs:choice minOccurs="1" maxOccurs="1">
<xs:element minOccurs="1" maxOccurs="1" name="Zero" type="Zero" />
<xs:element minOccurs="1" maxOccurs="1" name="One" type="One" />
<xs:element minOccurs="1" maxOccurs="1" name="Add" type="Add" />
<xs:element minOccurs="1" maxOccurs="1" name="Mul" type="Mul" />
</xs:choice>
</xs:complexType>
<xs:complexType name="Zero">
<xs:sequence>
</xs:sequence>
</xs:complexType>
<xs:complexType name="One">
<xs:sequence>
</xs:sequence>
</xs:complexType>
<xs:complexType name="Add">
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" name="Expr" type="Expr" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="Mul">
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" name="Expr" type="Expr" />
</xs:sequence>
</xs:complexType>
但我真正想要的是语法如下:
<Add>
<Zero/>
<Mul>
<One/>
<Add>
<One/>
<One/>
</Add>
</Mul>
</Add>
这是可能的?
谢谢!
解决方案
使用取代基团:
<xs:element name="Expr" abstract="true"/>
<xs:element name="Zero" substitutionGroup="Expr">
<xs:complexType/>
</xs:element>
<xs:element name="One" substitutionGroup="Expr">
<xs:complexType/>
</xs:element>
<xs:element name="Add" substitutionGroup="Expr">
<xs:complexType>
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" ref="Expr" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="Mul" substitutionGroup="Expr">
<xs:complexType>
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" ref="Expr" />
</xs:sequence>
</xs:complexType>
</xs:element>
不隶属于 StackOverflow