(version 1000) (serializator "test_auto" (define "test_symbol" "test1234" ["testauto"]) (define-enum "MyEnum" ["item1" "item2"]) (procedure "testauto" (arg "a_auto_field" (auto-type)) ; any primitive there (arg "a_auto_field128" (auto-type)) ; u128 (arg "a_auto_vec" (vector (auto-type))) ; any primitive in vector (arg "a_symbol_test" (auto-type)) (arg "a_enum_test" (auto-type)) ; Enums also can be used, but it will be serialized as String ) (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_u128" (f/any ["p_testauto" "a_auto_field128"])) (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"])) ) )