Literal (cir_builder.Cir_builder.Literal)

val data_errors : 
  Cobol_data.Types.error Cir_builder.Types.NEL.t ->
  ('a, Types.error Cir_builder.Types.NEL.t) Stdlib.result

val immediate : 
  builder:('a Cir_types.immutable_field, 'b, 'c) Types.builder ->
  Cobol_data.Types.literal_value Cobol_common.Srcloc.TYPES.with_loc ->
  ('a Cir_types.immutable_field, Types.errors) Stdlib.result

val create : 
  builder:
    ('a Cir_types.immutable_field Cir_types.immutable_field, 'b, 'c)
      Types.builder ->
  Cobol_ptree.literal Cobol_common.Srcloc.TYPES.with_loc ->
  ('a Cir_types.field_reference, Types.errors) Stdlib.result

val strlit : 
  builder:
    ('a Cir_types.immutable_field Cir_types.immutable_field, 'b, 'c)
      Types.builder ->
  Cobol_ptree.strlit Cobol_common.Srcloc.TYPES.with_loc ->
  ('a Cir_types.field_reference, Types.errors) Stdlib.result

val nonnumlit : 
  builder:
    ('a Cir_types.immutable_field Cir_types.immutable_field, 'b, 'c)
      Types.builder ->
  Cobol_ptree.nonnumlit Cobol_common.Srcloc.TYPES.with_loc ->
  ('a Cir_types.field_reference, Types.errors) Stdlib.result