(version 1000)


(serializator "test_auto"

    (procedure "testanother"
        (arg "a_another_val" uint)
    )

    (procedure "unusedproc"
        (arg "a_test_arg" int)
    )

    (procedure "testauto"
        (arg "a_testauto_unused" string)
        (proc "p_another" '("testanother"))
    )

    (rootprocedure
        (proc "p_testauto" '("testauto"))
        (proc "p_unused_p" '("unusedproc"))
    )

    ; for enum (field/noname f/enum '("label3"))
    ;root "title of the Struct" (fields...)
    (rootstruct "TestStruct"
     ;   (field "auto_field" (f/any '("p_testauto" "a_auto_field")))
        (field "auto_another" (f/uint '("p_testauto" "p_another" "a_another_val")))
    )
)