1

include yslt.yml2

     2

     3

define operator "†(\w+)" as call "printType" with "name", "%1";

     4

define operator "“(.*?)”" as call "ucase" with "text", "%1";

     5

     6

function "ucase" {

     7

    param "text";

     8

     9

    > «translate(substring($text, 1, 1), 'abcdefghijklmnopqrstuvwxyz', 'ABCDEFGHIJKLMNOPQRSTUVWXYZ')»

    10

    > «substring($text, 2)»

    11

}

    12

    13

function "printType" {

    14

    param "name";

    15

    16

    choose {

    17

        when '$name/@href = "http://schema.omg.org/spec/UML/2.1/uml.xml#UnlimitedNatural"'

    18

            > long

    19

        when '$name/@href = "http://schema.omg.org/spec/UML/2.1/uml.xml#String"'

    20

            > string

    21

    }

    22

}