samples/xmi2ddl.ysl2
author Edouard Tisserant <edouard.tisserant@gmail.com>
Wed, 28 Apr 2021 23:40:51 +0200
changeset 78 0b05c2bce9e4
parent 0 76005e62091d
permissions -rw-r--r--
Fix expension of macros in pointers with default values.

For example :

in xsl decl widget_class(%name, *clsname="%nameWidget", match="widget[@type='%name']", mode="widget_class") alias template {
| class `text **clsname` extends Widget{
content;
| }
};

widget_class('Input');

gives now :

<xsl:template match="widget[@type='Input']" mode="widget_class">
<xsl:text>class </xsl:text>
<xsl:text>InputWidget</xsl:text>
<xsl:text> extends Widget{
</xsl:text>
<xsl:text>}
</xsl:text>
</xsl:template>

Without the fix, <xsl:text>InputWidget</xsl:text> would be <xsl:text>%nameWidget</xsl:text>
include yslt.yml2

tstylesheet xmlns:uml="http://schema.omg.org/spec/UML/2.1",
            xmlns:xmi="http://schema.omg.org/spec/XMI/2.1" {

    template "/" apply "xmi:XMI/uml:Model/packagedElement", 0;

    template "packagedElement[@xmi:type='uml:Package']" {
        param "name", "''";
        if "$name=''"  apply "packagedElement", 0 { with "name", "@name"; }
        if "$name!=''" apply "packagedElement", 0 { with "name", "concat($name, '_', @name)"; }
    }

    template "packagedElement[@xmi:type='uml:Class']" {
        param "name";

        | CREATE TABLE «$name»_«@name» (
        apply "ownedAttribute";
        | );
    }

    template "ownedAttribute[@xmi:type='uml:Property' and type/@xmi:type='uml:PrimitiveType']" {
        0> «@name»
        choose {
            when "type/@href='http://schema.omg.org/spec/UML/2.1/uml.xml#String'"
                >  VARCHAR

            // [...] for other types, extend when clauses
        }
        if "position()!=last()" > ,
        text "\n";
    }
}