include ./textutils.ysl2

function "toC" {
    param "type";

    choose {
        when "$type='stringlist'" > stringlist_t
        when "$type='string'" > char
        when "$type='identity'" > pEp_identity
        when "$type='identitylist'" > identity_list
        when "$type='timestamp'" > timestamp
        when "$type='EncFormat'" > PEP_enc_format
        when "$type='bloblist'" > bloblist_t
        when "$type='stringpairlist'" > stringpair_list_t
        when "$type='direction'" > PEP_msg_direction

        otherwise value "$type";
    }
}

define operator "√([$@]?[a-zA-Z0-9_]+)" as call "toC" with "type", "%1";