2
Test on save/load procedure
4
What it does: it adds a state with a certain datatype to see whether
5
the load with another datatype raises an exception like it should.
13
(struct include Datatype.Int let default () = 0 end)
14
(struct let name = "Project.Test.StateA" let dependencies = [] end)
16
let () = StateA.set 10