accessor_info.ml
accessor_base
1 2 3 4 5 6 open! Base open! Import let lazy_t = [%accessor Accessor.isomorphism ~get:(fun info -> lazy info) ~construct:Info.of_lazy_t] ;;
1 2 3 4 5 6
open! Base open! Import let lazy_t = [%accessor Accessor.isomorphism ~get:(fun info -> lazy info) ~construct:Info.of_lazy_t] ;;