(version 1000)


(serializator "test_use"
    
    (use "examples/scheme_use/file_to_use")

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

    ; 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_vec" (f/vector (f/any '("p_testauto" "a_auto_vec"))))
        (field "auto_symb" (f/any '("p_testauto" "a_symbol_test")))
        (field "auto_enum" (f/any '("p_testauto" "a_enum_test")))
    )
)