Error (cobol_ir.Cobol

module LIST = Cobol_common.Basics.LIST

val fatal : Types.errors -> 'a

val cons_error : 
  ('a, 'b) Stdlib.result ->
  ('a list, 'b Cobol_ir.Types.NEL.t) Stdlib.result ->
  ('a list, 'b Cobol_ir.Types.NEL.t) Stdlib.result

val cons_errors : 
  ('a, 'b Cobol_ir.Types.NEL.t) Stdlib.result ->
  ('a list, 'b Cobol_ir.Types.NEL.t) Stdlib.result ->
  ('a list, 'b Cobol_ir.Types.NEL.t) Stdlib.result

val append_lists : 
  ('a list, 'b Cobol_ir.Types.NEL.t) Stdlib.result ->
  ('a list, 'b Cobol_ir.Types.NEL.t) Stdlib.result ->
  ('a list, 'b Cobol_ir.Types.NEL.t) Stdlib.result

val acc_error : 
  (unit, 'a) Stdlib.result ->
  (unit, 'a Cobol_ir.Types.NEL.t) Stdlib.result ->
  (unit, 'a Cobol_ir.Types.NEL.t) Stdlib.result

val acc_errors : 
  (unit, 'a Cobol_ir.Types.NEL.t) Stdlib.result ->
  (unit, 'a Cobol_ir.Types.NEL.t) Stdlib.result ->
  (unit, 'a Cobol_ir.Types.NEL.t) Stdlib.result