(version 1000)


(serializator "defines"
    (define "symbol1" 4u '())
    (define "symbol2" "test" '())
    (define "symbol3" #t '())

    (procedure "unused"
        (arg "a_unused" symbol uint)
    )

    (rootprocedure 
        (proc "p_unused" '("unused"))
    )

    (rootstruct "TestDefine"
        (field "test" (f/uint '("p_unused" "a_unused")))
    )
)