Cir_builder.Storage
val create : builder:('f, 'r, _) Types.builder -> Cobol_unit.Types.data_definitions -> (('f, 'r) Cir_types.data, Types.errors) Stdlib.result